Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
500to504
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
500to504
500to504
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zelle finden

Zelle finden
14.10.2004 21:33:51
Barbara
hallo
bitte wie geht dieses Makro, das folgendes kann:
Schreibe in die erste freie Zelle der Zeile 1 "Name", falls es nicht schon wo da steht.
Irgend wie krieg ich das nicht auf die Reihe.
Danke, Barbara.

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zelle finden
ransi
hallo
versuch mal so:
Public

Sub t()
Dim zelle As Range
If WorksheetFunction.CountIf(Range("1:1"), "Name") > 0 Then Exit Sub
For Each zelle In Range("1:1")
If zelle.Value = "" Then
zelle.Value = "Name"
Exit For
End If
Next
End Sub

ransi
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige