E-mail-adressen mit VERKETTEN nach Lotus

Computer: Software & Programmierung Office Software
1

Hallo
vermutlich für einen Excel-Experten nur ein kleines Problem.
Ich bekam eine Excel-Datei mit ca 1000 Zeilen,5 Spalten, u.a. enthält eine Spalte zeilenweise jeweils die e-mail-adresse einer Person. Nun sollen zur Verteilung eines Rundschreibens per lotus-mail, alle e-mail-Adressen von ca. 600 versch.Personen zusammengefasst werden, um ins Empfängerfeld von Lotusmail hineinkopiert zu werden. Lotus verlangt, dass die mailadressen durch ein Komma getrennt sind.
In den nacheinander stehenden Zeilen ist nicht in jedem Feld eine mail-adresse enthalten, d.h. wenn man den Bereich markiert, hat man ca.
1000 Zeilen/Feldinhalte markiert. die ca 600 verschiedene mail-Adressen enthalten aber auch 400-mal leer sind.
Muss ich nun ein , (Komma) in die Spalte neben der Adressspalte kopieren und dann die beiden Spalten markieren.
Überspringt VERKETTEN Feldinhalte, die leer sind ?

Bewirkt VERKETTEN, dass mail-adresse A +Komma +mailadresse B+ Komma +mailadresseC+Komma +LEER+LEER +mailadresseD+Komma usw nacheinander die Empfängergruppe zusammenstellt, wie man sie in Lotus einsetzen kann ?

Für schnelle Auskunft/Vorschläge bin ich sehr dankbar, denn es wird erwartet, dass ich morgen früh 8 Uhr das Ganze zusammengestellt habe.
Im voraus vielen Dank für Eure Tipps.

frdl. Gruß

nosp

2

Hallo nosp

mit Alt+F11 VBA-Editor öffnen, Einfügen/Modul und dann folgenden Code in das Modul kopieren:

Public Function Mailingliste(Bereich As Range) As String
 Dim Zelle As Range
 For Each Zelle In Bereich
 If InStr(1, Zelle, "@", vbTextCompare) \> 0 Then
 Mailingliste = Mailingliste & Zelle & ","
 End If
 Next Zelle
End Function

Es steht im Arbeitsblatt jetzt die Excel-Funktion „Mailingliste“ zur Verfügung, die man in einer beliebigen leeren Zelle verwenden kann.

Funktionsargument ist der gesamte Block mit den 1000 Mailadresszeilen oder ein beliebiger Teil davon.

Gruß
smalbop