Hello



I have a sorted alphanumeric array with names and want to introduce a
blanc line each time that the name changes. Merci for help.

try this idea

Sub insertrowsif()
mc = 1 '"a"
For i = Cells(Rows.Count, mc).End(xlUp).Row To 2 Step -1
If Cells(i, mc) <> Cells(i - 1, mc) Then Rows(i + 1).Insert
Next
End Sub


--
Don Guillett
Microsoft MVP Excel
SalesAid Software
(E-Mail Removed)
"leovh" <(E-Mail Removed)> wrote in message
news:47136eb0$0$27366$(E-Mail Removed)...
> Hello
>
>
>
> I have a sorted alphanumeric array with names and want to introduce a
> blanc line each time that the name changes. Merci for help.
>
>