Was ist hier falsch?
14.09.2006 12:12:05
ticonhh
komme hier nicht weidder:
..
Dim wert As String
Dim objSh As Worksheets
Dim objwb As Workbooks
...
Set objwb = Workbooks("Aug06pieaccts.xls")
Set objSh = objwb.Worksheets(1) ----------- hier
With ThisWorkbook.Worksheets(2)
.Cells(1, 1).Value = "X"
.Cells(2, 1).Value = "0"
.Cells(3, 1).Value = Application.objwb.objSh.Range("B4") ----hier
end with
Set objSh = Nothing
Set objwb = Nothing
Die set - Anweisung läuft nicht, ich glaube die with - Anweisung Zeile 3
sieht auch net gut aus.
Vielen Dank und Gruss
ticonhh