Access-o-Mania

Access-Forum (Deutsch/German) => Access Programmierung => Thema gestartet von: lutschi83 am Januar 26, 2015, 08:48:16

Titel: E-Mail Empfänger via Bedingung auswählen?
Beitrag von: lutschi83 am Januar 26, 2015, 08:48:16
Hallo, kann ich E-Mail-Empfänger anhand einer Bedingung auswählen?
Ich habe ein Textfeld, dass angezeigt wird, wenn eine bestimmte Bedingung erfüllt wird.
Ist dieses sichtbar und man geht auf E-Mail senden, sollen sich die Empfänger ändern...

Vielen Dank schon einmal für eure Hilfe!
Titel: Re: E-Mail Empfänger via Bedingung auswählen?
Beitrag von: MaggieMay am Januar 26, 2015, 10:33:59
Hi,
ZitatIst dieses sichtbar und man geht auf E-Mail senden, sollen sich die Empfänger ändern...
mir ist absolut nicht klar was du da vorhast. Wie sollen sich die Empfänger (Plural?!) ändern?
Woher kommen sie (bzw. sollen sie genommen werden) und welche Bedeutung hat das Textfeld?
Titel: Re: E-Mail Empfänger via Bedingung auswählen?
Beitrag von: lutschi83 am Januar 26, 2015, 11:16:21
Also im Moment habe ich im VBA-Code zwei Empfänger drin stehen,

Private Sub button_email_Click()
Dim myOutlApp As Object
Dim myMail As Object

Set myOutlApp = CreateObject("Outlook.Application")
Set myMail = myOutlApp.CreateItem(olMailItem)

With myMail
    .To = "bla.bla@test.de; bl.bl@test.de"

das funktioniert auch einwandfrei. nur jetzt möchte ich halt, wenn die Bedingung erfüllt wird, dass automatisch noch ein anderer Name hinzugefügt wird...
   
Titel: Re: E-Mail Empfänger via Bedingung auswählen?
Beitrag von: MaggieMay am Januar 26, 2015, 11:33:49
Man kann weiterhin nur raten. Meinst du das so vielleicht:    If Me.textfeld.Visible Then
        .To = "bla.bla@test.de; bl.bl@test.de; Blub@test.de"
    Else
        .To = "bla.bla@test.de; bl.bl@test.de"
    End If
?
Titel: Re: E-Mail Empfänger via Bedingung auswählen?
Beitrag von: lutschi83 am Januar 26, 2015, 14:59:23
Super!!!!
Genial!!!
Funktioniert einwandfrei!