Macro to select the last specific value in a column

Hi and welcome to the forum,

Try this one line of code :

   Columns(1).Find(what:="A", SearchDirection:=xlPrevious).Offset(1, 0).EntireRow.Insert

Hi Justin and welcome to the forum,

I like to know exactly what is happening so I write code I can read. Here is a UDF (User Defined Function) to return the Row number of the Last R in Column J. See if this code helps you learn VBA.

Function LastRinJ()
    Dim LastRow As Double
    Dim RowCtr As Double
    LastRow = Cells(Rows.Count, "J").End(xlUp).Row
    
    For RowCtr = LastRow To 1 Step -1
        If Cells(RowCtr, "J") = "R" Then
            LastRinJ = RowCtr
            GoTo Found
        End If
    Next RowCtr
Found:
    If RowCtr = 0 Then
        MsgBox "You don't have an R in J"
    End If
End Function

Try this instead. The code I provided was for values in column A

Sub test()
   Dim c As Range
   Set c = Columns(10).Find(what:="A", SearchDirection:=xlPrevious)
   If Not c Is Nothing Then c.Offset(1, 0).EntireRow.Insert
End Sub

If it doesn't work, please post sample workbook.