Office: Auf doppelte Werte Prüfen und in MsgBox ausgeben

Hallo Forum,
hallo EarlFred,

ich habe im Netz folgenden Code gefunden der bewirken soll, dass ich Doppelte Bestellnummern in einer MsgBox ausgegeben bekomme.
Komischerweise funktioniert das offenbar nur bei mir mal wieder nicht.

Wo müssen die Codes hin damit sie das Blatt "Daten" sinnvoll nach den Bestellnummern prüfen?


Code:

Danke für Antworten.

Grüße
Anja

:)

 

Hallo Anja

du die Klasse ist auch eingebunden?
clsMyDic

?? da liegt mit Sicherheit der meiste Code

 

Hallo Chris,

öhh ähh.. ich glaub nicht! Wohin müsste dann welcher Code? Ist das sehr aufwendig??

Grüße
Anja


Edit: Hallo Chris, ich habe die Seite gefunden glaub ich, kann die Datei aber nicht runterladen. http://www.*************************171146_0_0_asc.php

 

Hallo Anja,

das stammt vermutlich aus Gerds (Bambergs) erweiteren Dictionary-Funktionen.
Wenn Du diese verwenden willst, zieh Dir bitte die dazugehörige Datei, die er in dem Thread, aus dem Du den Rest vermutlich hast, verlinkt hat, da findest Du alles wissenswertes.

Ich denke, Du schießt dann aber mit Kanonen auf Spatzen...

Grüße
EarlFred

 

Oh guten Morgen Earlfred :-)

nein die armen Spatzen.. den will ich ja gar nichts tun. ICh möchte doch eher eine einfache Funktion damit man weiß dass etwas doppelt ist und die den doppelten Eintrag oder die doppelten Einträge entfernen kann.

Ja du hast Recht ist wohl Gerd Bambergs Werk. Wenn's klappt tuts aber wohl genau das was es soll.

Grüße
Anja

 

Hallo Anja,
das folgende, primitive Makro tut genau das. Es zeigt dir nacheinander alle doppelten Einträge per MsgBox an.
Code:

 

Hallo Chen,

dein Makro funktionert perfekt, vielen Dank!!!

Grüße Anja