How to find first cell with text

Hi Adriana

Sorry for the delay

To find the address of the first cell with text in Column A you can use the following code:

Sub FindCellAddress()

Dim CellAddress As String

Range("A1").End(xlDown).Select 'Selects the first cell in ColumnA with text
CellAddress = ActiveCell.Address 'Saves the address as a string in the variable

MsgBox CellAddress 'View the saved address

End Sub

Hope this helps

Carlos