Gezielt Daten auszulesen und zusammenzufassen

lynndinn · 1. Februar 2011 um 17:11

Hallo,
ich habe eine Excel 2000 Tabelle (auf XP) mit Adressen und möchte nur ganz bestimmte Strings heauslesen und in einem gesonderten Ergebnisfeld zusammenfassen lassen.
Ich denke mir das so, dass ich in der Tabelle zunächst eine „Kennungsspalte“ (z.B. K) aufmache. Wenn ich jetzt eine Adressenzeile habe, die mich interessiert, gebe ich dort unter K ein bestimmtes Zeichen ein, beispielsweise ein „p“ für „private Adressen“ oder ein „f“ für Firmenadressen.
In der Spalte C sind beispielsweise immer die jeweiligen E-Mail-Adressen.
Jetzt suche ich eine Formel, die mir nur die E-Mail-Adressen (aus K…) der Adresszeilen, bei denen in Spalte K das Zeichen „p“ auftritt herausfiltern und mit einem „;_“ zu einer Kette so zusammenfassen, dass ich sie in dem Ergebnisfeld finde und von dort dann einfach per strg.c/v in die Adresszeile des Outlook Express eingeben kann.
Am Schluss soll´s dann etwa so aussehen:

[email protected]; [email protected]; [email protected]

Vielleicht wäre es gut, vor diesem „Ergebnisfeld“ noch ein Feld zu haben, wo ich den Buchstaben eintrage, in der Art: wenn hier „p“ dann bilde die entsprechende Kette. Wenn ich dann aus irgeneinem anderen Grund etwa ein „f“ für „Firmenadressen“ eingebe, dann soll die Kette eben nur aus den Adressdaten gebildet werden, die die entsprechende Kennung „f“ haben.
Uff, viel geschrieben, - alles verstanden?
Ich hoffe auf eure Hilfe,
lynndinn

Reinhard_fb8cb7 · 1. Februar 2011 um 17:37

Hallo Lynn,

ich hab das jetzt nur überflogen. Ich denke mit einer, eher zwei Hilfsspalten könnte ich dir da was basteln, wo du letztlich eine Zelle wo das drinsteht was du möchtest.

Geht auch Vba? Damit ginge viel mehr, nicht mit OE, der wird von MS bzw. Vba nicht so unterstützt, wenn dann mit Outlook.
Okay, ich nutz den auch nicht.

viel mehr bedeutet, Outlook wird aufgerufen mit den Adressen plus Betreffzeile plus Text, wenn du die vorgeben kannst und angezeigt.
Geht natürlich auch daß da einfach gesendet wird.

Ich glaub ich plaudere zuviel und mach dir Appetit und wer macht das dann wieder ? Ich *seufz* ))

Gruß
Reinhard

lynndinn · 1. Februar 2011 um 18:22

Hallo Reinhard,

Ich glaub ich plaudere zuviel und mach dir Appetit und wer
macht das dann wieder ? Ich *seufz* ))

du bist und bleibst eben ein super Excel-Experte. (Wenn du mal ne Musikfrage hast, revanchier ich mich …) Dank deiner früheren Hilfen bin ich zwar schon etwas weiter mit meinen dürftigen Kenntnissen gekommen. Aber ich hab´s probiert, und nur Salat ist dabei herausgekommen.
Also. Wenn ich dich richtig verstanden habe, willst du das gleich so aufbauen, dass ich nur noch „p“ in ein Kästchen eingeben muss und schon entsteht die Adressenkette, OE öffnet sich und aus einem anderen Feld, wo ich den Betrefftext vorher eingegeben habe, kommt schwupp der Betreff in die richtige Zeile, und dann soll auch noch der eigentliche Fließtext, der ebenfalls vorher in irgendeine Zelle eingegeben wurde, automatisch im E-Mail erscheinen, - alles wird auch gleich noch abgeschickt?
Das wäre natürlich ein Geniestreich. Aber ich will ja auch was zu tun haben (und du sollst ja jetzt nicht eine Doktorarbeit draus machen, immerhin warten noch andere „Kunden“ … ).
Ich dachte eigentlich nur an die Erzeugung dieser Adressenkette. Das weitere kann ich doch auch per Hand übertragen. Vielleicht erübrigt sich dann auch das Problem mit OE (Version 6 auf XP).
Bin auf deine Antwort gespannt,
lynndinn

