online 1
gast (50)

/ Forum / Tabellenkalkulation

TabellenkalkulationTabellenkalkulation

Fragevon Wilfried77 vom 30.05.2019, 10:50 Options

Zellenmarkierung auf Spalten begrenzen!

Hallo,

ich bin nicht wirklich fit im Programmieren in EXCEL und brauche deshalb Hilfe!
Aus einer Beispieldatei aus dem Netz habe ich folgende Befehlszeilen kopiert, mit der ich markierte Zellen über einen Button in rot einfärben kann:


Sub farbe_rot()
ActiveSheet.Unprotect
With Selection.Interior
.ColorIndex = 3
End With
ActiveSheet.Protect DrawingObjects:=True, contents:=True, Scenarios:=True
End Sub


Diesen Befehl möchte ich jetzt auf die Spalten E bis G begrenzen, so dass nur markierte Zellen in diesen Spalten eingefärbt werden können! Markiere ich eine Zelle in einer anderen Spalte, soll diese nicht eingefärbt werden können!

Wer kann mir da weiterhelfen?


Antwort schreiben

Antwort 1 von JoeKe vom 30.05.2019, 11:04 Options

Moin Wilfried,

versuch es mal so:

Sub farbe_rot()
Dim Spalte As Integer
ActiveSheet.Unprotect
Spalte = Selection.Column
If Spalte > 4 And Spalte < 8 Then
Selection.Interior.ColorIndex = 3
ActiveSheet.Protect DrawingObjects:=True, contents:=True, Scenarios:=True
End If
End Sub



Gruß

Antwort 2 von Wilfried77 vom 30.05.2019, 11:16 Options

Danke JöKe!

Das funktioniert super!

Ähnliche Themen

excel numerische spalten
smd  23.04.2007 - 167 Hits - 1 Antwort

Exel spalten löschen und leere Spalten mit 0 füllen
Sandrak  16.06.2007 - 135 Hits - 9 Antworten

Größe eines Netzwerklaufwerkes begrenzen.
_mpact  27.06.2007 - 113 Hits - 6 Antworten

Ordnerbezeichnungen begrenzen
snietsdjuk  26.10.2007 - 82 Hits -

command & Conquer alarm stufe rot geschwindigkeit begrenzen
sancho_977  25.04.2008 - 53 Hits - 2 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Mon Jan 26 01:23:17 2026