11
Automatische E-Mail bei Dateiänderung verschicken
Mit Excel automatische Benachrichtigung
Hallo!
Ich habe eine Excel Datei die von mehreren Usern bearbeitet werden muss.
Es gibt Techniker die Einträge in die Liste vornehmen und im Backoffice eine Person die zu diesem Eintrag weitere Einträge vornehmen muss.
Die Person im Backoffice ist leider überwiegend in einem anderen Programm unterwegs, so kommt es desöfteren vor, dass die Liste nicht abgearbeitet wird.
Gibt es für die Lösung des Problems einen VBA Code, der eine E-Mail an das Backoffice schickt wenn ein Techniker in dieser Liste etwas verändert hat?
Alternativ dass vielleicht eine "net send" Nachricht verschickt wird, oder ein anderes PopUp aufgeht.
Für Tipps oder gar Lösungen bin ich sehr dankbar!
Lg.
Ich habe eine Excel Datei die von mehreren Usern bearbeitet werden muss.
Es gibt Techniker die Einträge in die Liste vornehmen und im Backoffice eine Person die zu diesem Eintrag weitere Einträge vornehmen muss.
Die Person im Backoffice ist leider überwiegend in einem anderen Programm unterwegs, so kommt es desöfteren vor, dass die Liste nicht abgearbeitet wird.
Gibt es für die Lösung des Problems einen VBA Code, der eine E-Mail an das Backoffice schickt wenn ein Techniker in dieser Liste etwas verändert hat?
Alternativ dass vielleicht eine "net send" Nachricht verschickt wird, oder ein anderes PopUp aufgeht.
Für Tipps oder gar Lösungen bin ich sehr dankbar!
Lg.
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 64617
Url: https://administrator.de/contentid/64617
Printed on: April 18, 2024 at 00:04 o'clock
11 Comments
Latest comment
Hallo viewpoint!
Wenn "net send" eine Option ist, könntest Du im einfachsten Fall den folgenden Code (nach Anpassung von "UserName") in ein Modul der entsprechenden Datei legen und mit einer Schaltfläche in der Tabelle verknüpfen:
Dann müsste nach einer Änderung der Techniker nur die Schaltfläche anklicken. Falls keine Rückmeldung für den Klick benötigt wird, einfach die "MsgBox"-Zeile weglassen.
Grüße
bastla
Wenn "net send" eine Option ist, könntest Du im einfachsten Fall den folgenden Code (nach Anpassung von "UserName") in ein Modul der entsprechenden Datei legen und mit einer Schaltfläche in der Tabelle verknüpfen:
Sub Benachrichtigen()
R = Shell("cmd /c net send UserName Excel-Datei " & ThisWorkbook.FullName & " geändert!", vbHide)
MsgBox "Benachrichtigung gesendet."
End SubGrüße
bastla
Hallo!
Besten Dank für die rasche Antwort!
Jetzt müsste ich nur noch wissen, wie ich im Excel das Modul unter die Befehlsschaltfläche bekomme!?
Das war doch irgendwas mit "Rechte Maustaste - Modul hinzufügen" oder sowas
Besten Dank für die rasche Antwort!
Jetzt müsste ich nur noch wissen, wie ich im Excel das Modul unter die Befehlsschaltfläche bekomme!?
Das war doch irgendwas mit "Rechte Maustaste - Modul hinzufügen" oder sowas
Ah - ich kann eine Schaltfläche in der Menüleiste hinzufügen und mit dem Modul belegen - klappt das im Sheet selbst nicht mit einer Befehlsschaltfläche?
Hallo viewpoint!
Du kannst aus der Symbolleiste "Formular" eine "klassische" Schaltfläche verwenden oder auch zB einem ClipArt oder einer AutoForm per Kontextmenü das "Makro zuweisen..."
Grüße
bastla
Du kannst aus der Symbolleiste "Formular" eine "klassische" Schaltfläche verwenden oder auch zB einem ClipArt oder einer AutoForm per Kontextmenü das "Makro zuweisen..."
Grüße
bastla
Hallo!
Das mit den Grafiken und ClipArts hab ich auch schon rausgefunden.
Besten Dank für die großartige Unterstützung!
Ich hab dieses gleich erweitert mit "Speichern" und "Schließen".
Das mit den Grafiken und ClipArts hab ich auch schon rausgefunden.
Besten Dank für die großartige Unterstützung!
Ich hab dieses gleich erweitert mit "Speichern" und "Schließen".
Hallo nochmal!
lässt sich die IP oder das Kürzel das bei net send verwendet wird, auch mit einer Variable verschicken?
Wenn es 2 mögliche Personen gibt, die diese Nachricht empfangen sollen, aber nicht beide auf einmal, dass man in irgendeine Zelle das Kürzel schreibt, das dann verwendet werden soll?
Danke, lg.
lässt sich die IP oder das Kürzel das bei net send verwendet wird, auch mit einer Variable verschicken?
Wenn es 2 mögliche Personen gibt, die diese Nachricht empfangen sollen, aber nicht beide auf einmal, dass man in irgendeine Zelle das Kürzel schreibt, das dann verwendet werden soll?
Danke, lg.
Hallo viewpoint!
Die einfachste Möglichkeit wäre, eine Zelle mit dem Namen "Username" zu versehen und die folgende Version zu verwenden:
Falls in der entsprechenden Zelle kein Empfänger eingetragen ist, wird der Empfängername abgefragt. Wird auch hier keine Eingabe gemacht, kann die Benachrichtigung nicht versendet werden.
Grüße
bastla
Die einfachste Möglichkeit wäre, eine Zelle mit dem Namen "Username" zu versehen und die folgende Version zu verwenden:
Sub Benachrichtigen()
strUserName = Range("UserName").Value
If strUserName = "" Then strUserName = InputBox("Bitte den Empfänger der Benachrichtigung angeben!")
If strUserName <> "" Then
R = Shell("cmd /c net send " & strUserName & " Excel-Datei " & ThisWorkbook.FullName & " geändert!", vbHide)
MsgBox "Benachrichtigung gesendet."
Else
MsgBox "Benachrichtigung wurde nicht gesendet.", vbCritical
End If
End SubGrüße
bastla
Hallo!
Klappt wunderbar! Besten Dank!
Klappt wunderbar! Besten Dank!
Hallo bastla,
Vorabinfo: verwendet wird Outlook 2007 und Excel 2007
habe selbes Problem nur das ich bei Änderung einer Excel 2007 Datei einen E-Mailverteilerkreis informieren möchte.
Wenn möglich sollte die E-Mail folgendes enthalten.
Die Zeilennummern wo die Änderungen vorgenommen wurden,
noch besser wäre es wenn die Zellnnummern angegeben würden.
Weiter sollte es automatisch zum E-Mailversenden kommen.
Wenn das möglich ist wäre ich für ein Beispiel dankbar.
Hintergund ist: es existiert eine riesige Freigabedatei auf die mehrer Anwender zugreifen und Änderungen vornehmen. Nun soll der betreffende Kreis der Anwender informiert werden wenn eine Änderung in dieser Datei vorgenommen wurde.
Gruß utroger
Vorabinfo: verwendet wird Outlook 2007 und Excel 2007
habe selbes Problem nur das ich bei Änderung einer Excel 2007 Datei einen E-Mailverteilerkreis informieren möchte.
Wenn möglich sollte die E-Mail folgendes enthalten.
Die Zeilennummern wo die Änderungen vorgenommen wurden,
noch besser wäre es wenn die Zellnnummern angegeben würden.
Weiter sollte es automatisch zum E-Mailversenden kommen.
Wenn das möglich ist wäre ich für ein Beispiel dankbar.
Hintergund ist: es existiert eine riesige Freigabedatei auf die mehrer Anwender zugreifen und Änderungen vornehmen. Nun soll der betreffende Kreis der Anwender informiert werden wenn eine Änderung in dieser Datei vorgenommen wurde.
Gruß utroger
Hallo utroger!
Dein Problem ist (zumindest nach dem, was ich Deiner Beschreibung entnehme) in wesentlichen Details anders gelagert - daher bitte einen neuen Thread erstellen (und dort dann zumindest einmal genauer beschreiben, wodurch konkret der Versand der Mail ausgelöst werden soll) ...
Grüße
bastla
Dein Problem ist (zumindest nach dem, was ich Deiner Beschreibung entnehme) in wesentlichen Details anders gelagert - daher bitte einen neuen Thread erstellen (und dort dann zumindest einmal genauer beschreiben, wodurch konkret der Versand der Mail ausgelöst werden soll) ...
Grüße
bastla
ok bastla, werde einen neuen Thread anlegen.
Gruß utroger
Gruß utroger