Reinhard_fb8cb7 · 1. Februar 2011 um 19:43

Hallo Wolfgang,

du bist und bleibst eben ein super Excel-Experte.

ach, ich kann mich schon sehr gut selbst einschätzen. Ich bin in einem anderen Forum, da sind für mich die besten von D versammelt. Da bin ich unter den Antwortern ein kleines Licht, aber für die Anfrager reicht das und ich kann von den anderen lernen…
Alles ist relativ.

(Wenn du
mal ne Musikfrage hast, revanchier ich mich …)

Hab ich leider nicht. Es gab mal vor gar nicht langer Zeit da war ich musikalisch noch aktiver und zeitgleich hatte ich da eine Internetbeziehung und sie kannte sie sich da gut aus mit diesem Esel und was es da wohl alles gab um sich mp3 runterzuladen, als ich „zufällig“ ) mal bei ihr war, ich mag zahlen, habe ich mal ihren Bestand an MP§s versucht zu ermitteln, dann mal jedes Lied mit 2 min Laufzeit angenommen, da kam ich auf 10.000 oder mehr jahre die sie allein dafür brauchen würde alles nur einmal zu hören.

Jedenfalls hatte sie ALLES, und wenn ich dan mehrmals gesagt habe , och, davon, davon hätte ich schon gern was auf CD, schwups bekam ich Post.
Und es war schon Klasse, einfach auch mal über so einen Fundus zu verfügen, und je nach laune mal mein Freund der baum zu hören, Ina Deter, ACDC o.ä… aber das war damals.

Derzeit höre ich am PC nur Webradio und fertig.

Außerdem mußt du mir ja gar nix geben für meine Hilfe. kennst du „Tauschring“? Find ich Superklasse. Ich helf dir in Excel. Nur für meine Zeit krieg ich dann eine Zeitgutschrift von 30 min o.ä.
Du hilfst dann einem Schneider in irgendwas mit Musik, brauchst dafür auch ne halbe Stunde.

Dann bitte ich den Schneider, an drei Hemden die Knöpfe anzunähen und bei der einen Jeans den Schlitz am Knie zuzunähen, er braucht dafür auch eine halbe Stunde.

Endeffekt, alle sind glücklich, alle haben Geld gespart, rel. viel Geld.
Und das Ganze ist offiziell abgesegnet, also nix mit Schwarzarbeit oder so, Steuern zahlen dafür.

Tauschringe gibt es zumindest in größeren Städten reichlich, bei Interesse, schau mal.
Irgendwann schaff ich es auch da mal aufzutauchen *seufz* Denn ich finde das dermaßen genial.

So, schön, daß wir über tauschringe gesprochen haben, danke für die Anregung.
War noch was?
Ups, Excel, Fachbrett, eieiei. mal nachlesen was du eigentlich wolltest *lächel*

Dank deiner
früheren Hilfen bin ich zwar schon etwas weiter mit meinen
dürftigen Kenntnissen gekommen. Aber ich hab´s probiert, und
nur Salat ist dabei herausgekommen.

Salat ist auch gut, der geht direkt an Allah *schwergrins*

(Gebet heißt auf arab. Salat)

Also. Wenn ich dich richtig verstanden habe, willst du das
gleich so aufbauen, dass ich nur noch „p“ in ein Kästchen
eingeben muss

Kästchen? Mißtrauisch schau, du sagtest Zelle, was ist nun ein Kästchen.
Außerdem hast du gesagt daß du da dieses p in eine zelle schreiben willst.

und schon entsteht die Adressenkette, OE öffnet

*schwerseufz* grad OE ist schwierig weil MS den nicht so unterstützt, Outlook ist easy, jeder Fremdbrowser, wie auch OE, ist komplizierter anzusteuern, da braucht man API wenns überhaupt geht.

sich und aus einem anderen Feld, wo ich den Betrefftext vorher
eingegeben habe, kommt schwupp der Betreff in die richtige
Zeile, und dann soll auch noch der eigentliche Fließtext, der
ebenfalls vorher in irgendeine Zelle eingegeben wurde,
automatisch im E-Mail erscheinen,

Genauso. Und in der Luxusvariante, ich red mich hier um Kopf und Kragen , kann auch per Vba der Text, der Betreff beeinflußt werden, also nicht als Betreff „Wochenbericht“ sondern von Vba verändert „Wochenbericht für KW34 vom 3.7-9.7“

alles wird auch gleich noch abgeschickt?

wenn du willst ja, wenn nicht wirds erst angezeigt, dann kannste noch was ändern, mußt es dann selbst senden.

Das wäre natürlich ein Geniestreich. Aber ich will ja auch
was zu tun haben (und du sollst ja jetzt nicht eine
Doktorarbeit draus machen, immerhin warten noch andere
„Kunden“ … ).

Ach so schlimm ist das nicht. Laß das mal meine Sorge sein.

Ich dachte eigentlich nur an die Erzeugung dieser
Adressenkette. Das weitere kann ich doch auch per Hand
übertragen.

Mir gleich, sag was du wills, ich habe meine Möglichkeiten präsentiert.

Wenn du willst kannste ja bei www.excelformeln.de schauen ob es da eine Formellösung gibt ohne Hilfszellen.

Gruß
Reinhard

lynndinn · 1. Februar 2011 um 20:41

Hallo Reinhard,
hier ist definitiv nicht der Wolfgang, sonder der … eben lynndinn, im wirklichen Leben jedenfalls nicht Wolfgang.
Und wenn du willst, komponier ich dir ein Liebeslied für deine Internetliebe … Dann kannst ihr wieder mal was runterladen …
Upps, jetzt wird mein Beitrag wegen Pornografie gesperrt.
Also kommen wir wieder auf den Punkt.
Und da hast du mich eiskalt erwischt. Kästchen, Feld, Zelle, - ein Ei wie das andere. Also ich meine diese kleinen Rechteckformen, die man bei Excel überall sieht. Heißt fachmännisch wohl „Zelle“, oder?
Also. Ich wäre schon super glücklich, wenn ich „nur“ an diese verdammte Kette herankäme. Da müsste doch eine Excelformel reichen, oder? Hab ich mein Prob eigentlich einigermaßen richtig rübergebracht? Du wirst schon wissen, wie ich es meinte. Ich wäre mit der denkbar einfachsten Lösung zufrieden.
Der Hintergrund ist der, dass ich ab und zu gezielte Reklame für meine Bücher machen möchte, Reklame, die nicht gleich als Spam im Papierkorb landen. Und da dachte ich daran, so eine E-Mail-Adressen-Kette mit einer bestimmte Auswahl meiner in Excel gespeicherten Adressen über Bcc in meinem OE einzugeben und dann die anderen Texte wie Betreff und Fließtext per Hand anzufügen.
Schaffst du das? - Rhetorische Frage )))
lynndinn

Reinhard_fb8cb7 · 1. Februar 2011 um 23:11

Hallo lynn,

hier ist definitiv nicht der Wolfgang, sonder der … eben
lynndinn, im wirklichen Leben jedenfalls nicht Wolfgang.

sorry, ich hüpf grad hier von Beitrag zu Beitrag, in einem anderen Forum auch, naja, ein irgendwie Gedankenfehler.
Nix schlimmes, kann passieren.

Und wenn du willst, komponier ich dir ein Liebeslied für
deine Internetliebe … Dann kannst ihr wieder mal was
runterladen …

Lass mal, da war a keine Liebe und b der Kontakt schon lange vorbei.

Derzeit habe ich keinen Bedarf an Liebesliedern die ich da „IHR“ singen könnte.

Okay, also reduziert sich alles auf das was in deiner Anfrage stand, mach ich morgen

Ja, es heißt Zelle. Und Feld, Kästchen daß würde ich ja auch kapieren, dummerweise gibt es in Excel auch Textfeld usw.
Deshalb irritiert mich das. Und Ankreuzkästchen gibts auch.

Gruß
Reinhard

Reinhard_fb8cb7 · 2. Februar 2011 um 13:49

Ich denke mir das so, dass ich in der Tabelle zunächst eine
„Kennungsspalte“ (z.B. K) aufmache. Wenn ich jetzt eine
Adressenzeile habe, die mich interessiert, gebe ich dort unter
K ein bestimmtes Zeichen ein, beispielsweise ein „p“ für
„private Adressen“ oder ein „f“ für Firmenadressen.
In der Spalte C sind beispielsweise immer die jeweiligen
E-Mail-Adressen.

