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

Überall BgColor ändern

Überall BgColor ändern
29.08.2007 10:04:00
Barsch
Hiho!
Ist es möglich, via Makro, von allen Objekten auf der aktuellen Seite die Hintergrundfarbe zu ändern? Also vor allem auch Textfelder usw, nicht nur Zellen. Es geht nämlich darum, dass ich vorm Drucken alles weiß machen will, damit mans sieht.
lg

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

Betreff
Datum
Anwender
Anzeige
AW: Überall BgColor ändern
29.08.2007 10:56:00
Ingo

Sub objecte_weiß()
Dim oo As OLEObject
For Each oo In ActiveSheet.OLEObjects
oo.Object.BackColor = RGB(255, 255, 255)
Next oo
End Sub


mfG
Ingo Christiansen

AW: Überall BgColor ändern
29.08.2007 12:34:00
Beverly
Hi,
Textfelder und andere Objekte, die als Shape angesprochen werden können, lassen sich auf einen Ritt mit diesem Code weiß einfärben

Sub einfaerben()
ActiveSheet.Shapes.SelectAll
Selection.ShapeRange.Fill.ForeColor.RGB = RGB(255, 255, 255)
End Sub


________________________________________

Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige