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

Forumthread: Farbe eines Frames ändern!

Farbe eines Frames ändern!
30.03.2007 13:54:06
Raphael
Hallo Excelianer
ich habe mal wieder eine Frage!
Wie kann ich bei meinem in der User Form eingebauten rahmen die Farbe ändern?
Bei der Userform funktioniert es hiermit:

Private Sub UserForm_Activate()
Me.BackColor = RGB(83, 83, 74)
End Sub

aber warum nicht bei einem Frame?
Danke
Raphael
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Farbe eines Frames ändern!
30.03.2007 14:00:57
Hoffi
Hallo,
geht doch:
Frame1.BackColor = RGB(83, 83, 74)
ergibt Hintergrundfarbe dunkelgrau...
Grüße
Hoffi
bei mir nicht :-(
30.03.2007 14:06:00
Raphael
Hier ncoh mal ein bsp!
was mach ich falsch?
https://www.herber.de/bbs/user/42.xls
Danke
MFG
raphael
Anzeige
Danke!!
30.03.2007 14:13:00
Raphael
Sorry habe meine Fehler selber gefunden!
ich musste das einfach nur mit in die UserForm Formel mit einbauen! ich habe es immer in eine Seperate gepackt!!
Danke
MFG
rapahel
AW: bei mir nicht :-(
30.03.2007 14:17:00
Hoffi
Hallo,
das Frame hat kein Activate Ereignis.
Probier mal:

Private Sub Frame1_Click()
Frame1.BackColor = RGB(83, 83, 74)
End Sub
Private Sub UserForm_Activate()
Me.BackColor = RGB(83, 83, 74)
End Sub
gib aber dem Frame vorher eine andere BackColor in den Eigenschaften, damit Du die Veränderung auch siehst.
Grüße
Hoffi
P.S. Me bezieht sich immer auf die aktuelle UserForm, nicht auf Controls darauf...
Anzeige
AW: bei mir nicht :-(
30.03.2007 14:21:34
Raphael
Danke
Bei mir schaut es jetzt so aus:

Private Sub UserForm_Activate()
Me.BackColor = RGB(83, 83, 74)
Frame1.BackColor = RGB(83, 83, 74)
Frame2.BackColor = RGB(83, 83, 74)
Frame3.BackColor = RGB(83, 83, 74)
Frame5.BackColor = RGB(83, 83, 74)
Frame6.BackColor = RGB(83, 83, 74)
Frame7.BackColor = RGB(83, 83, 74)
Label1.BackColor = RGB(83, 83, 74)
End Sub
Aber wie bekomme ich es hin, dass die Namen der Frames eine bestimmte von mir deffinierte Farbe bekommen? gibt es dafür auch eine Lösung?
Danke
MFG
raphael
Anzeige
AW: bei mir nicht :-(
02.04.2007 09:43:31
Hoffi
Hallo,
ich versteh grad net, was Du vor hast...
Warum stellst Du die Farben nicht in den Einstellungen ein, wenn alle Controls die gleiche Farbe haben.
Das Label kannst Du auch auf durchsichtig stellen...
Grüße
Hoffi
;
Anzeige
Anzeige

Infobox / Tutorial

Farbe eines Frames ändern in Excel


Schritt-für-Schritt-Anleitung

Um die Farbe eines Frames in einer UserForm zu ändern, folge diesen Schritten:

  1. Öffne die Excel-Datei, in der Du die UserForm erstellen möchtest.

  2. Gehe in den VBA-Editor (Alt + F11).

  3. Füge eine neue UserForm hinzu, indem Du mit der rechten Maustaste auf "Projekt" klickst und "Einfügen" > "UserForm" wählst.

  4. Füge einen Frame zu Deiner UserForm hinzu.

  5. Füge den folgenden Code in das Code-Fenster der UserForm ein:

    Private Sub UserForm_Activate()
       Me.BackColor = RGB(83, 83, 74)
       Frame1.BackColor = RGB(83, 83, 74)
    End Sub
  6. Um sicherzustellen, dass die Farbe geändert wird, gehe zu den Eigenschaften des Frames und stelle die BackColor auf eine andere Farbe, bevor Du den Code ausführst.


Häufige Fehler und Lösungen

  • Problem: Die Farbe des Frames ändert sich nicht wie erwartet.

    • Lösung: Stelle sicher, dass Du die BackColor des Frames in den Eigenschaften auf eine andere Farbe setzt, bevor Du den Code ausführst.
  • Problem: Der Code wird nicht ausgeführt.

    • Lösung: Überprüfe, ob der Code im richtigen Modul der UserForm eingefügt wurde. Der Code Frame1.BackColor = RGB(83, 83, 74) sollte innerhalb der UserForm-Aktivierungsprozedur stehen.

Alternative Methoden

Eine alternative Methode zur Änderung der Rahmenfarbe ist die Verwendung des Click-Ereignisses. Du kannst den folgenden Code verwenden:

Private Sub Frame1_Click()
    Frame1.BackColor = RGB(83, 83, 74)
End Sub

Diese Methode ermöglicht es Dir, die Farbe des Frames zu ändern, wenn der Benutzer auf den Frame klickt.


Praktische Beispiele

Hier ist ein Beispiel, um alle Rahmenlinien in einer UserForm gleichzeitig zu ändern:

Private Sub UserForm_Activate()
    Dim i As Integer
    For i = 1 To 7
        Me.Controls("Frame" & i).BackColor = RGB(83, 83, 74)
    Next i
End Sub

Mit diesem Code kannst Du die Farbe aller definierten Rahmenlinien in der UserForm ändern und so die rahmenlinien excel farbe ändern Aufgabe effizient umsetzen.


Tipps für Profis

  • Verwende benutzerdefinierte Farben: Du kannst die RGB-Werte anpassen, um benutzerdefinierte Farben für Deine Rahmenlinien zu erstellen. Experimentiere mit verschiedenen Werten, um die gewünschte Farbe zu finden.
  • Einstellungen anpassen: Wenn alle Rahmenlinien die gleiche Farbe benötigen, kannst Du die BackColor in den Eigenschaften der jeweiligen Controls einstellen, anstatt sie im Code zu definieren.

FAQ: Häufige Fragen

1. Wie kann ich die Farbe aller Rahmenlinien in meiner UserForm ändern? Du kannst die Farbe aller Rahmenlinien ändern, indem Du eine Schleife verwendest, um durch die Frames in Deiner UserForm zu iterieren und deren BackColor mit RGB anzupassen.

2. Warum funktioniert die UserForm_Activate Methode nicht für Frames? Frames haben kein Activate-Ereignis. Stattdessen kannst Du das Click-Ereignis oder die UserForm_Activate Methode verwenden, um die Farbe beim Aktivieren der UserForm zu ändern.

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