Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Excel file automatisch per GMAIL versenden (?)
#1
Sad 
Hej zusammen!

Nach langem suchen und lesen muss ich meine Frage nun doch stellen, da ich leider kein vergkeichbares Thema gefunden habe. Huh

Ich habe eine Excel file, in der in verschiedenen Arbeitsblätern verschiedene user Daten befüllen.
In einem der Blätter werden Werte aus anderen Blättern überprüft.
Wenn einer dieser Werte einen bestimmten Wert überschreitet "warnt" mich Excel nun ganz simpel, in dem es die Zeile mit einer bedingten Formatierung rot markiert. Exclamation
So, alles schön und gut. Nun möchte ich aber nicht ständig in die file sehen müssen, ob vielleicht eine Zeil rot markiert ist; denn nur die roten Zeilen würden mich interessieren.

Meine Idee nun (bzw. die Frage):
Kann ich im Excel eine logik hinterlegen, das ich eine email erhalte, sobald einer dieser Werte überschritten wurde? Also sobald eine Zeile rot markiert wurde? Huh   Huh   Huh


Das Problem dabei ist aber auch, dass ich KEIN Outlook habe, sondern nur gmail :@


DANKE!! :15:
Antworten Top
#2
Hi,

(11.08.2016, 08:40)alexander.liedauer schrieb: Das Problem dabei ist aber auch, dass ich KEIN Outlook habe, sondern nur gmail :@

Outlook hat ja primär gar nichts mit dem Mail-Provier zu tun, ob Du nun Deinen Mail-Account bei Web oder gmx oder yahoo oder gmail hast, das ist Outlook egal. Outlokk ist nur das Frontend für den Account.

Gibt es bei gmail ein Frontend oder ist das nur ein Account, der mit beliebigen Mail-Programmen (Outlook, Thunderbird, Lotus Notes, ...) oder nur online genutzt wird?
Antworten Top
#3
Also ich nutze  GMAIL nur über meinen online account. Sprich über meinen (Chrome) browser.
Sozusagen hab ich keinerlei mail-software installiert,...
Antworten Top
#4
Hi Alexander,

(12.08.2016, 08:26)alexander.liedauer schrieb: Also ich nutze  GMAIL nur über meinen online account. Sprich über meinen (Chrome) browser.
Sozusagen hab ich keinerlei mail-software installiert,...

ich mag mich täuschen, aber ich glaube, das geht dann nicht!
Antworten Top
#5
Moin!
Eine Suche führte mich zu CDO
http://www.blueclaw-db.com/access_email_gmail.htm

Störe Dich nicht an Access, hier geht es ja um das CDO.Message-Objekt, welches in jeder VBA-Anwendung funktionieren sollte.

Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. 
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Antworten Top
#6
So, probiert und für gut befunden!  :05:

Ich habe mir gerade eine Email an mich selbst geschrieben.
(EMail-Addi und Kennwort  :21: wurden natürlich verfremdet)
xyz aufrufen:

Sub xyz()
send_email
End Sub

Public Function send_email()
Dim cdomsg As Object
Set cdomsg = CreateObject("CDO.message")
With cdomsg.Configuration.Fields
  .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 'NTLM method
  .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
  .Item("http://schemas.microsoft.com/cdo/configuration/smptserverport") = 587
  .Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
  .Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
  .Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
  .Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "XYZ@gmail.com"
  .Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "xyz123"
  .Update
End With
' build email parts
With cdomsg
  .To = "XYZ@gmail.com"
  .From = "XYZ@gmail.com"
  .Subject = "Mein Test für das Clever-Excel-Forum"
  .TextBody = "Dann schauen wir mal, ob CDO funktioniert!"
  .Send
End With
   Set cdomsg = Nothing
End Function

Ergebnis:
   

Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. 
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
[-] Folgende(r) 2 Nutzer sagen Danke an RPP63 für diesen Beitrag:
  • Rabe, alexander.liedauer
Antworten Top
#7
Hallo,

bzgl CDO habe ich hier noch einen Link:

http://www.rondebruin.nl/win/s1/cdo.htm
Gruß
Peter
Antworten Top
#8
Hi Ralf,

(12.08.2016, 11:06)RPP63 schrieb: So, probiert und für gut befunden!  :05:

Ich habe mir gerade eine Email an mich selbst geschrieben.

Klasse! :100: :18:
Antworten Top
#9
Moin!
Um noch einmal auf das eigentliche Thema zurückzukommen, das Grundgerüst steht ja jetzt.
(11.08.2016, 08:40)alexander.liedauer schrieb: Ich habe eine Excel file, in der in verschiedenen Arbeitsblätern verschiedene user Daten befüllen.
In einem der Blätter werden Werte aus anderen Blättern überprüft.
Wenn einer dieser Werte einen bestimmten Wert überschreitet "warnt" mich Excel nun ganz simpel, in dem es die Zeile mit einer bedingten Formatierung rot markiert.
Heißt: Du hast ein verformeltes Übersichtsblatt.
Es wäre dann sinnvoll, die Precedents der Formeln ("Vorgänger") mittels Worksheet_Change oder auch mittels Workbook_SheetChange zu überwachen.
Du solltest aber Deine konkreten Wünsche nochmal präzisieren, am besten in Verbindung mit einer aussagekräftigen Beispieldatei.

Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. 
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
[-] Folgende(r) 1 Nutzer sagt Danke an RPP63 für diesen Beitrag:
  • alexander.liedauer
Antworten Top
#10
Guten Morgen zusammen!

Erstmal DANKE für die vielen nützlichen Antworten.
ABER: Ich bin ein absoluter excel Neuling! und mit VB hab ich bis vor kurzen GAR NIX gemacht,..
Daher brauche ich bitte nochmals die Hilfe zur Eingabe im VB.
Wie muss ich hier machen? Also erstelle ich ein Makro welches ich auf zb. ein .jpg verknüpfe, und wenn ich dass dann anklicke wird die email automatisch versendet? oder wie muss ich da machen?

@RPP63 (bzw alle)

Im Anhang schicke ich euch eine Testdatei mit. Hier haben wir 4 Tabellenblätter (Umsätze, Kunden, Mitarbeiter & Produktivität)
Ist sinngemäß der Datei ähnlich, die ich tatsächlich hab. Inhalt und Werte natürlich vollkommen frei erfunden.

Nun sollte es darum gehe:
Diverse Mitarbeiter tragen in den Tabellenblättern Umsätze, Kunden und Mitarbeiter Daten ein.
Auf Grund der hinterlegten Formel rechnet es die Produktivität im letzten Tabellenblatt aus. Also wieviel Umsatz im Schnitt jeder Mitarbeiter pro Kunde gemacht hat.
Wie produktiv also die Mitarbeiterplanung im vergleich zu den Kunden bzw den erzielten Umsätzen ist.
Wenn die Produktivität über 20 EUR pro Kunde ist, wird dies in grün angezeigt und alles ist bestens.
Wenn sie jedoch zwischen 0 und 20 liegt wird der Wert rot markiert.


Und mein Wunsch nun wäre: Wenn ein Wert rot markiert wird, dann sollte die Datei automatisch gemailt werden.
Oder ein mal wöchentlich automatisch per mail versendet werden,...


Angehängte Dateien
.xlsx   Musterdatei excel-Forum.xlsx (Größe: 12,13 KB / Downloads: 6)
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste