Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1660to1664
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
Inhaltsverzeichnis

Textfeld 62 Farbe zuweisen

Textfeld 62 Farbe zuweisen
05.12.2018 09:37:26
sigrid
Guten Morgen zusammen,
ich möchte gern einem Texfeld die Hintergrund Farbe per Makro ändern.
Bei : ActiveSheet.OptionButton1.BackColor = &HC0C0FF 'hellrot
klappt es aber hier bekomme ich es nicht hin.
Sub Makro2()
ActiveSheet.Textfeld 62.TextFrame.Characters.Font.Color = &HC0C0FF
gruß sigrid

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textfeld 62 Farbe zuweisen
05.12.2018 09:39:35
Torsten
Hallo,
ich glaube nicht, dass da ein Leerzeichen zwischen Textfeld und 62 hingehoert.
Gruss Torsten
AW: Textfeld62 so auch...
05.12.2018 09:46:58
sigrid
Guten Morgen Torsten,
so klappt es auch nicht Sub Makro2()
ActiveSheet.Textfeld62.TextFrame.Characters.Font.Color = &HC0C0FF
habe den Namen auf ohne Leerzeichen geändert.
gruß
sigrid
AW: Textfeld62 so auch...
05.12.2018 09:48:47
sigrid
Guten Morgen Torsten,
so klappt es auch nicht Sub Makro2()
ActiveSheet.Textfeld62.TextFrame.Characters.Font.Color = &HC0C0FF
habe den Namen auf ohne Leerzeichen geändert.
Fehlermeldung: Laufzeitfehler 438, Objekt unterstützt die Eigenschaft oder Methode nicht.
gruß
sigrid
Anzeige
AW: Textfeld62 so auch...
05.12.2018 10:09:33
Werner
Hallo Sigrid,
geht bei mir mit RGG so:
Sub Makro2()
With ActiveSheet.Shapes("Textfeld 62")
.TextFrame2.TextRange.Characters.Font.Fill.ForeColor.RGB = RGB(255, 0, 0)
End With
End Sub
Gruß Werner
AW: Textfeld 62 Farbe zuweisen
05.12.2018 10:14:20
Rudi
Hallo,
ActiveSheet.Shapes("textfeld 62").DrawingObject.Font.Color = &HC0C0FF
Gruß
Rudi
Ja aber der Hintergrund...
05.12.2018 10:30:05
sigrid
Guten Morgen Rudi und Werner,
beide klappt aber nur die Schrift !
Ich möchte den Hintergrund verändern !
gruß
sigrid
.Interior statt .Font. owT
05.12.2018 10:40:35
Rudi
Rudi klappt auch !!! Danke an Euch BEIDE !
05.12.2018 10:47:25
sigrid
AW: Textfeld 62 Farbe zuweisen
05.12.2018 10:35:51
Torsten

Sub Makro2()
ActiveSheet.Textfeld 62.TextFrame.Characters.Font.Color = &HC0C0FF

Anzeige
AW: Textfeld 62 Farbe zuweisen
05.12.2018 10:37:15
Torsten
Das war dein Versuch und da versuchst du die Schriftfarbe zu veraendern. Deshalb haben die beiden darauf reagiert.
AW: Textfeld 62 Farbe zuweisen --))
05.12.2018 10:44:00
sigrid
Hallo Torsten,
leider klappt es nicht.
Habe dies gerade gefunden:
ActiveSheet.Shapes("Textfeld 62").Fill.ForeColor.SchemeColor = 57 'grün
so wird der Hintergrund geändert.
Schönen Tag noch...
gruß sigrid

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige