Office - Word, Excel und Co. 9.741 Themen, 41.378 Beiträge

Verfolgung starten Optionen

Ich habe eine Frage zu Makros

pappnasen / 7 Antworten / Flachansicht Nickles

Ich habe eine Tabelle mit 4 Arbeitsblättern.

Ich habe ein Makro, dieses soll aber nur in einem Arbeitsblatt ausgeführt werden.

Sub Farbe()
 Worksheets("Ausgaben").Activate
 ActiveCell.Font.ColorIndex = 1
End Sub

Ich mache damit rote Farben schwarz.

Wenn ich das nun in einem anderen Arbeitsblatt starte,  dann öffnet es das Arbeitsblatt "Ausgaben".
Ich möchte aber, dass es dann nicht anspringt.
Kann man das verhindern?

Danke.

bei Antwort benachrichtigen
Sorgt dafür, dass das Arbeitsblatt ausgaben gewählt wird. Du könntest mit ActiveSheet prüfen prüfen ob die ... Borlander
Ja, das geht. Am Anfang: If ActiveSheet.Name Ausgaben then end Danke. pappnasen
mumpel1 pappnasen „Ja, das geht. Am Anfang: If ActiveSheet.Name Ausgaben then end Danke.“
Optionen

Hallo!

"End" ist denkbar schlecht, denn das zerstört das ganze VBA-Projekt, leert also auch alle öffentlichen Variablen. "Exit Sub" wäre besser.

Einfacher wäre es mit dem Tabellenereignis "Worksheet_Change". Oder "Worksheet_BeforeDoubleClick" (Damit kann man das Einfärben per Doppelklick steuern. "Worksheet_Change" dagegen reagiert auf alle Eingaben im Tabellenblatt).

Gruß, René

bei Antwort benachrichtigen
Hallo mumpel1, danke für die Hilfe. Das mit dem Exit Sub ist mir neu. Allerdings hat mich das in anderen VBA-Dateien noch ... pappnasen
Nein. Das gehört in den Codebereich der Tabelle. Rechtsklick auf den Reiter der gewünschten Tabelle Code anzeigen . ... mumpel1
Den kannst Du aber selber machen. Im VBA-Editor auf Extras Option Editorformat. Hintergrund Hintergrundfarbe, Vordergrund ... mumpel1
Das habe ich bis heute noch nie gewusst. Recht herzlichen Dank. Die meisten Programme können das nicht und die bediene ich ... pappnasen