Office: (Office 2007) UserForm Doppelte Werte

Hi Folks,

habe hier eine Datei von Hajo_Zi gefunden, die genau das bringt, was mir fehlt. In einer UserForm werden die nicht doppelten Werte angezeigt. So weit so gut.

Ich benötige die Anzeige der nicht doppelten Werte (Bezug nicht der Name sondern die Kd.-Nr.) da Namen ja doppelt vorkommen können. Außerdem müsste noch die Anzahl der TN anhezeigt werden.

Da ich VBA_Laie bin, benötige ich eure Hilfe.

Danke im Voraus.


Manfred *frown.gif*

:)

 

Hallo Manfred

was du mit TN meinen könntest

Aber hier mal die geänderte Datei


Gruss Peter9

 

Hi Peter9,

TN bedeutet Teilnehmer. Das Sortierkriterium ist die Kd.-Nr. Das haut ja hin.
Ich möchte aber jetzt den ganzen Datensatz in der UserForm angezeigt bekommen.
Dazu wenn möglich noch die Anzahl.
Alles klar?

Bis dann dann

Manfred

 

Hi,

wenn möglich die Anzahl der TN wie im Bild anzeigen lassen

 

Hallo Manfred,

Ich wusste nicht dass Kunden Teilnehmer sind aber bitte.

Hier die Datei mit der TN Anzahl

Gruss Peter9

 

Hi Peter9,

danke für deine Hilfe. Es ist fast so wie ich es gerne hätte. Das Textfeld als Anzeige. Super. Wenn es möglich ist, hätte ich gerne in der Userform nicht nur die Kd.-Nr. sondern auch den Namen, Vornamen usw. Geht das?

Und nun zu den Kunden bzw. Teilnehmern:
Ich bekomme von einer großen deutschen Organisation, in der jeder automatisch Mitglied wird, Tabellen zugeschickt, in denen die Kunden der Organisation u.a. mit der Kd.-Nr. aufgeführt sind. Diese Kd.-Nr. ist immer eindeutig. Diese Kunden werden bei mir einer Maßnahme zugewiesen und sind damit für mich Teilnehmer. Alles klar. Ob Kunde oder Teilnehmer, es kommt sicherlich immer auf den Blickwinkel an.

Bis dann dann

Manfred*wink.gif*

 

Hallo Manfred,

hiermal die Überarbeitete Datei
getestet mit Office 2007

Gruss Peter9

 

Hi Peter9,

leider läuft diese Variante bei mir nicht. Ich arbeite noch mit Office 2000.
Ich bekomme eine Fehlermeildung bei:
keine_Doppelten.show
wenn ich jedoch
UsreForm1.show anzeigen lasse, klappt es. Woran kann das liegen.
Ich hänge die Datei noch einmal an.

Gruss

Manfred

 

Hallo Manfred,

hiermal die Überarbeitete Datei
getestet mit Office XP hoffe es geht zetzt

Office 2000 habe ich nicht

Gruss Peter9

 

Hi Peter9,

prima, jetzt funktioniert es. Ich habe einige "xlsNormal" Einträge auskommentieren müssen, da immer eine Fehlermeldung provoziert wurde.
Kann man die Datensätze optisch ansprechender (d. h. ausgerichtet untereinander) anzeigen lassen? Muss nicht sein. Sähe aber besser aus.

Vielen Dank für deine Hilfe

Manfred *mrcool

 

Hallo Manfred,

dass habe ich Schon gemacht in dem Code abschnitt

Code:

Da aber Buchstaben eine Unterschiedliche Breite haben kommt es leider zu minimalen unwiederruflichen abstants abständen

Gruss Peter9

 

Hi Peter9,

habe mal ein Bild angehängt. Was sagst du?

Bis dann dann.

Manfred *mrcool

 

Hallo Manfred,

ich sehe kein Bild

lade doch mal die Datei Hoch O.K.

Gruss Peter9

 

Hi Peter9,

Nachtrag.

Manfred *rolleyes.gif* *rolleyes.gif* *rolleyes.gif*

 

Hallo Manfred,

nimm mal mein letztes Beispiel und ändere mal die code Zeilen bitte

Code:

dann müsste es gehen

gruss Peter9