Hallo W äh Lynn ),

weiß nicht warum der Code so lang wurde, egal, scheint zu laufen.
Gehört in Modul des Blattes.

In L2 schreibst du den Buchstaben. In L1 erscheint dann die Gesamtmailadresse. Code reagiert automatisch auf Änderungen in C oder K. p oder P ist egal.

Option Explicit

Private Sub Worksheet\_Change(ByVal Target As Range)
Dim ZeiC As Long, ZeiK As Long, Z As Long
Application.EnableEvents = False
If Intersect(Target, Range("C:C")) Is Nothing And Intersect(Target, Range("K:K")) Is Nothing Then GoTo Ende
ZeiC = Cells(Rows.Count, 3).End(xlUp).Row
ZeiK = Cells(Rows.Count, 11).End(xlUp).Row
If ZeiC \> ZeiK Then ZeiK = ZeiC
Cells(1, 12).Value = ""
For Z = 1 To ZeiK
 If UCase(Cells(Z, 11).Value) = UCase(Range("L2").Value) Then
 Cells(1, 12).Value = Cells(1, 12).Value & "; " & Cells(Z, 3).Value
 End If
Next Z
Cells(1, 12).Value = Mid(Cells(1, 12).Value, 3)
Ende:
Application.EnableEvents = True
End Sub

Gruß
Reinhard

lynndinn · 2. Februar 2011 um 17:01

Hallo Reinhard,
du bist (wie ich bereits vorher vermut habe) ein Genie. - Fast!
Nachdem ich die Formel ins Modul eingefügt hatte, erschienen in L1 sofort die gesamten Inhalte der Spalte C, säuberlich durch ein ; getrennt, auch dort, wo gar keine Adresse war. Also in etwa so:

E-Mail; ; [email protected]; ; [email protected]; ; ; ; ; [email protected]; usw. usw. (die echten Adressen habe ich aus Datenschutzgründen hier in aaaxxx usw. umgeformt) Das „E-Mail“ kommt wohl daher, weil es in C1 als Überschrift steht.

Als ich dann in Spalte K irgend einen Buchstaben setzte, egal welchen, - ich aber in L2 noch keinen Buchstaben eingetragen hatte - wurde genau diese Adresse aus der Liste gelöscht.
Es klappt erst wunderbar, wenn ich erst in L2 die Kennung, also etwa das p setze und dann in Spalte K die jeweiligen p´s.
Das führt zwar auch zum Ziel. Wäre aber unschön, denn die Kennbuchstaben in Spalte K, also etwa das p oder das f , sind ja zuerst und generell immer da, es sei denn, ich muss das irgendwann aus irgendeinem Grunde umändern. - Bequemer ist´s, wenn ich Morgen mein Excel starte und lediglich in L2 mein gewünschtes p z.B. eintrage, dass dann in L1 die erwünschte Kette kommt.
Uff, habe ich das klar rüberbekommen? Ich hoffe du kannst mit meinem Roman was anfangen …
Gruß,
lynndinn

Reinhard_fb8cb7 · 2. Februar 2011 um 19:08

Hallo Lynn,

du bist (wie ich bereits vorher vermut habe) ein Genie. -
Fast!

Fast ist doch super, wäre ich Vollgenie, wüßte ich ja schon immer alles, weia, wie langweilig wäre das

Nachdem ich die Formel ins Modul eingefügt hatte, erschienen
in L1 sofort die gesamten Inhalte der Spalte C, säuberlich
durch ein ; getrennt,

Klappt doch *gg*

auch dort, wo gar keine Adresse war.

Konnte nicht ahnen daß du da lückenhafte Listen hast, sowas ist in Excel ein Grundübel. Ich kann das ausgleichen, aber z.B. Excel Autofilter usw. kann das nicht.

Muß ich prüfen ob die Zellen leer sind oder auch ob der Inhalt die Form [email protected] hat?

Das „E-Mail“ kommt wohl daher, weil
es in C1 als Überschrift steht.

Dann mach hier aus der 1 eine 2:
For Z = 1 To ZeiK

