Microsoft Excel

Herbers Excel/VBA-Archiv

AdressLocal & RelativeTo



Excel-Version: 9.0 (Office 2000)

Betrifft: AdressLocal & RelativeTo
von: vierspaenner
Geschrieben am: 10.06.2002 - 11:41:49

Set mc = .Range("H5:I9").Item(1, 1)
z = 1
r = "A"
.Range(r & z).Value = mc.Address(ReferenceStyle=xlR1C1, _
RowAbsolute=False, _
ColumnAbsolute=False, _
RelativeTo=ExApp.Worksheets(1).Cells(2, 2), _
External=True)
r = "B"
.Range(r & z).Value = mc.AddressLocal(ReferenceStyle=xlR1C1, _
RowAbsolute=False, _
ColumnAbsolute=False, _
External=True, _
RelativeTo=ExApp.Worksheets(1).Cells(2, 2))

Diese Zeilen in Excel bzw aus einer VBA-Applikation ausgeführt ergibt:
A1= [Book1]Sheet1!R[3]C[6]
B1= [Book1]Sheet1!R[3]C[6]

Selbiges aus Lotus WordPro
A1= Error # 13
B1= Error # 13

Dies passiert erst wenn der Parameter "RelativeTo" hinzukommt, alle anderen werde korrekt ausgeführt.

Wo gibt es Hinweise, daß gewisse OLE/COM Befehle nicht funktionieren?