Excel Makro Zeile einfärben?

Guten Tag zusammen.

Ich möchte eine Excel-Tabelle erstellen, in denen mehrere Zellen eine Checkbox haben. Ich möchte nun, dass wenn eine bestimmte dieser 5 Checkboxen in einer Zeile angeklickt wird, dass sich die komplette Zeile grün färbt und wenn der Haken wieder raus ist soll sich die Zeile wieder weiß färben.
Aktuell habe ich eine eher suboptimale Lösung in der ich für alle 200 Zeilen für jede Checkbox ein eigenes Makro erstellt habe und beim Anklicken ebenjener in die Zelle, in der auch die Checkbox ist, ein X eingetragen wird und sich dadurch die Zelle grün färbt.

Kann mir da jemand helfen? :)

1 Antwort

Suboptimierer

Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer

Microsoft Excel

12.02.2020, 13:48

Wenn es nicht unbedingt eine Checkbox sein muss, kannst du das SelectionChange-Ereignis abfangen.

Bestehst du auf Checkboxen, würde ich durchnumeriert benamsen, z. B. MeineCheckbox###. Dann Filterst du MeineCheckbox heraus und kannst anhand der verbliebenen Nummer eine Zuordnung zu der Zeile vornehmen. Mit Worksheets(1).Rows(i) kannst du dann die Zeile gezielt manipulieren.

Anonym96

Beitragsersteller

12.02.2020, 17:56

Da ich mit Excel nicht allzu bewandert bin (Hab die Makros mit "Makros aufzeichnen" erstellt), könntest du mir ein dafür passendes Makro schicken? Oder wäre das zu umständlich?
Danke trotzdem vorab für deine Hilfe :-)

Suboptimierer

13.02.2020, 10:53

@Anonym96

Sorry, das ist für mich im Moment zu aufwändig.

Vor allem hast du am Ende nicht mehr oder weniger als einen Schönheitseffekt.

Suboptimierer

12.02.2020, 14:10

Achso und dann kannst du für alle Checkboxen auch dasselbe Event verwenden.

Beim Workbook.Open weist du in einer Schleife allen Checkboxen als Clickevent eine Prozedur zu.

Ähnliche Beiträge

Excel Gruppierung mit Makro anlegen?

Hallo,

ich erstelle gerade einen Projektplan und würde gerne ein Makro einbinden das ein Untergruppierung für eine Zelle einbindet wenn ich die Zelle anklicke.

z.B. ich klicke Zelle B22 an und es wird eine neue Zeile darunter mit "Plus" Gruppierung angelegt.

...zum Beitrag

Excel Makro Kontrollkästchen mit Zellbezug?

Hi, ich würde gerne immer die Zellverknüpfung eines Kontrollkästchens auf die überliegende Zelle beziehen. Jetzt habe ich ein Makro gefunden, welches scheinbar immer die rechte Nachbarzeile zuweist, ich hätte aber gerne die darüberliegende, wie muss ich dieses Skript anpassen?

Option Explicit 
Sub
 zellverknuepfung()
Dim Cb As CheckBox
For Each Cb In Tabelle1.CheckBoxes
Cb.LinkedCell = Cb.TopLeftCell.Offset(0, 1).Address
Next Cb
End Sub

Habe ca. 100 Kästchen und finde das per Hand sehr mühsam.
Bin froh um jeden Tipp :)

...zum Beitrag

Excel - Wenn Bedingung erfüllt, dann folgende/restliche Zellen/Zeilen einfärben?

Hallo!

Ich habe folgendes Problem:

Als Beispiel habe ich den Bereich A1 - A10. Wenn ich "RE" in Zelle A3 eintrage, soll sich A3 - A10 einfärben. Genauso wenn ich in A5 "RE" eintrage, soll sich A5 - A 10 einfärben. Oder wenn ich A4 nutze, dann A4 -A10.

Es soll sich quasi immer die Zelle selbst und die darauffolgenden Zellen bzw. die restliche Zeile einfärben, je nach dem welche Zelle ich ausfülle. Es kann also auch A1, A2, A7, etc. sein.

