Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Mail Versand an Verteilergruppe
Gehe zu Seite 1, 2  Weiter
zurück: Formular zur Anzeige der Entfernung zweier Orte weiter: Kombinationsfeld in Formular Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
5PL3ND1D
Gast


Verfasst am:
08. Nov 2012, 13:39
Rufname:

Mail Versand an Verteilergruppe - Mail Versand an Verteilergruppe

Nach oben
       Version: Office 2007

Hallo,

ich bin schon einige Zeit auf der Suche nach einer Antwort auf mein Problem, aber ich finde nicht wirklich etwas, dass jemanden ohne Programierkünste glücklich machen könnte.

Ausgangssituation: Ich habe kleine Personendatenbank mit einem Abfrageformular erstellt. Im Formular kann man einen Standort wählen und bekommt dann, in einem Unterformular, die Personendaten für den Standort (Eine bis max. fünf Personen) inkl. Mailadressen.

Problem: Nun würde es mir sehr viel Arbeit ersparen, wenn ich einen Button "E-Mail" hätte, der mir per Click eine leere E-mail öffnet und die 1 - 5 Mailadressen schon im "An"-Feld stehen würden.
MissPh!
Office-VBA-Programmiererin


Verfasst am:
08. Nov 2012, 15:05
Rufname:
Wohnort: NRW


AW: Mail Versand an Verteilergruppe - AW: Mail Versand an Verteilergruppe

Nach oben
       Version: Office 2007

Hallo,

schau dir mal die Beschreibung zur SendObject-Methode in der Access-Hilfe an.

Die Daten des Unterformulars kannst du mit Hilfe eines Recordsets auslesen:
Code:
Dim rs As DAO.Recordset
Dim strMailadressen As String

Set rs = Me.ufocontrolname.Form.RecordsetClone
rs.MoveFirst
Do While Not rs.EOF
    strMailAdressen = strMailAdressen & "," & rs!email
    rs.MoveNext
Loop
Set rs = Nothing
strMailAdressen = Mid(strMailAdressen,2)

_________________
Gruß MissPh!
5PL3ND1D
Gast


Verfasst am:
08. Nov 2012, 16:46
Rufname:

AW: Mail Versand an Verteilergruppe - AW: Mail Versand an Verteilergruppe

Nach oben
       Version: Office 2007

Hallo,

danke erstmal. Wo muss ich das eingeben? Einfach in ein Makro und das Makro dann über den Button ausführen lassen? Falls ja, dann mache ich da irgendwas falsch.
MissPh!
Office-VBA-Programmiererin


Verfasst am:
08. Nov 2012, 16:51
Rufname:
Wohnort: NRW

AW: Mail Versand an Verteilergruppe - AW: Mail Versand an Verteilergruppe

Nach oben
       Version: Office 2007

Makros sind in Access etwas anderes...

Am besten, du fügst einen Button ins Hauptformular ein und legst den Code hinter das Klickereignis.
Dazu stellst du die Eigenschaft auf "Ereignisprozedur" ein und wechselst in den VBA-Editor.

Was du dabei falsch machen könntest weiß ich nicht, wenn du es nicht beschreibst oder deinen Code zeigst.
Gibt es Fehlermeldungen, so nenne sie. Den Steuerelementnamen hast du angepasst?!

_________________
Gruß MissPh!
5PL3ND1D
Gast


Verfasst am:
09. Nov 2012, 08:17
Rufname:


AW: Mail Versand an Verteilergruppe - AW: Mail Versand an Verteilergruppe

Nach oben
       Version: Office 2007

Ok, das hab ich jetzt so gemacht.

Button erstellt --> Beim Klicken "Ereignisprozedur" --> und dann den Code in den Editor. Sieht dann am Ende also so aus:
Code:
Option Compare Database

Private Sub Befehl12_Click()
    Dim rs As DAO.Recordset
    Dim strMailadressen As String

    Set rs = Me.ufocontrolname.Form.RecordsetClone
    rs.MoveFirst
    Do While Not rs.EOF
        strMailadressen = strMailadressen & "," & rs!email
        rs.MoveNext
    Loop
    Set rs = Nothing
    strMailadressen = Mid(strMailadressen, 2)
End Sub
Fehlermeldung:
Zitat:
Fehler beim Kompilieren: Methode oder Datenobjekt nicht gefunden.
Der Curser springt dann in den Editor und markiert dann gelb den Teil:
Code:
Private Sub Befehl12_Click()
und blau den Teil:
Code:
.ufocontrolname
MissPh!
Office-VBA-Programmiererin


