How to find first cell with text

Resolved · Medium Priority · Version 2003

Tue 1 Apr 2008, 16:30 Delegate Adriana said...

Adriana has attended:
Excel VBA Intro Intermediate course

How to find first cell with text

How can I find the address of the first cell with Text in Column A starting from A1 using Ctl and Arrow down?

Wed 30 Apr 2008, 15:35 Trainer Carlos said...

RE: 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

Training courses

	98.8 % recommend us
	More live stats...

Training information:

Active questions
Advanced/consultancy questions
Today's questions
Unanswered questions
Popular forum topics

VBA tip:

Use VbNullString instead of

When needing to default a String variable back to it's default of "" use vbNullString as in the following example:

Sub ClearText()

Dim strEmpName As String

strEmpName = "John Smith"
MsgBox strEmpName

strEmpName = vbNullString
MsgBox strEmpName

End Sub

View all VBA hints and tips