Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Aktive Zelle farbig/kopieren

Aktive Zelle farbig/kopieren
03.07.2006 13:45:08
Philip
Hallo Experten,
ich habe folgenden Code um die aktive Zelle farbig zu markieren:

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
On Error Resume Next
ActiveSheet.Unprotect
If Target.Count > 1 Then Exit Sub
lastcell.Interior.ColorIndex = farbe
farbe = Target.Interior.ColorIndex
Target.Interior.ColorIndex = 19
Set lastcell = Target
End Sub

Leider kann ich jetzt nicht mehr normal kopieren- hat jemand eine Idee, wie ich den Code anpassen könnte? Danke im Voraus.
Gruss,
Philip
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Aktive Zelle farbig/kopieren
03.07.2006 14:19:37
Mustafa
Hallo Phillip,
wenn du mit Mausklicks Kopierst dann versuch es mal mit diesem Code :

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Target.Interior.ColorIndex = farbe
End Sub

Ansonsten weiss ich nicht weiter.
Rückmeldung wäre nett.
Viele Grüße aus Köln.
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige