|
E-Mail : Termine aus Excel in Outlook
benewet am 27.05.2008 um 12:52 Uhr (0)
Also ich hab das Ganze jetzt mal in Excel eingebaut. Hat soweit auch funktioniert.ABER: Irgendwas stimmt nicht. Zum Einen kommen Erinnerungen auf!Zum Anderen wird das Datum irgendwie auf das Jahr 1899 gesetzt. Hab auch schon mehreres ausprobiert in Sachen Format. Hat alles nix genutzt. Eine Sache ist noch. Wie baue ich die Dauer des Termins ein, also im Code? Das mit dem Betreff, sprich der Schicht selbst geht klar und der Beginn (in Zelle B2) auch.Code:Private Sub CommandButton1_Click()E 2000Dim OutApp As ...
| | In das Form E-Mail wechseln |
|
E-Mail : Termine aus Excel in Outlook
benewet am 23.05.2008 um 13:44 Uhr (0)
Mahlzeit.Hab mal eine Frage. Möchte gerne den Arbeitsplan meiner Freundin in Outlook importieren lassen. Hab auch schon gegoogelt aber konnte leider nichts passendes finden, da ich blutiger Nicht-VBA-Könner bin. Hab neulich im Heissen Eisen ne Datei hochgeladen, wo die Fussballtermine der EM übertragen werden können. Hab mir das VBA-Skript mal angesehen, aber bin daraus leider überhaupt nicht schlau geworden.Macht das noch jemand mit dem Übertragen. vielleicht ja sogar einfacher oder ist die einzig noble l ...
| | In das Form E-Mail wechseln |
|
E-Mail : Termine aus Excel in Outlook
benewet am 27.05.2008 um 10:59 Uhr (0)
Hab mir mal den Code etwas zugeschnitten:Code:Sub Excel_Control_Termin_nach_Outlook()E 2000Dim OutApp As Outlook.ApplicationDim OutApp As Object, apptOutApp As ObjectHier beginnen die TermineRange("B2").SelectDo Until ActiveCell.Value = "" Set OutApp = CreateObject("Outlook.Application") Set apptOutApp = OutApp.CreateItem(1) olAppointmentItem) With apptOutApp Datum und Uhrzeit .Start = Format(ActiveCell.Value, "dd.mm.yyyy") & " 06:00" Dauer. Angabe ist jeweils in ganzen Minuten zu setzen Ter ...
| | In das Form E-Mail wechseln |
|
E-Mail : Termine aus Excel in Outlook
benewet am 27.05.2008 um 10:11 Uhr (0)
Hallo Runkelruebe.Es wäre natürlich möglich, den Schichten Uhrzeiten zuzordnen, das wäre das kleinste Problem, wenn auch trotzdem die Schicht "Früh" usw. als Name mitübernommen wird.Hab mir mal auf der Seite den Code angeschaut:Code:Sub Excel_Control_Termin_nach_Outlook()E 2000Dim OutApp As Outlook.ApplicationDim OutApp As Object, apptOutApp As ObjectHier beginnen die TermineRange("A2").SelectDo Until ActiveCell.Value = "" Set OutApp = CreateObject("Outlook.Application") Set apptOutApp = OutApp.CreateIte ...
| | In das Form E-Mail wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
