InStr-Funktion
26.07.2007 11:27:08
Jochen
habe ein Makro geschrieben das Zeilen von Datei A nach Datei B überträgt. Dabei sind manche Zeilen für den Kunden relevant und manche nicht. Der Name des Kunden wird zu Beginn eingelesen. In der Spalte 6 stehen je Zeile alle betroffenen Kunden mit der gleichen Syntax. Die jeweiligen Zeilen werden in einer FOR-NEXT-Schleife mit Hilfe der Variable Zeilenzaehler hochgezählt.
Mein Problem ist, dass die Übereinstimmung nur erkannt wird, wenn vor dem Kundennamen in Spalte 6 ein Leerzeichen steht. Ist dies nicht der Fall, wird der Name nicht erkannt. Die verschiedenen Namen sind durch Kommata getrennt
If InStr(worksheet1.Cells(Zeilenzaehler, 6).Value, Kunde) Then
...
Könnte mir jemand einen Tipp geben, wie ich den Code umschreiben müsste, damit es egal ist, ob Leerzeichen eingetragen sind oder nicht? Könnte es evtl. auch am Zellformat liegen? (ist derzeit "Text")?
Vielen Dank und Grüße,
Jochen