Macro for adding rows if two different columns have a value

S

Saveset

Help! I need a macro to add a row after if the cell in column F has a value
and again if there is a value in column G
 
J

JLGWhiz

For Each c In Range("F2:F20") 'Or whatever size range
If c.Value > "" And c.Offset(0, 1).Value > 1 Then
c.Offset(1, 0).Resize(2, 1).EntireRow.Insert
ElseIf c.Value > "" Then
c.Offset(1, 0).EntireRow.Insert
End If
Next
 
S

Saveset

Thank you JLGWhiz! You are a Time saver for me! Also I appreciate the help
since I am just learning about the VBA process.
 
S

Saveset

Thanks! This did exactly what I needed!!! I truely appreciate this since I am
just beginning to learn about Macros!
 
Top