von Access VBA in Excel Zellfarbe ändern ?

[Coolman1974]

Hallo!

Ich würde gerne von Access VBA auf eine Exceldatei zugreifen und in einem Datenblatt z.B: Zelle A1 mit der Farbe blau füllen.

Hat jemand ne idee ?

Irgendwie so ?

ExcelSheet.Application.Cells(1,1).BGCOLOR = VBBLUE .... oder so

Vielen Dank für eure Mühe 1

[Meenzer]

Hallo,

also ich denke , es könnte so gegen (Access 97):

  

  Const Vorlage = "C:\DeineDatei.xls"

  Dim ExcelObj As Object

  Dim ExcelWbk As Object

  Set ExcelObj = Excel.Application

  Set ExcelWbk = ExcelObj.Workbooks.Open(FileName:=Vorlage)

  With ExcelObj

    .Range("A6").Select

    With Selection.Interior

        .ColorIndex = 5 'hier kommt Deine Farbe hin

        .Pattern = xlSolid

    End With

  End With

  'speichern

  ExcelObj.activeworkbook.SaveAs Vorlage

  ExcelWbk.Close SaveChanges:=True

  Set ExcelWbk = Nothing

  Set ExcelObj = Nothing

Gruß Meenzer

[Coolman1974]

Also vielen Dank für deine Hilfe !

Ich bin schon im Objektkatalog von Excel fündig geworden.

:StefanE