Verfasst am:
09. Nov 2012, 11:29
Rufname:
Wohnort: NRW

AW: Mail Versand an Verteilergruppe - AW: Mail Versand an Verteilergruppe

Nach oben
       Version: Office 2007

Wie vermutet, genau an der Stelle musst du den tatsächlichen Namen deines Unterformular-Steuerelements einsetzen.
_________________
Gruß MissPh!
Gast



Verfasst am:
09. Nov 2012, 13:21
Rufname:

AW: Mail Versand an Verteilergruppe - AW: Mail Versand an Verteilergruppe

Nach oben
       Version: Office 2007

Ah ok, jetzt sieht es shcon besser aus. Jetzt bekomme ich folgende Fehlermeldung:
Zitat:
Laufzeitfehler '3265': Element in dieser Auflistung nicht gefunden.
Der Degugger markiert dann folgende Codezeile:
Code:
    strMailadressen = strMailadressen & "," & rs!email
Lass mich raten, es hängt damit zusammen, dass er nicht weiß in welcher Spalte meines Unterformulares er suchen soll, oder?
MissPh!
Office-VBA-Programmiererin


Verfasst am:
09. Nov 2012, 13:24
Rufname:
Wohnort: NRW

AW: Mail Versand an Verteilergruppe - AW: Mail Versand an Verteilergruppe

Nach oben
       Version: Office 2007

Wenn die Spalte nicht "email" heißt, solltest du auch hier wiederum den richtigen Namen einsetzen.
Ein bißchen Mitdenken beim Abschreiben könnte nicht schaden...

_________________
Gruß MissPh!
5PL3ND1D
Gast


Verfasst am:
09. Nov 2012, 13:50
Rufname:

AW: Mail Versand an Verteilergruppe - AW: Mail Versand an Verteilergruppe

Nach oben
       Version: Office 2007

Genau da liegt das Problem. Mir sagt der ganze Code nix. Ich weiß nicht was davon jetzt Funktionsnamen und was Variablenname ist.

Der Code sieht jetzt so aus:
Code:
Option Compare Database

Private Sub Befehl12_Click()
    Dim rs As DAO.Recordset
    Dim strMailadressen As String

    Set rs = Me.Personen_Unterformular.Form.RecordsetClone
    rs.MoveFirst
    Do While Not rs.EOF
        strMailadressen = strMailadressen & "," & rs!Mail
        rs.MoveNext
    Loop
    Set rs = Nothing
    strMailadressen = Mid(strMailadressen, 2)
End Sub
Das Unterformular in dem die Daten angetzeigt werden heißt also "Personen_Unterformular" und die Spalte in der die Mailadressen stehen heißt jetzt "Mail".

Jetzt bekomme ich:
Zitat:
Laufzeitfehler '2467': In dem von Ihnen angegebenen Ausdruck wir auf ein Objekt verwiesen, das geschlossen oder nicht vorhanden ist.
Der Debugger markiert wieder die Zeile
Code:
    Set rs = Me.Personen_Unterformular.Form.RecordsetClone
Ich sagte ja, das ich zu doof für dieses Codegefummel bin :-/
MissPh!
Office-VBA-Programmiererin


Verfasst am:
09. Nov 2012, 23:16
Rufname:
Wohnort: NRW

AW: Mail Versand an Verteilergruppe - AW: Mail Versand an Verteilergruppe

Nach oben
       Version: Office 2007

Hi,

der Name des Unterformular-Steuerelements, worin das Unterformular eingebettet wird, muss nicht derselbe sein, wie der des eingebetteten Formular-Objekts.
Überprüfe das doch noch einmal.

_________________
Gruß MissPh!
5PL3ND1D
Gast


Verfasst am:
12. Nov 2012, 08:28
Rufname:

AW: Mail Versand an Verteilergruppe - AW: Mail Versand an Verteilergruppe

Nach oben
       Version: Office 2007

Hi MissPh!, entschuldige die späte Antwort, aber ich habe über das Wochenende keinen Zugriff auf die Datenbank gehabt.

Ich habe jetzt ein wenig mit den Namen herum experimentiert, da ich nicht genau weiß, welcher da rein muss. Je nach dem, welchen Namen ich da eintrage, bekomme ich entweder die bekannte Fehlermeldung

Zitat:
Laufzeitfehler '2467': In dem von Ihnen angegebenen Ausdruck wir auf ein Objekt verwiesen, das geschlossen oder nicht vorhanden ist.


oder, und das ist noch viel schlimmer, gar keine Fehlermeldung. Es öffnet sich dann auch keine Mail, es passiert einfach nichts.
Gast



