Hi everyone,
Thank you for reading my questions. I look forward to your responses.
I am reading in data from a text file. For simplicity's sake, let's
say
I'm using the following code:
Sub ProgramName()
Open "filename.txt" For Input As #1
for i=1 to 10
Line Input #1, tempstring
Dear Abdul,
Create the following UDF in a module:
Function IsFormula(cell_ref As Range)
IsFormula = cell_ref.HasFormula
End Function
Now in your conditional formatting, use the formula is option and refer to
this function. and put the formatting you want.
Only drawback in this is it will consid
Hi Can you send a sample sheet please
Regards,
Andy
On Fri, May 22, 2009 at 4:02 PM, Mehdi_21 wrote:
>
> hey everyone,
>
> how can i write a macro that colors sheet tab into "red" if:
>
> 1) sheet contains "zero" string
> 2) sheet contains "nine" string
> 3) sheet contains "nine" AND "zero" str
please send the file
On Fri, May 22, 2009 at 1:21 AM, god is gr8 i love u
wrote:
> HI
> i want to make chart on data in excel its whole month data
> i want to show to difference in timing so which chart will b suitable and
> how cn i show the whole month data in chat
> also in this i hv 4 columns
Dear All,
I want to check the cell value via conditional formatting that whether
the value is manual entered or formula.
can any body assist me to solving this problem.
Regards,
Abdul Hakim...
--~--~-~--~~~---~--~~
---
Hi
Here is the macro which removes non-breaking spaces in all the cells of
the worksheet.
Public Sub RemoveNonBreakingSpaces()
' Remove all non-breaking spaces from constants in the active worksheet.
Dim Cell As Range
Dim Value As String
Dim Length As Long
If ActiveSheet.Type <>
Try this if this helps
Sub CopyPaste()
Dim ws As Worksheet
For Each ws In Worksheets
If ws.Name <> "JAN" Then
ws.Select
ws.Application.Run "Macro1"
End If
Next
End Sub
Sub Macro1()
Range("A2:B13").Select ' select all the data range
Selection.Copy
Sheets("Summary Sheet").Select
ActiveSheet.Paste
check the article below, this should give you a start for what your are
looking to do
http://funwithexcel.blogspot.com/2009/05/macro-to-copy-worksheets-from-master.html
In this I have shown how to copy the whole excel sheet, you got to tweak a
bit, get the active cell and paste all sheets one by
Hi Anil,
Please go thru the link below. This should answer your query..
http://www.cpearson.com/excel/lookups.htm
Regards,
Andy
On Fri, May 22, 2009 at 9:18 PM, anil kumar wrote:
> Hi All,
>
> i have a query suppose we have a excel file which have some data like as
> below
>
> A
Any thoughts on this? I'm able to record the procedure in Excel 2000
but when I try using that code in 2007, I get an error.
On May 21, 1:12 am, Satish Mandava wrote:
> On Thu, May 21, 2009 at 2:41 AM, Dave wrote:
>
> > Hi all, new to the group and fairly new to VBA programming. Here is
> >
Hi All,
i have a query suppose we have a excel file which have some data like as
below
A B
1 xyz10
2 abc20
3 xyw30
2 abc 40
5 xyz 50
if i am using Vlookup and hlookup function of excel it
Hi Deepak rawat !
I saw the solution you have provided is working perfectly and also
implementing immediately that's a very good job doing by a VBA
function "OFFSET" I will highly appreciate.
On May 22, 1:20 pm, kishan@gmail.com wrote:
> Hi,
> I did this with vba, but I am unable to attach
Since the color numbers are different for the different versions of Excel
(Excel 2007 uses some wierd shades)
You'll have to record a macro to find your color numbers.
this macro will get you started.
you need to work on the logic for what you want to do, since what you describe
doesn't really mak
Hi All
I have many sheets and I want to copy in one main excel sheet but I
want to copy ne after the other exce sheet's data, it shd be like a ladder or a
staircase.
Sheets like A1, B1, C1 etc and one man sheet called "JAN".
I want to copy all the visible rows which are pres
hey everyone,
how can i write a macro that colors sheet tab into "red" if:
1) sheet contains "zero" string
2) sheet contains "nine" string
3) sheet contains "nine" AND "zero" strings
4) sheet contains "nine" OR "zero" strings
otherwise sheet tab color turns into "Green"
thanks in advance for y
Hi,
I did this with vba, but I am unable to attache excle file. so I
paste this code to here...
--
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Err1:
Static l As Integer
Static i As Integer
If Target.Value = "" Then
16 matches
Mail list logo