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

Join the TechGuruPlus Telegram group

Join Our WhatsApp Group

Join the TechGuruPlus WhatsApp group
Nazim Khan, founder of TechGuruPlus.com

— Founder & Editor, TechGuruPlus.com
[MBA in Finance]

Nazim Khan has spent over ten years working with Excel, Tally and office documentation in accounts, finance and MIS roles. He has been running TechGuruPlus.com since 2016, where he publishes free editable templates for office work, and the YouTube channel Business Excel. He has trained more than 50,000 people online. Every template on this site is built and checked by him before it is published.

Contact  Â·  Excel Course

Leave a Comment