[VBA]Sub BoldLastRow()
'Bold last row
Dim Lastrow As Long
Lastrow = .Cells(.Rows.Count, "A").End(xlUp).Row.Select
Selection.Font.Bold = True
End Sub[VBA]
I am trying to bold the last row of my spreadsheet..i am missing something??
[VBA]Sub BoldLastRow()
'Bold last row
Dim Lastrow As Long
Lastrow = .Cells(.Rows.Count, "A").End(xlUp).Row.Select
Selection.Font.Bold = True
End Sub[VBA]
I am trying to bold the last row of my spreadsheet..i am missing something??
Posting Permissions
Reply With Quote