Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Steuern von Outlook über ein Excel VBA Makro

Frage Entwicklung VB for Applications

Mitglied: matt1967

matt1967 (Level 1) - Jetzt verbinden

30.08.2010 um 12:35 Uhr, 5260 Aufrufe, 1 Kommentar

Hallo zusammen, ich hoffe einer von Euch kann mir den richtigen Tipp geben oder mich zumindest in
die richtige Richtungen lenken.

Ich habe ein Excel Makro geschrieben und in diesem Makro ist ein Teilbreich das automatische setzen von Terminen.
Das setzen von Termin funktioniert auch ohne Probleme, nur muss ich in einigen Fällen gewisse Aussnahmen oder Abhängigkeiten beachten
und da fängt mein Problem an.

Der Code sieht im Moment so aus:

Private Sub CommandButton7_Click()
Dim olAppt As Outlook.AppointmentItem
Set olAppt = olApp.CreateItem(olAppointmentItem)

olAppt.Start = Now() + (720# / 24# / 60#)

' Setup other appointment information...
With olAppt
.Duration = 10
.Subject = "Status MLP Ausfall" + " " + Me.TextBox1.Value + " " + "Bitte auf event. notwendigen Cacti Eintrag überprüfen"
.Body = ""
.Location = "Office"
.ReminderMinutesBeforeStart = 30
.ReminderSet = True
End With
End Sub
Was ich jetzt möchte ist folgendes. Nehmen wir an der Eintrag wird um 12:30 gesetzt, dann soll das Makro die Differenz von Now bis 22:00 PM rechnen und diesen Wert dann automatisch an Stelle für xxx eintragen (xxx# / 24# / 60#).
Ich habe so etwas wie Zeiten berechnen leider noch nie gemacht und habe ehrlich gesagt nich einmal den Ansatz einer Ahnung

;-(

Danke schon mal für Eure Hilfe

Gruß
Matthias
Mitglied: 76109
30.08.2010 um 12:52 Uhr
Hallo matt1967!

In etwa so:
01.
Dim Differenz As Date 
02.
     
03.
Differenz = DateAdd("h", 22, Date) - Now
Gruß Dieter
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
gelöst CSV-Datei mit einem VBA Makro in Excel einlesen und leicht anpassen (5)

Frage von JoSiBa zum Thema Microsoft Office ...

Microsoft Office
Unterordner durchsuchen Excel VBA (1)

Frage von schwalbepilot zum Thema Microsoft Office ...

Microsoft Office
gelöst Excel VBA: Automatische Konvertierung von Textdatei (.txt) zu Exceldatei (.xlsx) (7)

Frage von Booster07 zum Thema Microsoft Office ...

Neue Wissensbeiträge
Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(9)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Windows 10

Das Windows 10 Creators Update ist auf dem Weg

(6)

Anleitung von BassFishFox zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Batch & Shell
gelöst ZIP-Archive nach Dateien durchsuchen und Pfade ausgeben (33)

Frage von evinben zum Thema Batch & Shell ...

Router & Routing
Routingproblem in Homerouter-Kaskade mit Raspi (20)

Frage von Oldschool zum Thema Router & Routing ...

Exchange Server
Exchange 2016 Standard Server 2012 R2 Hetzner Mail (14)

Frage von Datsspeed zum Thema Exchange Server ...

Verschlüsselung & Zertifikate
Mit Veracrypt eine zweite interne (non-system) Festplatte verschlüsseln (9)

Frage von Bernulf zum Thema Verschlüsselung & Zertifikate ...