Als ich dann in Spalte K irgend einen Buchstaben setzte, egal
welchen, - ich aber in L2 noch keinen Buchstaben eingetragen
hatte - wurde genau diese Adresse aus der Liste gelöscht.

Dann hat der Code gut funktioniert, du hast was in K geändert, er lief los. Nicht seine Schuld wenn du in L2 was falsches hast.
Sollen so Bedienungsfehler vom Code auch „kontrolliert“ werden?
Trag doch erst in L2 was ein und fertig.

Es klappt erst wunderbar, wenn ich erst in L2 die Kennung,
also etwa das p setze und dann in Spalte K die jeweiligen p´s.

Bequemer ist´s,
wenn ich Morgen mein Excel starte und lediglich in L2 mein
gewünschtes p z.B. eintrage, dass dann in L1 die erwünschte
Kette kommt.

Okay. Dann überwacht der Code auch L2.

Wechselst du immer nur zwischen f und p, von mir aus noch 2-3 anderen Buchstaben?
Dann kann man doch gleich in L1:L5 die 5 Suchbuchstaben schreiben und in M1:M5 hast du dann die jeweilkigen Mailadressen.

Also meld dich bitte erstmal, dann sind alle Änderungen ein Aufwisch.

Gruß
Reinhard

lynndinn · 2. Februar 2011 um 20:22

Hallo Reinhard,

ich glaube ich ahne jetzt, wo die Krux liegt.

Konnte nicht ahnen daß du da lückenhafte Listen hast, sowas
ist in Excel ein Grundübel. Ich kann das ausgleichen, aber
z.B. Excel Autofilter usw. kann das nicht.

Die Lücken sind nicht das Problem.

Muß ich prüfen ob die Zellen leer sind oder auch ob der
Inhalt die Form [email protected] hat?

nein, allenfalls ob´s leer ist. Aber das wird keine Rolle spielen, wenn …

Dann hat der Code gut funktioniert, du hast was in K
geändert, er lief los. Nicht seine Schuld wenn du in L2 was
falsches hast.

Trag doch erst in L2 was ein und fertig.

… wenn nicht da das Problem liegt. Umgekehrt solls sein: das was in K steht wird wohl kaum geändert. Da steht mal p mal f mal nichts. Aber: Ich will ja die Kette genau dann sich aufbauen lassen, wenn ich in L2 etwas eingebe (heute ein p, morgen ein f z.B.) bzw. ändere. Kann es sein, dass man da nur die Reihenfolge oder den Bezug für die Aktion ändern muss?

Wechselst du immer nur zwischen f und p, von mir aus noch 2-3
anderen Buchstaben?

nee, wohl kaum. Im Grunde genommen brauche ich jeweils nur eine Kette, für den einen Tag und das eine Mal etwa das p, für einen anderen Fall später mal das f. Aber sicherlich nicht beide gleichzeitig.

Kannst du damit was anfangen? Würd mich
Gruß,
lynndinn

Reinhard_fb8cb7 · 2. Februar 2011 um 21:00

Hallo Lynn,

… wenn nicht da das Problem liegt. Umgekehrt solls sein:
das was in K steht wird wohl kaum geändert. Da steht mal p mal
f mal nichts. Aber: Ich will ja die Kette genau dann sich
aufbauen lassen, wenn ich in L2 etwas eingebe (heute ein p,
morgen ein f z.B.) bzw. ändere. Kann es sein, dass man da nur
die Reihenfolge oder den Bezug für die Aktion ändern muss?

nein. Wenn da Lücken auftauchen liegt das m.E. einzig daran daß in K ein p steht und in C nix.

Wechselst du immer nur zwischen f und p, von mir aus noch 2-3
anderen Buchstaben?

nee, wohl kaum. Im Grunde genommen brauche ich jeweils nur
eine Kette, für den einen Tag und das eine Mal etwa das p, für
einen anderen Fall später mal das f. Aber sicherlich nicht
beide gleichzeitig.

Schon okay, auch wenn ich nerve, eher um es selbst richtig zu verstehen.
Du willst also morgens rauswürfeln ob du da ein p oder f in L2 eingibst, aufgrund dessen soll in L1 die „Liste“ erscheinen, ist das so in etwa richtig?

