Herzlich Willkommen, lieber Gast!
  Sie befinden sich hier:

  Forum » Visual Basic 6.0 / VBA » Kalender schließen

Forum | Hilfe | Team | Links | Impressum | > Suche < | Mitglieder | Registrieren | Einloggen
  Quicklinks: MSDN-Online || STL || clib Reference Grundlagen || Literatur || E-Books || Zubehör || > F.A.Q. < || Downloads   

Autor Thread - Seiten: > 1 <
000
30.09.2008, 14:10 Uhr
mimi1983



Hi all,

möchte in Outlook mit einem Button ein mein Kalender öffnen und mit einem weiteren schließen.
Da ich ein Neuling bin, weiß ich nicht wie ich das realisieren soll.

Was ich bisher zusammen gebastelt habe :


Sub Mein_Button1()
Dim cmbStandard As CommandBar
Set cmbStandard = Application.ActiveExplorer.CommandBars("Standard")
With cmbStandard.Controls.Add
.BeginGroup = True
.Caption = " IN "
.Style = msoButtonCaption
.OnAction = "Test"
End With
End Sub



Sub Test()

Set myOLApp = CreateObject("Outlook.Application")
Set myNameSpace = myOLApp.GetNamespace("MAPI")
Set MyFolder = myNameSpace.GetDefaultFolder(olFolderCalendar)
Set MyItems = MyFolder.Items

' Hier wird die Besprechungsanfrage/Termin zugewiesen "Mein_Form"
' Das Formular muss zuerst veröffentlicht werden
Set MyItem = MyItems.Add("ipm.Appointment.Mein_Form")
MyItem.Display


End Sub


Danke
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
Seiten: > 1 <     [ Visual Basic 6.0 / VBA ]  


ThWBoard 2.73 FloSoft-Edition
© by Paul Baecher & Felix Gonschorek (www.thwboard.de)

Anpassungen des Forums
© by Flo-Soft (www.flo-soft.de)

Sie sind Besucher: