Exceldatei von Access aus formatieren

Computer: Software & Programmierung Microsoft Access
#1

Ich möchte in einer Excel-Datei die Rahmen einzelner Zellen von Access aus bestimmen. Anfangen würde ich so:

Dim ExcelBlatt As Object
Set ExcelBlatt = GetObject(„c:\Dokumente und Einstellungen\Mischka1\Eigene Dateien\Mappe2.xls“, „excel.sheet“)

ExcelBlatt.worksheets(1).cells(1,4). ???

Aber wie lege ich den Rahmen fest?

Micha

#2

Ich möchte in einer Excel-Datei die Rahmen einzelner Zellen
von Access aus bestimmen. Anfangen würde ich so:

Dim ExcelBlatt As Object
Set ExcelBlatt = GetObject(„c:\Dokumente und
Einstellungen\Mischka1\Eigene Dateien\Mappe2.xls“,
„excel.sheet“)

ExcelBlatt.worksheets(1).cells(1,4). ???

Aber wie lege ich den Rahmen fest?

ExcelBlatt.worksheets(1).cells(1,4).Borders oder
ExcelBlatt.worksheets(1).cells(1,4).BorderAround

Weitere Infos in der VB Hilfe.

Gruß
Christian

#3

Tach Christian!

Danke erst einmal für die schnelle Antwort, aber es funktioniert einfach nicht. Beim Ausführen von

ExcelBlatt.worksheets(1).cells(3, 4).Borders …

tritt folgender Fehler auf:

Laufzeitfehler 438 : Objekt unterstützt diese Eigenschaft oder Methode nicht.

Tja - weiss auch nicht weiter, obwohl das, was Du da geschrieben hast eigentlich logisch aussieht.

Vielleicht fehlt aber auch irgend ein Verweis. Bloss welcher?

Wem fällt da noch was ein?

#4

Da muss ich das von vorhin zurücknehmen - es hat hingehauen und zwar so:

ExcelBlatt.worksheets(1).cells(1, 3).Borders(xlEdgeLeft).LineStyle = 1

man sollte alle Parameter angeben, sonst funktionierts nicht!!!

Vielen Dank noch mal!

Gruss

Micha

#5

Hab’ ich doch gesagt

Weitere Infos in der VB Hilfe.

Gruß
Christian