Nur zu meinem Verständnis, wenn du in zwei Zellen das p und f hast, die entsprechenden „Listen“ in zwei anderen Zellen, brauchste dpch nix mehr einzugeben, dann nimmste die Liste die du grad willst.

Davon unabhängig, wie du gesehen hast kann Vba automatisch „überwachen“ in welchen Spalten, Zellen du etwas änderst. Soll jetzt Nur noch L2 "überwacht werden, also C:C bzw K:K nicht mehr, oder alles drei?

Kannst du damit was anfangen? Würd mich

Ja, die Umsetzung schaffe ich auch, und wenn du auch diese Nachfrage von mir beantortest lege ich auch gleich los, naja, außer ich hab da noch ne Nachfrage
Ich will dich jetzt nicht irgendwie verulken, bin halt nur neugierig.

Lösung kommt bald, versprochen.

Gruß
Reinhard

Gruß,

lynndinn

lynndinn · 2. Februar 2011 um 21:30

Hallo Reinhard,
ich glaube, die Unklarheiten liegen darn, dass ich mich als Laie so unglaublich dusselig ausdrücke. Du nervst nicht mich, sondern wahrscheinlich ich eher dich.

nein. Wenn da Lücken auftauchen liegt das m.E. einzig daran
daß in K ein p steht und in C nix.

Diesen Fall gibt es nicht. Die p´s oder f´s sind nur dort, wo ich auch vollständige E-Mail-Adressen habe.

Du willst also morgens rauswürfeln ob du da ein p oder f in
L2 eingibst, aufgrund dessen soll in L1 die „Liste“
erscheinen, ist das so in etwa richtig?

Genau das ist´s.

Nur zu meinem Verständnis, wenn du in zwei Zellen das p und f
hast, die entsprechenden „Listen“ in zwei anderen Zellen,
brauchste dpch nix mehr einzugeben, dann nimmste die Liste die
du grad willst.

Ja, das ginge schon, wäre aber denke ich für meinen Fall zu umständlich (s.u.).

Davon unabhängig, wie du gesehen hast kann Vba automatisch
„überwachen“ in welchen Spalten, Zellen du etwas änderst. Soll
jetzt Nur noch L2 "überwacht werden, also C:C bzw K:K nicht
mehr, oder alles drei?

nee, es reicht total, wenn nur L2 überwacht wird, in dem Sinne, dass ich da einfach den gewünschten Buchstaben eingebe, und dann wird mir in L1 die aktuelle Kette zu dem Buchstaben ausgeworfen. Das würde dann ja auch die Sache mit den zwei Zellen (s.o.) erübrigen.
Alle Klarheiten beseitigt?
Gruß,
lynndinn

Reinhard_fb8cb7 · 2. Februar 2011 um 22:09

Hallo Lynn,

ich glaube, die Unklarheiten liegen darn, dass ich mich als
Laie so unglaublich dusselig ausdrücke.

Kwark.

nein. Wenn da Lücken auftauchen liegt das m.E. einzig daran
daß in K ein p steht und in C nix.

Diesen Fall gibt es nicht. Die p´s oder f´s sind nur dort, wo
ich auch vollständige E-Mail-Adressen habe.

Okay, mal schauen,

teste mal bitte den nachstehenden Code, ersetze dadurch den alten.
(Der war mir eh zu lang *gg*)
Derr neue reagiert nur auf L2.

Gruß
Reinhard

Option Explicit

Private Sub Worksheet\_Change(ByVal Target As Range)
Dim Zei As Long
On Error GoTo Ende
If Target.Address(0, 0) "L2" Then Exit Sub
Application.EnableEvents = False
Range("L1").Value = ""
For Zei = 2 To Cells(Rows.Count, 11).End(xlUp).Row
 If UCase(Range("K" & Zei).Value) = UCase(Range("L2").Value) Then
 Range("L1").Value = Range("L1").Value & "; " & Range("C" & Zei).Value
 End If
Next Zei
Range("L1").Value = Mid(Range("L1").Value, 3)
Ende:
Application.EnableEvents = True
End Sub

lynndinn · 3. Februar 2011 um 12:14

Hallo Reinhard,
super, jetzt funzt es bestens. Ich wusste doch, dass du das perfekt hinkriegst!
Danke und Gruß,
lynndinn