Excel Tabelle in Outlook Kalender Importieren
|
Autor |
Nachricht |
Passy
Neuling
Verfasst am: 30. Sep 2005, 11:28 Rufname:
|
|
|
|
Hallo zusammen,
ich versuche schon seit Tagen eine Excel Tabelle in mein Outlook Kalender zu importieren. Frage an euch, ist das überhaupt möglich?
Wenn ja, wie? Denn jedes mal wenn ich das mache zeigt er mir zwar an das er etwas speichert, aber im Kalender kommt nix.!
Mit freundlichen Grüssen
Passy
|
|
Tobias113
(VBA, VB6 als Hobby) .Net ein bisschen mehr

Verfasst am: 06. Okt 2005, 23:15 Rufname:
|
| |
|
|
Hallo
Ich mache es anders herum un exportiere von excel nach outlook...
Wie sehen denn die Termine aus(die ExcelTabelle)?
_________________ MfG
Tobias
Es gibt keine Dummen Fragen....
Wer nicht Fragt bleibt Dumm
|
|
EPler
Gast
Verfasst am: 24. Okt 2005, 16:41 Rufname:
|
|
|
|
HAllo,
genau das Problem hab ich auch. Ich möchte auch Termine die ich in einer Excel-Tabelle habe ins Outlook übertragen, wie auch immer exportieren oder importieren.
Wie muß die Excel Datei denn aussehen? Bzw. wie exportiere ich sie dann?
Gruß Thomas
|
|
kraemer
OfficeVersteher

Verfasst am: 24. Okt 2005, 16:55 Rufname:
Wohnort: Berlin
|
|
|
|
Hallo Thomas,
exportiere einfach mal aus Outlook eine Exceldatei und passe deine entsprechen an. Zu beachten ist das meistens mit einem Hochkomma " ' " die Zelle als Text markiert wird.
Gruß Mathias
_________________ "Als ich von den schlimmen Folgen des Trinkens las, gab ich sofort das Lesen auf."
|
|
Tobias113
(VBA, VB6 als Hobby) .Net ein bisschen mehr

Verfasst am: 24. Okt 2005, 18:48 Rufname:
|
| |
|
|
Also hab da mal was aus dem Netz gesucht..... ( ist schon was länger her... deswegen kann ich leider nicht mehr sagen woher und von Wem das geschrieben wurde)
Anpassungen hab ich allerdings vorgenommen.....
Code: |
Option Explicit
Sub Excel_Control_Termin_nach_Outlook()
'E 2000 ' Für Excel 200
'Dim OutApp As Outlook.Application ' Diese Beiden Wieder ein nehmen
Dim TerminText As String
Dim OutApp As Object, apptOutApp As Object
Dim Spalte, SpalteN As Variant
Dim b, i, x As Integer
TerminText = [A4]
'Hier beginnen die Termine
Range("B2").Select
For i = 2 To 32 'Die Schleife müsste evtl angepasst werden (Derzeit waagerecht Ab B2)
Set OutApp = CreateObject("Outlook.Application")
Set apptOutApp = OutApp.CreateItem(1) 'olAppointmentItem)
With apptOutApp
.Start = Format(ActiveCell.Value, "dd.mm.yyyy") & " 08:00"
'Termininfo
.Subject = [A3]
.body = TerminText 'Zusätzlicher Text (der der Im Termin stehen soll)
'.Location = 'ort
.Duration = "5"
.ReminderMinutesBeforeStart = 10
.ReminderPlaySound = True
'Erinnerung wiederholen
.ReminderSet = True
'Termin speichern
.Save
End With
ActiveCell.Offset(0, 1).Select 'Nächste Zelle auswählen
Set apptOutApp = Nothing 'Variablen leeren!!!
Set OutApp = Nothing
Next i
MsgBox "Termine an Outlook übertragen!"
End Sub
|
Code muss natürlich noch ein bisschen angepasst werden da ich keinerlei Infos zu den Tabellen hatte....
Hoffe das ist etwas was ihr brauchen könnt....
_________________ MfG
Tobias
Es gibt keine Dummen Fragen....
Wer nicht Fragt bleibt Dumm
|
|
| Mathias |
Gast
Verfasst am: 08. Nov 2005, 16:39 Rufname:
|
|
|
|
Also ich würde auch gerne ne Exceltabelle erstellen, in der Termine dann automatisch in Outlook geladen werden, aber durch Knopfdruck!
Habe es natürlich andersrum versucht und die Tabelle dementsprechend angepasst. Da aber viele Laien bei mir arbeiten und den Import in Outlook nicht verstehen, hätte ich es gerne, dass sich in Excel bei jedem Termin ein "Button" befindet und die Person, die diesen Termin im Outlook haben möchte, dies durch einfaches "klicken" erreichen kann.
Ähm ja, also ich halte VBA für chinesisches Essen
Wäre über eine einfache Hilfestellung sehr erfreut!
|
|
ae
Mein Name ist Ente

