Top-Themen

Aktuelle Themen (A bis Z)

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
GELÖST

Makros im Outlook

Frage Microsoft Microsoft Office

Mitglied: CeMeNt

CeMeNt (Level 2) - Jetzt verbinden

29.01.2009, aktualisiert 09:10 Uhr, 6559 Aufrufe, 6 Kommentare

Moin Leute,

ich habe einen SBS2003 inkl. Outlook2003.

Ich hoffe, mir kann jemand bei der Erstellung von Makros behilflich sein.

Folgendes möchte ich erreichen:

Ich brauche eine Schaltfläche auf einem Kontakt-Formular (z.B. mit der Bezeichnung "Neue Buchung")
Wenn darauf geklickt wird, dann soll folgendes passieren:

1.) Es wird eine neue Aufgabe im Ordner "Kunden Buchungen" angelegt
2.) In dieser Aufgabe ist automatisch das Feld "Kontakt" gefüllt mit dem Kontakt-Namen des gerade aktiven Kontakts.

Was habe ich bereits?
- Angepasstes Kontakt-Formular mit der (noch nutzlosen) Schaltfläche "Neue Buchung"
- Verlinkung der "Aktivitäten" zum Ordner "Kunden Buchungen"
- Angepasstes Aufgaben-Formular (enthält u.a. das Feld "Kontakt"

Was möchte ich erreichen?
- Zu den Kunden-Kontakten sollen alle entsprechenden Buchungen verknüpft werden können
- So kann man jederzeit sehen, welche Aufträge für den Kunden erfüllt wurden und z.B. wie hoch die Schlußrechnungs-Summe war
- Im zweiten Schritt soll dann noch ein Ausdruck möglich sein, der nach verschieden Kriterien sortiert/gefiltert wird. (aber dazu später mehr).

Was fehlt?
Nun brauche ich ein Makro, was beim Klicken auf die Schaltfläche "Neue Buchung" die oben genannten Funktionen ausführt

Vielen Dank schon mal für Eure Hilfe,

Gruß CeMeNt
Mitglied: Trax83
30.01.2009 um 12:11 Uhr
HI CeMeNt,

ich find das ist wie mit allem: Vorkauen werd ich dir aber nicht alles


Also im Kontaktformular folgenden VBScript einfügen (wer Fehler findet, darf sie behalten):

Sub CommandButton1_Click()
Set FolderAufgaben = Application.Session.Folders.Item("Öffentliche Ordner").Folders("Alle öffentlichen Ordner").Folders("Kunden Buchungen")
Set Aufgabe = FolderAufgaben.Items.ADD
Aufgabe.ItemProperties.Item("Kontakt").value = FullName 'Ich würde aber lieber die EntryID des Kontakts eintragen, besser zu identifizieren
Aufgabe.Save
End Sub


hoffe, damit konnte man dir weiter helfen.


Mfg
Trax
Bitte warten ..
Mitglied: CeMeNt
30.01.2009 um 14:26 Uhr
Moin Trax83,

heute hatte ich leider keine Zeit, Dein Makro zu testen.

Sieht aber (so weit ich das beurteilen kann/darf) schon echt super aus.

Keine Angst, ich will ja gar nicht alles vorgekaut bekommen.
Aber mal sehen, wie weit ich damit schon kommen werde.

Vielen Dank schon mal, und ein schönes Wochenende

CeMeNt
Bitte warten ..
Mitglied: Trax83
30.01.2009 um 17:31 Uhr
Würde dir wie oben bereits geschrieben, aber vorschlagen, im Aufgabenelement nicht den Namen des Kontakts, sondern die EntryID einzutragen....

Dann würde ich im Aufgabenformular:

Function Item_Open()
Set MyPage = Item.GetInspector.ModifiedFormPages("S.2")
MyPage.TextBox1.Text = Application.Session.GetItemFromID(ItemProperties.Item("Kontakt").value).FullName
MyPage = Nothing
End Function


Auch bei gleichem Namen, wird die Aufgabe sicher nur dem einem Kontakt zugeordnet.
Bitte warten ..
Mitglied: CeMeNt
03.02.2009 um 17:33 Uhr
Moin Trax,

hmmm, vielleicht bräuchte ich die Häppchen doch noch etwas kleiner...

Wenn ich die "Funktion Item_Open()"-Geschichte ins Aufgabenformulat einfüge, so kommt beim Öffnen einer Aufgabe eine Fehlermeldung:

Zeile 3:

Laufzeitfehler im Microsoft VBScript: Objekt erforderlich: 'ItemProperties.Item(...)'


Deinen ersten Vorschlag habe ich ins Kontakt-Formular eingefügt.
Aber es passiert weiterhin nichts, wenn ich auf meine Schaltfläche drücke.

Vielleicht noch einmal genauer, was ich erreichen möchte:

Wenn man auf einem beliebigen Kontakt rechtsklickt, dann gibt es im Kontextmenü den Punkt
"Neue Aufgabe für den Kontakt"

Das Problem dabei ist, dass diese Aufgabe aber immer im persönlichen Ordner landet.

Ich möchte nun per Schaltfläche im Kontakt-Formular erreichen, dass genau so eine neue Aufgabe erzeugt wird, nur dass diese eben automatisch in einem öffentlichen Ordner gespeichert wird.

Wäre super, wenn Du noch mal einen Tipp für mich hättest.

Danke, Gruß CeMeNt
Bitte warten ..
Mitglied: Trax83
04.02.2009 um 07:27 Uhr
Morgen CeMeNt,

also hab mir das gerade auch nochmal erst ansehen müssen.....

wie ich das sehe, gibs da grds zwei möglichkeiten für dich das zu realisieren...

1. Du nutzt die bereits im AppointmentItem vorhandene Eigenschaft "Links". Das Standardformular von Aufgaben hat ja bereits ein Feld "Kontakte", dann brauchst du nur im benutzerdefinierten Kontaktformular einen Button einfügen mit (Code nur z.B. keine Ahnung ob der so läuft, mit Appointment hab ich ehrlich gesagt noch nie was machen müssen):
Sub CommandButton1_Click() 
  Set FolderAufgaben = Application.Session.Folders.Item("Öffentliche Ordner").Folders("Alle öffentlichen Ordner").Folders("Kunden Buchungen") 
  Set Aufgabe = FolderAufgaben.Items.Add 
  Aufgabe.Links.Add(Application.Session.GetItemFromID(EntryID)) 
  ' Aufgabe.Save 
  Aufgabe.Display 
End Sub

2. oder du machst es wie bereits oben beschrieben. Fehlermeldung ist klar, da in einem Normalen AppointmentItem ja auch kein benutzerdefiniertes Feld "Kontakt" vorhanden ist, welches du ja mit Formular ausführen erzeugst.... eine abfrage mit "if not isnothing" kann da helfen. Der Code oben sollte natürlich nur bei einem bereits durch das Kontaktformular erzeugten AufgabenObjekt funzen.


ich tendiere aber eher zu Variante 1... jetzt sollte Aufgabe mit Display auch angezeigt werden.

Mfg
Trax
Bitte warten ..
Mitglied: CeMeNt
04.02.2009 um 08:01 Uhr
Moin Trax!

Perfekt! Es funktioniert!

Ich habe nun den letzten Code (1.) in meinKontaktformular eingebaut.
Für die Aufgaben verwende ich bisher das ganz normale Standard-Formular.

Und nun funktioniert es genau so, wie ich es mir gedacht hatte!

Vielen Dank und einen schönen Tag noch!

Gruß CeMeNt
Bitte warten ..
Ähnliche Inhalte
VB for Applications
Excel Makros
Frage von chaos2goVB for Applications2 Kommentare

Hallo Gemeinde, File Größe über 500k Einträge Steigend . ich bekomme Monatlich ein Raw Dump aus unserer DB als ...

Microsoft Office
Outlook 2010 Makros für Domain-User signieren
Frage von ArtistoMicrosoft Office1 Kommentar

Hallo zusammen, Ich habe mir ein kleines VBA-Script für Outlook 2010 geschrieben, dass ich bereits erfolgreich mit einem Code-Zertifikat ...

Microsoft Office
Keine Aktivierung von Makros möglich
gelöst Frage von 113320Microsoft Office1 Kommentar

Hallo, ich habe bei einer Excel-Datei das Problem, dass dort Makros hinterlegt sind. 9 von 10 Usern können diese ...

VB for Applications
Makros in Funktionen umwandeln
Frage von 123660VB for Applications7 Kommentare

Guten Tag und frohes Neues Jahr, ich suche Hilfe bei der Thema Makros umwandeln ? ich arbeite mit Excel ...

Neue Wissensbeiträge
Sicherheit

Meltdown und Spectre: Realitätscheck

Information von Frank vor 27 MinutenSicherheit

Die unangenehme Realität Der Prozessorfehler mit seinen Varianten Meltdown und Spectre ist seit Juni 2017 bekannt. Trotzdem sind immer ...

Sicherheit

Meltdown und Spectre: Die machen uns alle was vor

Information von Frank vor 51 MinutenSicherheit9 Kommentare

Aktuell sieht es in den Medien so aus, als hätten die Hersteller wie Intel, Microsoft und Co den aktuellen ...

Microsoft

Update KB4073578 für AMD CPU (Spectre und Meltdown Lücke)

Information von sabines vor 7 StundenMicrosoft

Wegen Problemen (BOSD, nicht startende PCs) wurde das Update KB4056897 und KB4056894 für AMD CPUs zurückgezogen. Dieses Update KB4073578 ...

Mac OS X

MacOS wo ist die Tilde ?

Tipp von Alchimedes vor 20 StundenMac OS X4 Kommentare

Hallo, ich hab eine MacOS qwertz Keyboard auf US Layout umgestellt da die Sonderzeichen besser erreichbar sind. Leider fehlt ...

Heiß diskutierte Inhalte
Batch & Shell
Anmeldevorgang für Informatikraum (Schule) unter Windows
gelöst Frage von IngenieursBatch & Shell27 Kommentare

Hey zusammen, ich werde in naher Zukunft den Informatik Raum meiner jetzigen Schule von dem aktuellen Betreiber übernehmen (Vertrag ...

Windows 10
Netbook erkennt Soundkarte nicht - keinerlei Info zum Hersteller und Modell vom Netbook und Hardware bekannt
Frage von 92943Windows 1025 Kommentare

Guten Tag, meine Schwester reist in einigen Wochen für ein paar Monate ins Ausland und hat sich dafür ein ...

Batch & Shell
AD-Abfrage in Batchdatei und Ergebnis als Variable verarbeiten
gelöst Frage von Winfried-HHBatch & Shell19 Kommentare

Hallo in die Runde! Ich habe eine Ergänzungsfrage zu einem alten Thread von mir. Ausgangslage ist die Batchdatei, die ...

Netzwerkgrundlagen
Welches Modem für VDSL 50000 der T-Com
Frage von Windows10GegnerNetzwerkgrundlagen18 Kommentare

Hallo, ein Kollege von mir will sich VDSL50000 von der T-Com holen, um daran einen Server zu betreiben. Ich ...