Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
HOW TO FIND last cell from activecell?
DEAR ALL
Excel97: in COL A, have say 50 rows 1 to 50. Again have row 70 to 150 another seiral numbers 1 to 80. Suppose if cell A25 is clicked, how to use countA to find the last cell in row 1 to 50. Pls bear in mind that xlup etc cant be used bcos from row 70, i have another serial numbers. Pls sugest what VB. Thnks |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
HOW TO FIND last cell from activecell?
Give this a go...
LastRow = ActiveCell.End(xlDown).Row Mark "CAPTGNVR" wrote in message ... DEAR ALL Excel97: in COL A, have say 50 rows 1 to 50. Again have row 70 to 150 another seiral numbers 1 to 80. Suppose if cell A25 is clicked, how to use countA to find the last cell in row 1 to 50. Pls bear in mind that xlup etc cant be used bcos from row 70, i have another serial numbers. Pls sugest what VB. Thnks |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
HOW TO FIND last cell from activecell?
Sub findit()
j = ActiveCell.Row + 1 ad = "no data found below the active cell" For i = j To 50 If IsEmpty(Cells(i, 1).Value) Then Else ad = Cells(i, 1).Address End If Next MsgBox (ad) End Sub -- Gary''s Student - gsnu200775 "CAPTGNVR" wrote: DEAR ALL Excel97: in COL A, have say 50 rows 1 to 50. Again have row 70 to 150 another seiral numbers 1 to 80. Suppose if cell A25 is clicked, how to use countA to find the last cell in row 1 to 50. Pls bear in mind that xlup etc cant be used bcos from row 70, i have another serial numbers. Pls sugest what VB. Thnks |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
HOW TO FIND last cell from activecell?
Hi
Using xlDown will move to the last downmost cell in the serie. LastCell = ActiveCell.End(xlDown).Address Regards, Per "CAPTGNVR" skrev i meddelelsen ... DEAR ALL Excel97: in COL A, have say 50 rows 1 to 50. Again have row 70 to 150 another seiral numbers 1 to 80. Suppose if cell A25 is clicked, how to use countA to find the last cell in row 1 to 50. Pls bear in mind that xlup etc cant be used bcos from row 70, i have another serial numbers. Pls sugest what VB. Thnks |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
HOW TO FIND last cell from activecell?
Dear MARK IVEY, GARY"S STUDENT AND PER JESSEN,
I DONT KNOW WHY MY RESPONSE TO MR. MARK SAYING THAT VB line worked did not get posted. However pls accept my thanks for helping me out. How i wish if you all could also help me for my previous thread why in one particular sheet I dont get to see the edit-fill"series" option highlighted in excel 97. Whereas in any other worksheet this option for "series" is highlighted and available. Pls dont say i shud not mix two threads but somehow this nagging one going on for last one year and no one is answering including todays posting. "Per Jessen" wrote: Hi Using xlDown will move to the last downmost cell in the serie. LastCell = ActiveCell.End(xlDown).Address Regards, Per "CAPTGNVR" skrev i meddelelsen ... DEAR ALL Excel97: in COL A, have say 50 rows 1 to 50. Again have row 70 to 150 another seiral numbers 1 to 80. Suppose if cell A25 is clicked, how to use countA to find the last cell in row 1 to 50. Pls bear in mind that xlup etc cant be used bcos from row 70, i have another serial numbers. Pls sugest what VB. Thnks |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
HOW TO FIND last cell from activecell?
Just read over your other post....
I may not be much help because I have not used Excel 97 in quite some time... But either way I would like to see if I can help at all. Can you send me a copy of the workbook with detailed instructions on exactly what you are trying to accomplish? From there I will see if I can help out further or see if I can find the problem. My email is: wmivey6311 AT hotmail DOT com (AT = @, and DOT = ".") I use this format to prevent SPAM. Mark "CAPTGNVR" wrote in message ... Dear MARK IVEY, GARY"S STUDENT AND PER JESSEN, I DONT KNOW WHY MY RESPONSE TO MR. MARK SAYING THAT VB line worked did not get posted. However pls accept my thanks for helping me out. How i wish if you all could also help me for my previous thread why in one particular sheet I dont get to see the edit-fill"series" option highlighted in excel 97. Whereas in any other worksheet this option for "series" is highlighted and available. Pls dont say i shud not mix two threads but somehow this nagging one going on for last one year and no one is answering including todays posting. "Per Jessen" wrote: Hi Using xlDown will move to the last downmost cell in the serie. LastCell = ActiveCell.End(xlDown).Address Regards, Per "CAPTGNVR" skrev i meddelelsen ... DEAR ALL Excel97: in COL A, have say 50 rows 1 to 50. Again have row 70 to 150 another seiral numbers 1 to 80. Suppose if cell A25 is clicked, how to use countA to find the last cell in row 1 to 50. Pls bear in mind that xlup etc cant be used bcos from row 70, i have another serial numbers. Pls sugest what VB. Thnks |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How To Find If The ActiveCell Is Protected | Excel Discussion (Misc queries) | |||
If activecell.column = variable then activecell,offset (0,1) | Excel Discussion (Misc queries) | |||
if activecell = the cell below | Excel Programming | |||
Find ActiveCell.column | Excel Programming | |||
Use of Selection.Find & ActiveCell | Excel Programming |