VBA SELECT CASES Find Case nicht
24.07.2018 15:20:47
R.Wichert
For i = 4 To LZeil
Select Case Cells(i, 2)
Case "AI"
AI FstOB, XMLName(Cells(i, 3)), i * 10, Cells(i, 4)
Case "AI_TC"
AI_TC FstOB, XMLName(Cells(i, 3)), i * 10, Cells(i, 4)
Case Else
MsgBox "FC/FB Typ " + Cells(i, 2) + " für " + Cells(i, 3) + " in Zeile " & i & " unbekannt. _
GoTo Fertig
End Select
Next i
Eine Beispieldatei:https://www.herber.de/bbs/user/122858.xlsm
(Blatt: FC11 Code: XML011)
Allerding findet es "AI_TC" nicht und geht in die Else Anweisung.
Nur weiß ich nicht wieso? Wo liegt mein Fehler?
Danke R.