Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Repeat: Active Cell's Address
Hello All
Your answers are right, but I think I could not put it right. How to get the Activecell's address? Then how to use it in conjunction with Range, Address etc.? Also how can I use the MsgBox to show it so that I know the program flow is correct? Also, when I say For each c in Worksheets("sheet1").Rows("5:5").Cells if c.value = 50 then .... what should I write in for c.range, c.address ? [I was wondering when c.value works why not c.range or c.address?] Thanks Milind |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Repeat: Active Cell's Address
c is not the ActiveCell. You would have to c.Activate c to be the
ActiveCell. Acivate is rarely necessary and ruins performance, so avoid it. Address of ActiveCell = ActiveCell.Address Address of c (within your loop) = c.Address (why do you say c.address doesn't work? Keep in mind that Address returns "$A$1", not "A1" if you are doing a string comparison) HTH, -- George Nicholson Remove 'Junk' from return address. "Milind" wrote in message ... Hello All Your answers are right, but I think I could not put it right. How to get the Activecell's address? Then how to use it in conjunction with Range, Address etc.? Also how can I use the MsgBox to show it so that I know the program flow is correct? Also, when I say For each c in Worksheets("sheet1").Rows("5:5").Cells if c.value = 50 then ... what should I write in for c.range, c.address ? [I was wondering when c.value works why not c.range or c.address?] Thanks Milind |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Repeat: Active Cell's Address
You don't actually need the address and c is a range reference, so you don't
need c.range Sub String_Find_and_Paste() Dim s_text As String Dim r As Range Dim s As Range For Each c In Worksheets("Sheet1").Rows("5:5").Cells s_text = c.Value If InStr(1, s_text, "India", vbTextCompare) 0 Then 'Get the activeCell's address, offset it & paste cell.copy ActiveCell.Offset(10,0) ActiveCell.Offset(10,0).Select msgbox ActiveCell.Address end if Next End Sub -- Regards, Tom Ogilvy "Milind" wrote in message ... Hello All Your answers are right, but I think I could not put it right. How to get the Activecell's address? Then how to use it in conjunction with Range, Address etc.? Also how can I use the MsgBox to show it so that I know the program flow is correct? Also, when I say For each c in Worksheets("sheet1").Rows("5:5").Cells if c.value = 50 then ... what should I write in for c.range, c.address ? [I was wondering when c.value works why not c.range or c.address?] Thanks Milind |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Referencing an active cell's content from another sheet. | Excel Worksheet Functions | |||
Need to refer to a cell's address, not it's content... | Excel Discussion (Misc queries) | |||
cell's address of the largest number | Excel Discussion (Misc queries) | |||
How can I change a text to a cell's address? | Excel Discussion (Misc queries) | |||
How do I programmatically know the current cell's address | Excel Programming |