Verfasst am:
12. Nov 2012, 13:08
Rufname:

AW: Mail Versand an Verteilergruppe - AW: Mail Versand an Verteilergruppe

Nach oben
       Version: Office 2007

Hallo,

kannst du mal eine Beispiel-DB hochladen, damit man sich das anschauen kann?
5PL3ND1D
Im Profil kannst Du frei den Rang ändern


Verfasst am:
12. Nov 2012, 13:55
Rufname:

AW: Mail Versand an Verteilergruppe - AW: Mail Versand an Verteilergruppe

Nach oben
       Version: Office 2007

Wenn ich jetzt noch wüsste, wo man hier hochladen kann Very Happy
MissPh!
Office-VBA-Programmiererin


Verfasst am:
12. Nov 2012, 14:12
Rufname:
Wohnort: NRW

AW: Mail Versand an Verteilergruppe - AW: Mail Versand an Verteilergruppe

Nach oben
       Version: Office 2007

Aha, registriert bist du also schonmal. Als nächstes musst du der Upload-Gruppe beitreten und warten bis du freigeschaltet bist.
Anschließend sollte ein Upload-Button (-> "Attachment hinzufügen") im Antworten-Fenster sichtbar sein.

_________________
Gruß MissPh!
5PL3ND1D
Im Profil kannst Du frei den Rang ändern


Verfasst am:
12. Nov 2012, 14:50
Rufname:


AW: Mail Versand an Verteilergruppe - AW: Mail Versand an Verteilergruppe

Nach oben
       Version: Office 2007

Das ging ja mal zügig.

Anbei die DB (Personendaten entfernt, in Access 2000 konvertiert und gezipt). Gleich werdet ihr mich bestimmt schlagen, oder sowas Embarassed



db4upload.zip
 Beschreibung:

Download
 Dateiname:  db4upload.zip
 Dateigröße:  38.15 KB
 Heruntergeladen:  16 mal

Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Gehe zu Seite 1, 2  Weiter
Diese Seite Freunden empfehlen

Seite 1 von 2
Gehe zu:  
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 
Keine neuen Beiträge Access Formulare: Mail Adressen aus Table/Form ins Outlook Bcc Feld kopieren 0 Fmarmy 586 06. Jul 2011, 16:05
Fmarmy Mail Adressen aus Table/Form ins Outlook Bcc Feld kopieren
Keine neuen Beiträge Access Berichte: Bericht per Mail - Rahmen des UBerichtes weg 4 Karlheinz23 283 07. Jan 2010, 22:36
MissPh! Bericht per Mail - Rahmen des UBerichtes weg
Keine neuen Beiträge Access Berichte: Bericht - sortierte Felder per mail schicken 0 starter kid 201 12. Nov 2009, 13:28
starter kid Bericht - sortierte Felder per mail schicken
Keine neuen Beiträge Access Berichte: Bericht nach KundenNr trennen und einzeln per Mail versenden 26 vroni2580 2209 11. Jun 2009, 03:28
Willi Wipp Bericht nach KundenNr trennen und einzeln per Mail versenden
Keine neuen Beiträge Access Formulare: Problem bei einem e mail button 5 guitre 494 30. März 2007, 12:59
Willi Wipp Problem bei einem e mail button
Keine neuen Beiträge Access Formulare: Formular schützen, zum versand 2 Gast 992 23. März 2007, 15:22
Gast Formular schützen, zum versand
Keine neuen Beiträge Access Tabellen & Abfragen: Access und Blind Carbon Copy Versand 1 Winzig 592 24. Jan 2007, 17:02
Nouba Access und Blind Carbon Copy Versand
Keine neuen Beiträge Access Formulare: Bericht per Mail senden 4 bell-air 805 24. Jan 2007, 12:07
Gast Bericht per Mail senden
Keine neuen Beiträge Access Programmierung / VBA: Datei einbinden in Mail... 2 jevertom 593 11. Jan 2007, 14:49
jevertom Datei einbinden in Mail...
Keine neuen Beiträge Access Programmierung / VBA: mail body, formatierung 3 Datar 1603 30. Aug 2006, 11:36
steffen0815 mail body, formatierung
Keine neuen Beiträge Access Programmierung / VBA: mail versenden ohne abfrage 1 bweinhap 892 03. Mai 2006, 08:06
bweinhap mail versenden ohne abfrage
Keine neuen Beiträge Access Formulare: Datenimport aus Mail in Textfeld oder Kombinationsfeld 4 ec20 706 04. Apr 2006, 21:31
ec20 Datenimport aus Mail in Textfeld oder Kombinationsfeld
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: PHP Forum