Verfasst am: 08. Nov 2005, 17:02 Rufname: Andreas
Wohnort: Reppenstedt bei Lüneburg
|
|
|
|
Hallo,
Ramses hat das sehr ausführlich hier beschrieben -
http://www.online-excel.de/excel/singsel_vba.php?f=89
Viel spaß beim "chinesisch essen" und pass auf das dir mit den Stäbchen nicht die Augen ausstichst -
_________________ Gruß
Andreas E
------
Oh Mann, ich fühl mich heute wie =DATEDIF(DATUM(1961;6;12);HEUTE();"y") Jahre alt
|
|
| Mathias |
Gast
Verfasst am: 08. Nov 2005, 17:45 Rufname:
|
|
|
|
hi nochmal...
mit der Anleitung kann ich nichts anfangen, da dieser Kontakte importiert und keine Termine...
Ich weiß nicht, wie die Variablen für Kalendereinträge lauten...
Sodele, dann hab ich mal rumgespiel mit folgendem Code
Private Sub CommandButton1_Click()
Dim TerminText As String
Dim OutApp As Object, apptOutApp As Object
Dim Spalte, SpalteN As Variant
Dim b, i, x As Integer
TerminText = [A4]
'Hier beginnen die Termine
Range("B2").Select
For i = 2 To 3 'Die Schleife müsste evtl angepasst werden (Derzeit waagerecht Ab B2)
Set OutApp = CreateObject("Outlook.Application")
Set apptOutApp = OutApp.CreateItem(1) 'olAppointmentItem)
With apptOutApp
.Start = Format(ActiveCell.Value, "dd.mm.yyyy") & " 08:00"
'Termininfo
.Subject = [A3]
.body = TerminText 'Zusätzlicher Text (der der Im Termin stehen soll)
'.Location = 'ort
.Duration = "5"
.ReminderMinutesBeforeStart = 10
.ReminderPlaySound = True
'Erinnerung wiederholen
.ReminderSet = True
'Termin speichern
.Save
End With
ActiveCell.Offset(0, 1).Select 'Nächste Zelle auswählen
Set apptOutApp = Nothing 'Variablen leeren!!!
Set OutApp = Nothing
Next i
MsgBox "Termine an Outlook übertragen!"
End Sub
Er trägt das ganze auch ein aber immer als 30. Dezember 1899 um 08 Uhr. Mein Format habe ich in Excel angepasst!
|
|
Tobias113
(VBA, VB6 als Hobby) .Net ein bisschen mehr

Verfasst am: 08. Nov 2005, 19:18 Rufname:
|
|
|
|
Könnte es sein das du in der Zelle B2 nicht´s oder zumindest kein Datum stehen hast???
_________________ MfG
Tobias
Es gibt keine Dummen Fragen....
Wer nicht Fragt bleibt Dumm
|
|
| Mathias |
Gast
Verfasst am: 09. Nov 2005, 10:44 Rufname:
|
|
|
|
Nein, ich hatte schon das Datum drin stehen in B2, aber ich HELD hatte noch ne Uhrzeit mitreingenommen, aber die ist ja schon vordefiniert auf 8.00 Uhr... wie gesagt... Chinesisch für mich -> Aber danke für den tollen Support hier!
Wie bekomm ich jetzt noch diesen Command Button in meine eigentliches Sheet?
|
|
Tobias113
(VBA, VB6 als Hobby) .Net ein bisschen mehr

Verfasst am: 09. Nov 2005, 14:07 Rufname:
|
|
|
|
Über Ansicht > Symbolleisten > Steuerelemente Toolbox > dort den Commandbutton anklicken und in der Tabelle platzieren.....
_________________ MfG
Tobias
Es gibt keine Dummen Fragen....
Wer nicht Fragt bleibt Dumm
|
|
| Mathias |
Gast
Verfasst am: 09. Nov 2005, 17:18 Rufname:
|
|
|
|
et läuft... ich verreck... et läuft...
Abschließende Frage:
Gibt es Probleme, wenn jemand ein anderes Zahlenformat in Excel eingestellt hat? Ich nehme an, den bei meiner Kollegin kommt ne Fehlermeldung in der Zeile vom Datum.
Als ich dann das ganze in dd/mm/yyyy geändert habe, ging es bei Ihr...
Gibt es ne allgemeine Lösung? Oder muss man dem User sagen, was er für ein Format einstellen muss?
|
|
| Mathias |
Gast
Verfasst am: 09. Nov 2005, 17:20 Rufname:
|
|
|
|
hier noch der code
Private Sub CommandButton10_Click()
Dim OutApp As Object, apptOutApp As Object
Dim Spalte, SpalteN As Variant
Dim b, i, x As Integer
'Hier beginnen die Termine
Range("B36").Select
For i = 2 To 6 'Die Schleife müsste evtl angepasst werden (Derzeit waagerecht Ab B2)
Set OutApp = CreateObject("Outlook.Application")
Set apptOutApp = OutApp.CreateItem(1) 'olAppointmentItem)
With apptOutApp
.Start = Format(ActiveCell.Value, "dd/mm/yyyy") & " 09:00"
'Termininfo
.Subject = [B37]
'.Location = 'ort
.Duration = "10"
.ReminderMinutesBeforeStart = 10
.ReminderPlaySound = True
'Erinnerung wiederholen
.ReminderSet = True
'Termin speichern
.Save
End With
ActiveCell.Offset(0, 1).Select 'Nächste Zelle auswählen
Set apptOutApp = Nothing 'Variablen leeren!!!
Set OutApp = Nothing
Next i
MsgBox "Termine an Outlook übertragen!"
End Sub
|
|
Tobias113
(VBA, VB6 als Hobby) .Net ein bisschen mehr

