Office: Objekt erforderlich

Hallo,

ich möchte das mir die Zeile in der ich meinen Cursor gesetzt haben nach drücken des Buttons die Zeile von A bis O einfärbt.
Dazu habe ich mir folgendes zusammengebaut, allerdings kommt immer Objekterforderlich Laufzeitfehler 424????

Private Sub CommandButton1_Click()

Range("A" & Target.Row & "*redface.gif*" & Target.Row).Interior.ColorIndex = 6
Cells(Target.Row, Target.colum).Select


End Sub


Ist bestimmt ganz einfach, sehe es aber nicht.
Kann mir bitte jemand halfen...

:)

 

Hallo!

Du hast "target" nicht deklariert. Die Prozedur weiss nicht was "target" ist. Nimm stattdessen ActiveCell.Row. Die zweite Zeile kannst Du weglassen, es besteht kein Grund etwas zu selektieren.

Gruß, René

 

Hallo mumpel,

danke. Das war es, natürlich...

Mir ist gerade noch waas aufgefallen. Die Farbe, hier mit 6 festgelegt.
Für den Realbetrieb muss ich aber Benutzerdefinierte Farben (R255, G217, B102) festlegen.
Wie/Wo kann das gemacht werden?

 

Code:

Bitte beachten: Color nicht ColorIndex

 

Hallo rastrans,

klasse, das macht was es soll.
Ich danke euch beiden für die schnelle Hilfe.