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

Zelleninhalt löschen und auf standard

Zelleninhalt löschen und auf standard
16.08.2004 14:51:09
Andy
Hi Freunde der VBA,
habe einen VBA Code um bei Aktiven Zellen den Inhalte zu löschen. Das Problem ist das er mir die Farbe die vorher in der Zelle war nicht ändert auf Standard schwarz und nicht Fett. Kann mir jemand helfen das wenn ich den Zelleninhalt lösche das Format der Zelle auf Schrift Schwarz und nicht Fett oder Kursiv also Standard gesetzt wird.

Sub Zelleleeren()
Dim Zelle As Range
For Each Zelle In Selection
If Zelle.Locked = False Then Zelle = xlPlotted
Next Zelle
End 

Sub
Hoffe ihr könnt mir helfen
Gruß Andreas

		

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zelleninhalt löschen und auf standard
Ulf
Wo hast du denn diese Konstante her, xlPlotted?

Sub Zelleleeren()
Dim Zelle As Range
For Each Zelle In Selection
If Zelle.Locked = False Then Zelle.clear
Next Zelle
End 

Sub
Ulf

Danke Ulf . O.T.
Andreas
o.T
AW: Zelleninhalt löschen und auf standard
harry
hi andreas,

Sub Zelleleeren()
Dim Zelle As Range
For Each Zelle In Selection
If Zelle.Locked = True Then
Zelle.Clear
Zelle.ColorIndex = xlAutomatic
Zelle.Font.Bold = False
Zelle.Font.Italic = False
End If
Next Zelle
End Sub

liebe grüße,
harry
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige