2
Outlook Skript zum Auffüllen einer ComboBox mit Abhängigkeit
Moinsen,
ich habe hier ein Aufgabenformular erstellt mit zwei ComboBoxen.
Box 1 habe ich bereits, über die Eigenschaften, mit Werten gefüllt. Nun möchte ich, das sobald ich in der Box 1 einen Eintrag auswähle, automatisch Box 2 mit speziellen Einträgen gefüllt wird. Als Beispiel:
In Box1 wird der Eintrag "Ball" ausgewählt
In Box2 sollen daraufhin folgende Begriffe zu Auswahl stehen: "Pumpe";"Ventil";"Leder"
Wird in Box1 nun ein anderer Eintrag ausgewählt sollen sich logischerweise auch die Auswahlmöglichkeiten in Box2 ändern.
Mit dem aus Excel bekannten VBA komm ich irgendwie nicht weiter. Hat jemand eine Idee wie man solch ein Script aufbauen kann ?
Vielen Dank!
ich habe hier ein Aufgabenformular erstellt mit zwei ComboBoxen.
Box 1 habe ich bereits, über die Eigenschaften, mit Werten gefüllt. Nun möchte ich, das sobald ich in der Box 1 einen Eintrag auswähle, automatisch Box 2 mit speziellen Einträgen gefüllt wird. Als Beispiel:
In Box1 wird der Eintrag "Ball" ausgewählt
In Box2 sollen daraufhin folgende Begriffe zu Auswahl stehen: "Pumpe";"Ventil";"Leder"
Wird in Box1 nun ein anderer Eintrag ausgewählt sollen sich logischerweise auch die Auswahlmöglichkeiten in Box2 ändern.
Mit dem aus Excel bekannten VBA komm ich irgendwie nicht weiter. Hat jemand eine Idee wie man solch ein Script aufbauen kann ?
Vielen Dank!
Auf Facebook teilen
Auf Twitter teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 106537
Url: https://administrator.de/contentid/106537
Ausgedruckt am: 26.11.2024 um 18:11 Uhr
2 Kommentare
Neuester Kommentar
ich habe dir auf deinen anderen Beitrag geantwortert
Visual Basic in einem selbsterstellen Formular (Outlook) benutzen
Visual Basic in einem selbsterstellen Formular (Outlook) benutzen
Hier eine Lösung für alle die es interessiert ;>
Sub Item_CustomPropertyChange(ByVal Name)
Set formTab = Item.GetInspector.ModifiedFormPages("Aufgabe")
Set varFirma = formTab.Controls("Quell_Combo")
If varFirma.value = "Ball" then
Set comboChoice = formTab.Controls("Ziel_Combo")
comboChoice.PossibleValues = "Pumpe;Ventil"
End If
End Sub
Sub Item_CustomPropertyChange(ByVal Name)
Set formTab = Item.GetInspector.ModifiedFormPages("Aufgabe")
Set varFirma = formTab.Controls("Quell_Combo")
If varFirma.value = "Ball" then
Set comboChoice = formTab.Controls("Ziel_Combo")
comboChoice.PossibleValues = "Pumpe;Ventil"
End If
End Sub
