I am able to change the font size of my text based on location. However, I am unable to change the row size based on the same If Then criteria. I am unsure what I am doing wrong. any suggestions?!
I keep getting the With object must be user-defined type, Object, or Variant error
For Each s In Sheets
s.Select
Cells.Select
With Selection
End With
For Each cll In ActiveSheet.Range("J101:J110")
If Range("J101") = "Here!" Then
With Range("A101:A113").FONT
.Size = 12
.Name = "Times New Roman"
.Bold = False
End With
If Range("J101") = "Here!" Then
With Range("A101:A113").Row
Cells.RowHeight = 15.75
End With
End If
End If
Next
Next s
End Sub
#vba pro in training
Bookmarks