Microsoft Excel — Brauche dringend Hilfe!

[Fulli]

Ahoi!

Bin gerade in der Ferialpraxis und muss eine riesige Tabelle in Microsoft Excel bereinigen und formatieren.
Dazu brauch ich eure Hilfe ... http://mitglied.lycos.de/fullover/2.gif

Ich möchte, dass Excel alle Zellen zum Beispiel in der Spalte "H" abfragt und, sollte in einer Zelle etwas drinnen stehn, die darunterliegende Zeile löscht.
Das soll irgendwie mit einem Makro gehn ...
Hat irgendjemand von euch Ahnung, wie ich das machen kann? :???:

MfG Fulli :)

P.S.: "abfragt" oder "abfrägt"? :freak:

[Banana]

Probier mal mit einem Makro, sowas zuschreiben mit


For a = 1 To biszumende
If $Ha <> "" Then ($Ha + 1) = ""
Next a

[Gast]

Original geschrieben von Banana
Probier mal mit einem Makro, sowas zuschreiben mit


For a = 1 To biszumende
If $Ha <> "" Then ($Ha + 1) = ""
Next a
Thx für die Hilfe, aber irgendwie bringt mich das nicht weiter ... :freak2:

[Lokadamus]

mmm...

Ich hoffe erstmal, du hast eine Sicherungskopie von dem Teil erstellt. Ansonsten kannst du dir mal den Befehl ISTLEER anschauen und die darunterliegende Zeile solltest du dadurch löschen können, das du sie mit "" fühlst oder gibt es den Befehl delete? ... Die H- Reihe markiert man irgendwie mit (H1:H99), wobei du dann von H1 bis H 99 alle überprüfst ... zu lange her, das ich mich damit beschäftigt habe und meine alte Kiste etwas zu lahm, als das ich hier jetzt eine komplette Zeile bastel ...

[Lord Nikon]

Sub Schaltfläche1_BeiKlick()
Worksheets("Tabelle1").Activate
For i = 1 To 45 // Wert anpassen
If Cells(i, 8).Value <> "" Then
Worksheets("Tabelle1").Cells(i + 1, 8).Value = ""
End If
Next i
MsgBox ("Fertig")


End Sub