Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
find text in a cell and make cell 2 cells below that active
hello
my second post here, still learning VBA. My question is pretty much included in the subject. I need to find a cell in worksheet that contains text "descr1" - there is only 1 cell like this in the worksheet - it is in a header, and make cell 2 cells below that active any help is greatly appreciated |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
find text in a cell and make cell 2 cells below that active
Hi,
Try this: Cells.Find(What:="descr1", After:=ActiveCell, LookIn:=xlValues, LookAt _ :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _ False).Activate Cells(ActiveCell.Row + 2, ActiveCell.Column).Select Regards, Stefi €˛shark102€¯ ezt Ć*rta: hello my second post here, still learning VBA. My question is pretty much included in the subject. I need to find a cell in worksheet that contains text "descr1" - there is only 1 cell like this in the worksheet - it is in a header, and make cell 2 cells below that active any help is greatly appreciated |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
find text in a cell and make cell 2 cells below that active
Hi
Dim Sht as worksheet Dim FoundCell as Range 'replace with your workbook and worksheet if required Set Sht = Activeworkbook.Activeworksheet With Sht Set FoundCell = .Find("descr1", .Cells(1, 1), , , xlByColumns) end with If not FoundCell is Nothing then Sht.Activate 'if not active already FoundCell.offset(2,0).Activate end if Highlight Find in the editor and hit F1 key to look at its parameters regards Paul shark102 wrote: hello my second post here, still learning VBA. My question is pretty much included in the subject. I need to find a cell in worksheet that contains text "descr1" - there is only 1 cell like this in the worksheet - it is in a header, and make cell 2 cells below that active any help is greatly appreciated |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
find text in a cell and make cell 2 cells below that active
ok Stefis method works, now I need to name this workshhet after value in
selected cell sorry not to have written it in the first post :( "Stefi" wrote: Hi, Try this: Cells.Find(What:="descr1", After:=ActiveCell, LookIn:=xlValues, LookAt _ :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _ False).Activate Cells(ActiveCell.Row + 2, ActiveCell.Column).Select Regards, Stefi €˛shark102€¯ ezt Ć*rta: hello my second post here, still learning VBA. My question is pretty much included in the subject. I need to find a cell in worksheet that contains text "descr1" - there is only 1 cell like this in the worksheet - it is in a header, and make cell 2 cells below that active any help is greatly appreciated |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
find text in a cell and make cell 2 cells below that active
I got it, no more help needed, thanks everybody for the effort.
"shark102" wrote: ok Stefis method works, now I need to name this workshhet after value in selected cell sorry not to have written it in the first post :( "Stefi" wrote: Hi, Try this: Cells.Find(What:="descr1", After:=ActiveCell, LookIn:=xlValues, LookAt _ :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _ False).Activate Cells(ActiveCell.Row + 2, ActiveCell.Column).Select Regards, Stefi €˛shark102€¯ ezt Ć*rta: hello my second post here, still learning VBA. My question is pretty much included in the subject. I need to find a cell in worksheet that contains text "descr1" - there is only 1 cell like this in the worksheet - it is in a header, and make cell 2 cells below that active any help is greatly appreciated |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
macro to find cell content in sheets and make sheet active | Excel Discussion (Misc queries) | |||
Find last cell in a column, Delete its contents and make it active | Excel Worksheet Functions | |||
find specific text and make cell highlighted | Excel Discussion (Misc queries) | |||
How to programmatically make a cell the Active Cell? | Excel Programming | |||
Make a particular cell the active one | Excel Programming |