ich möchte folgendes:
wenn eine der Zellen Zeile A6:A88 leer ist, aus der Spalte B6:B88 den Inhalt in die leere gefundene Zelle einfügen
Kann mir jemand Helfen
Gruß
Uwe
=WENN(A6="";B6;A6)
Formel bis C88 ziehen.
Sub Schaltfläche10_Klicken()
Dim raZelle As Range
For Each raZelle In Range("A6:A88")
raZelle = IIf(raZelle = "", raZelle.Offset(, 1), raZelle)
Next raZelle
End Sub
Gruß WernerDie erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen