Problems with Ranges

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hello, do any of you know why this is not working?

Range("A1").End(xlDown + 1) = "FINAL"

I have data in sheet 3. and I want to put in " FINAL" at the end of column
A, where there is no data.
Do I need to specify the sheet?
How?
 
You may need to specify the sheet it depends which is the active sheet but in
the first instance you need to get the syntax correct, try:-


ActiveSheet.Range("A65536").End(xlUp).Offset(1, 0).Value = "FINAL"

Mike
 
Range("A1").End(xlDown).Offset(1, 0).Value = "FINAL"

Note: this works only if there are no blanks in column A

Best to work up from the bottom of the column.

Sub findbottom()
ActiveSheet.Cells(Rows.Count, 1).End(xlUp) _
.Offset(1, 0).value = "FINAL"
End Sub


Gord Dibben MS Excel MVP
 
Back
Top