looking for a function

[Guest]

is there a function that locate me at the last writed cell in a column (I
thought about: sendkeys ^ {end} but with this it goes to the last column and
row)

also the same function but for rows

pd. I want functions, sendkeys works but I don't like to use it because the
structure of the program is difficult to understand with sendkeys....

TIA

 

[Guest]

A specific example:
Range("I1").End(xldown).Select

A second possible answer:
Activecell.End(xlDown).Select

Third:
Cells(65536,Activecell.Column).End(xlUp).Select

 

[Guest]

no, but I mean going to the last cell, if you have 1 2 3 4 5 6 your codes
goes until 3 then to 4 and then to 6, I want onw code that when is executed
it goes to the really las cell (6)

 

[Gord Dibben]

filo

Sub test1()
''find last cell in active column
ActiveSheet.Cells(Rows.Count, ActiveCell.Column).End(xlUp).Select
End Sub


Gord Dibben Excel MVP