Thema Datum  Von Nutzer Rating
Antwort
Rot Aufgabenerstellung Outlook
 01.02.2017 17:25:47 Arbeiter
NotSolved

Ansicht des Beitrags:
Von:
Arbeiter		 Datum:
01.02.2017 17:25:47		 Views:
884		 Rating:
     
Antwort:
  Ja
Thema:
Aufgabenerstellung Outlook

Guten Tag Zusammen,

 

ich habe folgendes vor.

 

Ich möchte ein Makro erstellen, welches automatisch AUfgaben per Outlook an Kollegen versendet. Die Empfänger sollen über Checkboxen ausgewählt werden, sowie der Name der Aufgabe über Texteingabe erstellt werden.

Hier mein bisheriger "Vortschritt". Ich bekomme es jhedoch einfach nicht hin die Verbindung zwischen Formular und dem Code herzustellen.. Bin absoluter Anfänger muss ich dazu sagen.

Um Hilfe bin ich dankbar !!

 

Hier die Form:

und der Text zur Form:

Private Sub CheckBox1_Click()

End Sub

Private Sub CheckBox2_Click()

End Sub

Private Sub CheckBox3_Click()

End Sub

Private Sub CheckBox4_Click()

End Sub

Private Sub CheckBox5_Click()

End Sub

Private Sub CommandButton1_Click()
FormAufgabenerstellung.Hide
End Sub

Private Sub Label9_Click()

End Sub

Private Sub TextBox1_Change()

End Sub

Private Sub TextBox2_Change()

End Sub

Private Sub TextBox3_Change()

End Sub

Private Sub UserForm_Click()

End Sub

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Unload Me
End Sub

Und hier der Code ansich:


Sub AssignTask()

FormAufgabenerstellung.Show

 Dim myItem As Outlook.TaskItem
 
 Dim myDelegate As Outlook.Recipient
 
 Set myItem = Application.CreateItem(olTaskItem)
 
 myItem.Assign
 
 Set myDelegate = myItem.Recipients.Add("beispiel@beispiel.de")
 
 myDelegate.Resolve
 
 If myDelegate.Resolved Then
 
 myItem.Subject = ""
 
 myItem.DueDate = Now + 30
 
 myItem.Display
 
 myItem.Send
 
 End If
 
End Sub

 

 

DANKE !!

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:



  • 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
Rot Aufgabenerstellung Outlook
 01.02.2017 17:25:47 Arbeiter
NotSolved