Ich kenne nur die Formatierungen mit denen ich entweder die Zelle selbst nur einfärbe und die ganze Zeile A1 - A10. Ich möchte aber nur teilweise einfärben.

Geht das?

Vielen Dank im Voraus!

...zum Beitrag

Excel 2016: Wie kann ich bestimmte farbige Spalten mit einem Makro ausblenden?

Hallo zusammen

Ich habe eine Exceltabelle mit verschiedenen Farben. In der Spalte F, Zeile 9-70 habe ich verschiedene Farben (rot, grün, orange). Nun will ich über eine Schaltfläche alle roten und grünen Zeilen ausblenden. Leider kenne ich mich damit nicht so wirklich aus. Was ich weiss, dass dies mittels Makro gemacht werden muss. Am Ende will ich einfach einen "Knopf" haben mit welchem ich die roten und grünen Zellen ausblenden kann, aber auch wieder einschalten.

Freue mich über eure Antworten

Gruss

...zum Beitrag

Excel Makro - Button erstellen in Zelle A, Zählung der Klicks in Zelle B?

Moin liebe Excel Experten, ich bräuchte mal eure Hilfe.

Und zwar will ich ein Makro erstellen, dass folgendes bewirkt.

Ich will bspw. in Zelle A4 drauf klicken und das System soll dann in Zellen V4 pro Klick immer +1 rechnen.

Das will ich dann natürlich auch für A5, A6, A7 und so weiter.

Kann mir da einer ne Lösung anbieten?

Falls ja, bedanke ich mich schon vorab, ihr würdet mir damit sehr helfen! 🙏🏻

...zum Beitrag

Excel Formel Zeile färben?

Hallo,

welche Formel brauche ich, sodass sich die ganze Zeile gelb bzw. grün färbt, wenn ein Haken bei “bestellt” oder “angekommen” drin ist, oder rot bleibt, wenn kein Haken drin ist.

...zum Beitrag

Wie kann man ein Makro in mehreren Zeilen wiederholen?

Ich soll für einen Bekannten in der Feuerwehr ein Makro zu einer Excel Liste schreiben. Konkret: - Wenn in Spalte B ein "A" für Atemschutz steht, soll die Zeile rot hinterlegt werden. Das Makro dazu habe ich auch schon geschrieben. Das Problem: Ich müsste dieses Makro jetzt für jede Zeile neu kopieren und abändern. Gibt es eine Möglichkeit das Makro für jede Zeile zu wiederholen?

Tabelle und Makro anbei.

...zum Beitrag

VBA Excel Makro komplette Zeile löschen,wenn bestimmte Wörter enthalten

 Dim arrSuchbegriff, i&
 arrSuchbegriff = Array("Suchbegriff1", "Suchbegriff2", "", "SB3")

 For i = LBound(arrSuchbegriff) To UBound(arrSuchbegriff)
     ActiveSheet.Columns("A").Replace arrSuchbegriff(i), "###@@@###", xlPart, MatchCase:=False
 Next i
 ActiveSheet.Columns("A").AutoFilter Field:=1, Criteria1:="*###@@@###*"
 ActiveSheet.Cells.Delete

Das Makro klappt, allerdings löscht es mir nur die Zelle in der der Begriff enthalten ist, und nicht die komplette Zeile. Kann jemand helfen? Viele Grüße

...zum Beitrag

Kann ich in Excel auch nur die "checked" Kontrollkästchen zählen?

Hi,
ich bin absoluter Excel Anfänger.

Ist es möglich in Excel nur die markierte Checkbox, von mehreren Checkboxen in einer Zelle, zu zählen und als Zahl bzw. Ergebnis in einer separaten Zelle darzustellen?

Wenn ja, ist es etwa als Formel oder als Makro so einstellbar, dass man das nicht für jedes Kontrollkästchen neu schreiben muss?

Im folgenden Bild habe ich versucht, darzustellen was ich meine:

Ich möchte nur die Häkchen in den Checkboxen mit dem Text "A" zählen.
Hab zwar eine Möglichkeit mittels Zellenverknüpfung und einer Zählenwenn-Formel, in den Zellen zur Zeile bei "Summe" gefunden, jedoch ist es sehr mühselig diese Verknüpfung und Formel für jede Zeile händisch anlegen zu müssen.

