Problem mit Set & Range (kurios?!)
21.07.2008 12:11:51
Andreas
es ist gerade zum Haare raufen. Ich arbeite in letzter Zeit vermehrt mit der Set Anweisung und möchte in einem Code auf Werte in meiner Personl.xls Datei referenzieren. Also habe ich den betreffenden Range mit Set definiert.
Sub RangeTest()
Dim rng As Range
Set rng = Workbooks("PERSONL.xls").Worksheets("PivotListings_advanced").Range(Cells(1, 2), _
Cells(10, 2))
For Each c In rng
Debug.Print c.Value
Next
End Sub
Wenn ich das Blatt aktiviert habe, läuft der Code ohne Probleme durch. Wenn ich jedoch ein anderes Blatt aktiviert habe, bekomme ich eine Fehlermeldung. Aber der Code kennt doch alle Parameter um den Range korrekt zu adressieren?! Hat es später Auswirkungen, wenn die Person.xls ausgeblendet ist? Ich denke nicht, oder?
Ich stehe gerade ein wenig auf dem Schlauch, denn dieses Problem hatte ich bisher so noch nicht.
Vielen Dank für Eure Hilfe.
Grüße, Andreas