Thank you Paul, I've got a huge mental block on this type of expression. I
appreciate the help!
On Friday, June 2, 2017 at 11:56:24 AM UTC-4, Paul Schreiner wrote:
>
> Let's say that you have 100 rows of data.
>
> "bottom" ends up being 100.
> so your Rows statement results in:
>
Let's say that you have 100 rows of data. "bottom" ends up being 100.so your
Rows statement results in:Rows(R:100).insert shift:=xldown
I think it needs to beRows(100:100).insert shift:=xldown
so you'd use:Rows(r & ":" & r).Insert Shift:=xlDown
Paul-
“Do
Trying to insert a blank row between each line. The line starting with:
Rows is getting a type mismatch error.
-
Dim bottom As Integer
Dim r As Integer
bottom = Cells(Rows.Count, "A").End(xlUp).Row
For r = bottom To 2