Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
764to768
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
764to768
764to768
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Null einsetzen

Null einsetzen
22.05.2006 12:46:55
Henning
Hallo.
Ich habe folgendes Ziel:
Ich möchte in einem Tabellenblatt in einer Range alle Zellen ohne Wert mit dem Wert Null ausstatten.
Über Hilfe würde ich mich freuen.
Lieben Gruß
Henning

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Null einsetzen
22.05.2006 12:57:03
Dr.
Hi,

Sub test()
dim c as range
for each c in activesheet.cells
if c.value = "" then c.value = 0
next c
End Sub

AW: Null einsetzen
22.05.2006 13:01:48
Reinhard
Hi Henning,
Sub tt()
Dim Zelle As Range
For Each Zelle In ActiveSheet.UsedRange.Cells
If Zelle.Value = "" Then Zelle.Value = 0
Next Zelle
End Sub

Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
AW: Null einsetzen
22.05.2006 13:15:01
Tassos
Hallo,
So:

Sub test()
Range("A1:A100").SpecialCells(xlCellTypeBlanks).Value = 0
End Sub

Gruss
Tassos
Anzeige
AW: Null einsetzen
22.05.2006 13:15:34
Henning
Hallo Reinhard, hallo Dr.,
beide Versionen funktionieren super. Vielen Dank!
Grüße
Henning

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige