hallo,
gibt es eigentlich eine möglichkeit den zellen in excel einen namen zu geben, damit von access auf diese zelle zugegriffen werden kann, auch wenn diese verschoben wird?
hoffe hier weiss einer rat.
cu, wh
Das geht recht einfach per OLE-Automation:
Private Function Feldinhalt(FeldName)
Dim ExcelApp As Object
Set ExcelApp = CreateObject("Excel.Application")
ExcelApp.Workbooks.Open "MeineDatei.XLS"
ExcelApp.Goto Reference:=FeldName
FeldInhalt = ExcelApp.ActiveCell.Value
Set ExcelApp = Nothing
End Function
(Verweis auf die Excel-8.0-Objektbibliothek nicht vergessen!)
Reinhard
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]