Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 10:28:49
16.10.2025 17:40:39
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

leere Felder ersetzen

Forumthread: leere Felder ersetzen

leere Felder ersetzen
09.12.2004 12:10:55
Andy1980
Hallo,
hab ne Frage. Ich möchte ein Makro erstellen, das mir auf Knopfdruck die Zellen E13 bis E264 durchsucht und in alle Zellen, in denen kein Wert steht den Wert 1 schreibt.
Kann mir irgendjemand weiterhelfen?
Liebe Grüße
Andreas
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: leere Felder ersetzen
Jan
Hi Andreas,
Ein erster Ansatz anbei mit einem Schleifenkonstrukt:

Sub ersetzen()
'Das folgende Beispiel bearbeitet in einer Schleife
'die Zellen A1:J4 in Tabelle1. Hat eine dieser Zellen
'einen Wert 0 wird dieser
'Wert durch Null Wert1=5 ersetzt.
Dim rwindex, colindex
Wert1 = 5
For rwindex = 1 To 4
For colindex = 1 To 10
With Worksheets("Tabelle1").Cells(rwindex, colindex)
If .Value = "" Then .Value = Wert1
End With
Next colindex
Next rwindex
End Sub

Suchst Du solch eine Lösung?
Jan
Anzeige
AW: leere Felder ersetzen
Uduuh
Hallo,
muss es unbedingt VBA sein?
E13:E264 markieren, Bearbeiten-Gehe zu-Inhalte-leere Zellen. 1 eingeben, STRG+Enter. Fertig.
Gruß aus'm Pott
Udo

;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige