VBA Code to Find the Last Used Cell in a Column in Excel

VBA Code:

' VBA Code to Find the Last Used Cell in a Column in Excel

Sub FindLastUsedCellInColumn()
    Dim lastCell As Range
    Dim lastUsedRow As Long
    ' Specify the column number or letter
    Const columnNumber As Long = 1 ' Replace with the desired column number
    'Const columnLetter As String = "A" ' Replace with the desired column letter
    ' Find the last used cell in the specified column
    With Worksheets("Sheet1") ' Replace with the name of your worksheet
        ' If using column number
        lastUsedRow = .Cells(.Rows.Count, columnNumber).End(xlUp).Row
        ' If using column letter
        'lastUsedRow = .Range(columnLetter & .Rows.Count).End(xlUp).Row
        Set lastCell = .Cells(lastUsedRow, columnNumber)
    End With
    ' Display the result
    MsgBox "The last used cell in column " & columnNumber & " is " & lastCell.Address
End Sub

Check All VBA Codes

Join Our Telegram Group techguruplus telegram group Join Our WhatsApp Group techguruplus whatsapp group
Nazim Khan - Author Image

Nazim Khan (Author) 📞 +91 9536250020
[MBA in Finance]

Nazim Khan is an expert in Microsoft Excel. He teaches people how to use it better. He has been doing this for more than ten years. He is running this website (TechGuruPlus.com) and a YouTube channel called "Business Excel" since 2016. He shares useful tips from his own experiences to help others improve their Excel skills and careers.

Leave a Comment