Thema Datum  Von Nutzer Rating
Antwort
20.08.2019 00:33:28 Jessica
Solved
20.08.2019 00:43:47 Jessica
NotSolved
20.08.2019 00:48:09 Gast47486
*****
Solved
Blau Userform Titelleiste je nach Combobox Auswahl ändern
 21.08.2019 00:25:24 Jessica
NotSolved
21.08.2019 08:58:18 KleinerC
*****
Solved
21.08.2019 19:14:36 Gast92215
NotSolved

Ansicht des Beitrags:
Von:
Jessica		 Datum:
21.08.2019 00:25:24		 Views:
924		 Rating:
     
Antwort:
  Ja
Thema:
Userform Titelleiste je nach Combobox Auswahl ändern

Ahh, vielen Dank Gast47486, das hat mir weitergeholfen :)

Habe nun ein weiteres Problem. Ich soll laut Aufgabe die Monate und Wochentage nicht per Hand in den Quellcode schreiben, finde aber keinen Weg.

Je nach gewählten Monat soll in einem Label ausgegeben werden "Der Monat Juli ist im August!" und die Hintergrundfarbe des UserForms soll sich je nach Jahreszeit ändern. Wie kann ich umgehen, die Monatsnamen von Hand in den Code zu schreiben? Habe jetzt das hier, was funktioniert aber die Aufgabe ist ja nicht wirklich erfüllt.

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub cmb_Monate_Change()
    Select Case Me.cmb_Monate
        Case "Dezember", "Januar", "Februar"
            lbl_Monat_gewaehlt.Caption = "Der Monat " & cmb_Monate.Value & " ist im Winter!"
                UserForm1.BackColor = RGB(171, 245, 251)
        Case "März", "April", "Mai"
            lbl_Monat_gewaehlt.Caption = "Der Monat " & cmb_Monate.Value & " ist im Frühling!"
                UserForm1.BackColor = RGB(159, 251, 147)
        Case "Juni", "Juli", "August"
            lbl_Monat_gewaehlt.Caption = "Der Monat " & cmb_Monate.Value & " ist im Sommer!"
                UserForm1.BackColor = RGB(243, 245, 94)
        Case "September", "Oktober", "November"
            lbl_Monat_gewaehlt.Caption = "Der Monat " & cmb_Monate.Value & " ist im Herbst!"
                UserForm1.BackColor = RGB(248, 167, 100)
    End Select
     
End Sub

 

LG, Jessica

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:
WYSIWYG-Editor, ctl00_Content_editor1



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
20.08.2019 00:33:28 Jessica
Solved
20.08.2019 00:43:47 Jessica
NotSolved
20.08.2019 00:48:09 Gast47486
*****
Solved
Blau Userform Titelleiste je nach Combobox Auswahl ändern
 21.08.2019 00:25:24 Jessica
NotSolved
21.08.2019 08:58:18 KleinerC
*****
Solved
21.08.2019 19:14:36 Gast92215
NotSolved