Code wird falsch intepretiert
08.07.2004 17:24:17
reichel_w
mein Kollege und ich überarbeiten eine Excel-Applikation, die bereits einige Jahre alt ist und bislang auch immer lief. Mein Kollege hatte den Code auf seinem Laptop geändert und getestet und schliesslich auf den Bestimmungs-PC kopiert (beide Win2K / Office 2000 Standart).
Weshalb werden (laut Beispiel 1) die Variablen auf einmal nicht mehr erkannt, bzw. die Funktion Mid(datum, 4, 2) moniert ?
--------------------------------------------
In Beispiel 1 : bricht immer mit Fehler ab
maand = "01 January" : wird mit Fehler abgebrochen,
OK kann ja deklariert werden
mndnr = Mid(datum, 4, 2) : MID - "unbekannte Referenz" -was ist hier los ?
' set calculation to automatic in case Vision has put it to manual
With Application
.Calculation = xlAutomatic
.MaxChange = 0.001
End With
ActiveWorkbook.PrecisionAsDisplayed = False
' calculate month for path
mndnr = Mid(datum, 4, 2)
Select Case mndnr
Case "01"
maand = "01 January"
Case "02"
maand = "02 February"
Case "03"
------------------------------------
Beispiel 2 = läuft unproblematisch
Case 2
Range("L2") = "=MID(+Base!B101,5,15)"
Range("L2").Font.ColorIndex = xlAutomatic
Range("H2") = "=Left(+Base!B101,2)"
Range("L3") = " "
Case 3
Range("L2") = "=MID(+Base!B102,5,15)"
Range("L2").Font.ColorIndex = xlAutomatic
Range("H2") = "=Left(+Base!B102,2)"
Range("L3") = " "
Wäre toll, wenn irgend jemand ne Idee hat?
Danke im Voraus.