Verfasst am: 09. Nov 2005, 18:36 Rufname:
|
|
|
|
Also wenn ich dich richtig verstanden habe, steht (bzw. stand) in der Zelle B36 bei deiner Kollegin eine Zahl? was war es denn für eine Zahl? Oder besser kommt die aus einer Formel ?...
Normaslerweise sollte Excel eine Zahl im Format 01.01.2005 als Datum erkennen und dieses auch so einstellen...
Wenn die Zahl als Text erkannt wird ( kann beim reinschreiben über VBA passieren) dann wird es nicht als Datum erkannt...
_________________ MfG
Tobias
Es gibt keine Dummen Fragen....
Wer nicht Fragt bleibt Dumm
|
|
Gast
Verfasst am: 10. Nov 2005, 16:38 Rufname:
|
| |
|
|
alles in Ordnung --- läuft und schnurrt wie ein Kätzle...
ein gutes Gefühl so etwas mal gemacht zu haben 8)
|
|
Du kannst Beiträge in dieses Forum schreiben. Du kannst auf Beiträge in diesem Forum antworten. Du kannst deine Beiträge in diesem Forum nicht bearbeiten. Du kannst deine Beiträge in diesem Forum nicht löschen. Du kannst an Umfragen in diesem Forum nicht mitmachen. Du kannst Dateien in diesem Forum nicht posten Du kannst Dateien in diesem Forum herunterladen
|
|
|
Verwandte Themen |
Forum / Themen |
Antworten |
Autor |
Aufrufe |
Letzter Beitrag |
 |
Outlook Mail: Outlook sperrt Dateianhang |
11 |
marcus |
26078 |
10. Jul 2008, 21:11 Gast  |
 |
Outlook Mail: Kann plötzlich nicht mehr versenden (Outlook 2000) |
5 |
schmix |
1539 |
04. Jan 2005, 14:41 kraemer  |
 |
Outlook Mail: Hilfe! Filterregel für Outlook 2002 - nicht vom Server laden |
1 |
ulli |
2132 |
07. Jun 2004, 11:54 JoernZ  |
 |
Outlook Mail: Massenmail mit Outlook verschicken - wie? |
1 |
Kareau |
14749 |
22. Mai 2004, 09:53 domin8tor  |
 |
Outlook Mail: Outlook geht nicht |
2 |
Frank Jensen |
5230 |
11. Mai 2004, 20:24 Frank Jensen  |
 |
Outlook Mail: Mail-Duplikate in Outlook 2003 autom. löschen |
5 |
GermanKraut77 |
4694 |
29. Apr 2004, 17:22 domin8tor  |
 |
Outlook Mail: VB - Outlook Konten erstellen |
1 |
EinProgger |
4603 |
22. Apr 2004, 12:09 EinProgger  |
 |
Outlook Mail: Posteingang Outlook XP - Inhalt wird nicht angezeigt |
0 |
erati |
4288 |
14. Apr 2004, 11:26 erati  |
 |
Outlook Mail: Bilder werden bei Office Outlook nicht angezeigt ??!! |
5 |
Gobbo |
13298 |
13. Apr 2004, 17:24 Amethyst  |
 |
Outlook Mail: öffnen von jpg im outlook 2003 HiLFE!!!! |
4 |
desmodue |
6525 |
05. Apr 2004, 14:15 domin8tor  |
 |
Outlook Mail: Automatischer Versand mit Outlook oder Outlook Express |
1 |
Otto |
3564 |
10. März 2004, 09:51 domin8tor  |
 |
Outlook Mail: Teilweise Probleme mit dem E-Mailversand unter Outlook 2003 |
16 |
Bjoerni |
4712 |
09. März 2004, 17:23 Gast  |
|
|