Was soll erreicht werden?

Ich möchte eine Art Einsatzplaner für die Arbeit erstellen mit welchem man darstellen kann wann wer welche Art Einsatz an welchem Tag hat, und die Häkchen bei Kästchen mit "A" sollen unter der Tabelle gezählt und als Ergebnis dargestellt werden.

Vielleicht hat jemand die rettende Antwort.

MfG,

CoolCoala

...zum Beitrag

Ungesperrte Zellen einfärben trotz Blattschutz?

Hallo,

ich habe ein Excel Tabellenblatt. Dieses habe ich mit einem Blattschutz versehen. Die Zellen AF7:AG136 sind von diesem Schutz befreit bzw. nicht gesperrt. Jetzt möchte ich allerdings, dass diese Zellen eingefärbt werden können. Ich dachte zunächst an eine bedingte Formatierung, jedoch funktioniert dies nicht, da der einzutragende Text zudem noch variabel ist. Gibt es ein Makro, was mir das Einfärben des genannten Bereiches ermöglicht?

LG Syrena

...zum Beitrag

Excel Makro Spalten Markieren wenn Zelle bestimmten Inhalt hat

Hallo liebe Excel Freunde,

ich habe folgende Frage. Ich habe eine Tabelle mit einer Reihe von Tagen. Nun möchte ich in meinem Makro aber prüfen, dass wenn in der Zeile eine Zelle mit Sa oder So steht, dass es mit dann Die Spalte der Zelle farbig markiert. Weiß jemand wie dass geht, und gibt mir mal nen kleinen Denkanstoß?

...zum Beitrag

Excel VBA Makro Code?

Guten Tag zusammen,

Undzwar geht es darum das ich ein Makro erstellt habe der sieht so aus :

Sub Makro1()

' Makro1 Makro

Range("D3").Select

Application.CutCopyMode = False

Selection.Copy

Sheets("1M").Select

Range("C6").Select

ActiveSheet.Paste

Sheets("Tabelle1").Select

Range("J3").Select

Application.CutCopyMode = False

Selection.Copy

Sheets("1M").Select

Range("C7").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Sheets("Tabelle1").Select

Range("R3").Select

Application.CutCopyMode = False

Selection.Copy

Sheets("1M").Select

Range("C13").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("D26").Select

Application.CutCopyMode = False

Selection.Copy

Sheets("Tabelle1").Select

Range("H3").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

End Sub

Das Problem ist jetzt das ich möchte das er in der Excel Tabelle jede Zeile mit diesem Makro ausfüllt sprich er soll bei Zeile 3 anfangen und bis 322 weiterführen ich habe 2 Mappen 1. "Tabelle1" und "1M"

Tabelle1 hatt die 322 Zeilen aber er springt nicht zur jeder Zeile und die Zelle "D3" , "J3", "R3", "H3" sollten dann auf die nächste Zeile Springen Sprich "D4", "J4" , "R3" , "H4" wenn er auch in der 4 Zeile ist

die restlichen Zellen sollen festbleiben zugehörig zu Mappe "1M"

ich hoffe es ist verständlich was ich meinte :'D

...zum Beitrag

Excel VBA Pfeiltasten überwachen?

Wie kann ich in Excel die Pfeiltasten überwachen lassen, d. h., immer wenn ich in der Tabelle "Tabelle1" die rechte Pfeiltaste drücke, soll nicht die Zelle rechts von der aktuellen Zelle ausgewählt werden (wie es ja normal wäre), sondern das Makro "Makro1" ausgeführt werden.

Geht das überhaupt?

...zum Beitrag

Excel Wenn-Dann Funktion mit Zellen einfärben?

Wie kann ich bei excel eine bestimmte Zelle grün einfärben wenn in einer anderen (!) Zelle ein Wert >0 steht und rot einfärben wenn kein Wert darin steht?

Danke im Voraus

...zum Beitrag

Was möchtest Du wissen?

Deine Frage stellen