Thema Datum  Von Nutzer Rating
Antwort
Rot Variable im Ordnerpfad verschachteln
17.03.2021 16:17:21 VBARookie
NotSolved
17.03.2021 17:29:08 volti
Solved
17.03.2021 17:39:24 Gast66443
NotSolved

Ansicht des Beitrags:
Von:
VBARookie
Datum:
17.03.2021 16:17:21
Views:
134
Rating: Antwort:
  Ja
Thema:
Variable im Ordnerpfad verschachteln

Hallo zusammen, 

bin gerade dabei meinen Outlook Kalender nach Excel per VBA zu exportieren und mein Code sieht folgendermaßen aus:
 

Sub OutlookCalendarItemsExport()


Dim o As Outlook.Application, R As Long
Set o = New Outlook.Application

Dim ons As Outlook.Namespace
Set ons = o.GetNamespace("MAPI")

Dim myfol As Outlook.Folder
Dim calname As String

calname = Worksheets("Daten").Range("I2").Value

Set myfol = Session.GetDefaultFolder(olFolderCalendar).Folders("Ferien 2021")


Dim myapt As Outlook.AppointmentItem

Worksheets("Daten").Range("h4:j4").Value = Array("Betreff", "Beginn", "Ende")
R = 5

For Each myapt In myfol.Items

    Cells(R, 8).Value = myapt.Subject
    Cells(R, 9).Value = myapt.Start
    Cells(R, 10).Value = myapt.End

R = R + 1


Next

Set o = Nothing
Set ons = Nothing
Set myfol = Nothing
Set myapt = Nothing
End Sub

 

Nun weiß ich nicht wie ich meine Variable calname (Kalendername) in die Variable myfol (My Folder) als Ordner bekomme damit der Code Variabel ist und nicht je nach Kalender umgeschrieben werden muss.

Ich habe schon folgendes probiert:

 

Set myfol = Session.GetDefaultFolder(olFolderCalendar).Folders("& calname &")



Jedoch ohne Erfolg...ist fast schon dämlich das ich nicht drauf komme, aber hoff das evtl. jemand von euch weiter weiß.

Mit freundlichen Grüßen 
VBARookie oder bald auch VBARookieOfTheYear ;)



 


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 Variable im Ordnerpfad verschachteln
17.03.2021 16:17:21 VBARookie
NotSolved
17.03.2021 17:29:08 volti
Solved
17.03.2021 17:39:24 Gast66443
NotSolved