Herbers Excel-Forum - das Archiv

leere Zelle suchen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: leere Zelle suchen
von: Joachim

Geschrieben am: 14.02.2005 08:11:08
Hallo liebes Forum,
ich versuche mit untenstehender Anweisung die erste leere Zelle in einer tabell zu finden um dort einen Eintrag zu machen. Ich hab diese aus einenm Buch abgeschrieben leider bekomme ich in der 5. zeile ( For Each.....) eine Fehlermeldung.
Kann mir jemand weiterhelfen?
Noch eine Frage: Was bedeuten die eckigen Klammern und wie schreibt mann die auf der Tastatur?
Im voraus vielen Dank
Gruß Joachim

Private Sub CommandButton2_Click()
Dim GesellschaftZelle As Range
Dim Spalte As Variant, zeile As Variant
'Auftrag übertragen
For Eache GesellschaftZelle = In [A:A]
If IsEmpty(GesellschaftZelle) = True Then Exit For
Next
GesellschaftZelle = ActiveCell
End Sub

Bild

Betrifft: AW: leere Zelle suchen
von: Jan

Geschrieben am: 14.02.2005 08:19:36
Hi Joachim,
Hast den Code bestimmt falsch abgeschrieben. Probier mal diesn:
Private Sub CommandButton2_Click()
Dim GesellschaftZelle As Range
Dim Spalte As Variant, zeile As Variant
'Auftrag übertragen
For Each GesellschaftZelle  In [A:A]
If IsEmpty(GesellschaftZelle) = True Then Exit For
Next
GesellschaftZelle = ActiveCell
End Sub


Jan
Bild

Betrifft: AW: leere Zelle suchen
von: Joachim
Geschrieben am: 14.02.2005 08:32:52
Danke das war der Fehler
Gruß Joachim
 Bild
Excel-Beispiele zum Thema "leere Zelle suchen"
Zellinhalt suchen und Zelle auswählen Suchbegriff über mehrere Tabellenblätter suchen.
Suchen und weitersuchen Zahl +/- 1 suchen
Ein Zeichen in einer Formel suchen Datum suchen und Wert eintragen
Wert in Tabelle suchen und in UserForm ausgeben Letzte Zelle mit Inhalt suchen
Textdatei nach Begriff durchsuchen und Fundzeile importieren Wert in Array suchen, ohne jedes Datenfeld abzufragen