Autor Thema: Buchstabensalat und jetzt ???  (Gelesen 1269 mal)

Offline yes2002

  • Aktives Mitglied
  • ***
  • Beiträge: 193
  • Ich liebe dieses Forum!
Buchstabensalat und jetzt ???
« am: 31.03.03 - 19:29:08 »
Hi,

ich habe zwei Listen mit Namen. Liste A enthält Namen mit Accent und Liste B die gleichen Namen ohne Accent:

Liste A                                 Liste B
André                                  Andre
Mîchele                               Michele
Thómas                              Thomas

Wie kann ich nun die beiden Listen vergleichen? Denn André ist ungleich Andre. In meinem Fall aber doch gleich Andre. Wie kann man die Werte in Liste A von den Accents bereinigen? Hat jemand eine Idee???

Offline eknori

  • @Notes Preisträger
  • Moderator
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 11.730
  • Geschlecht: Männlich
Re:Buchstabensalat und jetzt ???
« Antwort #1 am: 31.03.03 - 19:35:16 »
nur so mal ganz spontan: würde das mit @Soundex gehen ?
Egal wie tief man die Messlatte für den menschlichen Verstand auch ansetzt: jeden Tag kommt jemand und marschiert erhobenen Hauptes drunter her!

Offline yes2002

  • Aktives Mitglied
  • ***
  • Beiträge: 193
  • Ich liebe dieses Forum!
Danke, ist eine mögliche Lösung ...
« Antwort #2 am: 31.03.03 - 19:46:57 »
Hier für alle ein mini Script:

Sub Initialize
   test1 = "Andre"
            test2 = "André"

   Dim eval1 As Variant
            Dim eval2 as variant
   eval1 = Evaluate("@Soundex(" & """" & test1 &""""   &    ")")
eval2 = Evaluate("@Soundex(" & """" & test2 &""""   &    ")")
   
if eval1(0) = eval(1) then
msgbox("Wunderbar ...")
end if
End Sub

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz