Hejsa. Første indlæg, og ny bruger. Håber i kan hjælpe, da jeg står på bar bund. Jeg skal indsætte specifikke værdier i hver celle, f.eks. "TOM" i kollone A, osv. op til kollone "F". Jeg har fundet nedenstående makro, som virker fint, men dog tilføjer en blank række. Nogen måde at indsætte definerede værdier i den nye række vha. makro?
- Sub Macro4()
- Dim lRow As Long
- For lRow = Cells(Cells.Rows.Count, "F").End(xlUp).Row To 3 Step -1
- If Cells(lRow, "F") <> Cells(lRow - 1, "F") Then Rows(lRow).EntireRow.Insert
- Next lRow
- End Sub
Venligste hilsner, Kevin.