Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 00:15:51
Passwort im Herbersforum ändern
15.10.2025 16:22:17
Datum ist nicht Datum :(
15.10.2025 15:02:20
Blockpfeile mit Makro gehen nicht mehr nach freigabe
15.10.2025 13:51:13
VBA - Fortschrittsbalken unabhängig von Zellen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1664to1668
1664to1668
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Target/Aktive Zelle - hervorheben- Tipps/Anregung

Forumthread: Target/Aktive Zelle - hervorheben- Tipps/Anregung

Target/Aktive Zelle - hervorheben- Tipps/Anregung
10.01.2019 20:33:26
STeve
Hi all......möchte die aktive Zelle einfach besser sichtbar hervorheben.
Das Blatt ist in den meisten Bereichen geschützt.
Mehrfachmarkierung/Selection nicht notwendig.
Code sollte natürlich nicht zu belastend sein.
Wer kann mir da seine/n knackigen Code's/Ideen/Tipps zur Verfügung stellen?
Besten Dank und mfg
STeve
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Target/Aktive Zelle - hervorheben- Tipps/Anregung
10.01.2019 23:29:53
onur 

Option Explicit
Public lTarget As Range
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If lTarget Is Nothing Then Set lTarget = Range("A1000")
Target.Interior.ColorIndex = 6
lTarget.Interior.ColorIndex = 0
Set lTarget = Target
End Sub

Anzeige
Danke.....funzt toll und schnell
11.01.2019 05:44:37
STeve
Hallo Onur....Danke klappt bestens.:-)
...wenn ich das Blatt entsperre und dann wieder schütze.
Dir noch einen schönen Tag und mfg
STeve
AW: Danke.....funzt toll und schnell
11.01.2019 17:59:50
Luschi
Hallo STeve,
leider hat die Lösung von Onur den Nachteil, daß der verwendete Datenbereich (UsedRange)
künstlich auf Zeile 1.000 ausgedehnt wird. Hier mein Vorschlag: 

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.Interior.ColorIndex = 6
If Not (lTarget Is Nothing) Then
lTarget.Interior.ColorIndex = 0
End If
Set lTarget = Target
End Sub
Das kann man leicht überprüfen mit: MsgBox Target.Parent.UsedRange.Address
Gruß von Luschi
aus klein-Paris
Anzeige
;

Forumthreads zu verwandten Themen

Autofilter via VBA wieder auf "ALLE" setzen
Patrick

Hallo Excel-VBA-Gemeinde,
ich habe ein kleines Problem mit Filtern.
Kann man den Filter wieder auf "Alle" setzen via VBA
Ich habe eine ComboBox (Alle, A, B) mit der ich filter
If .ComboBox1.Text = "A" Then
Selection.AutoFilter Field:=1, Criteria1:="A", Operator:=xlAnd
En...
24.10.2008 13:05:00
Thread-ID: 1018976
3 Beiträge
VBA heutiges Datum finden und Inhalt der Zelle prü
NeptunesChild

Hallo Leutz,
ich möchte in einer Zeiterfassung auf einem Monatsblatt das heutige Datum finden, dann in einer anderen Spalte (5 weiter links) eine Uhrzeit eintragen. Zuvor soll aber die Kontrolle erfolgen, ob in der Zelle bereits etwas steht und ob dies kleiner ist, als die aktuelle Zeit. We...
06.11.2008 15:38:08
Thread-ID: 1022323
3 Beiträge
Zellen umrahmen
Franz

Hallo zusammen,
ich möchte per Makro alle Zellen im Bereich A1:Z1000 umrahmen, in denen etwas steht (Formeln alleine wären kein Inhalt).
Ich weiß, dass geht über bedingte Formatierung, aber ich stehe mit dieser Formatierung auf Kriegsfuss, daher möchte ich darauf gerne verzichten.
K...
15.02.2009 14:49:00
Thread-ID: 1050880
4 Beiträge
VBA-Sverweis + Datum, mehr als 1 Zelle
Alex

Hallo Leute,
mit diesem Code führe ich für eine Datei einen Bearbeiternachweis.
Das läuft so, wenn jemand auf dem 1. Tabellenblatt eine Eintragung macht, wird dies auf dem 2. Tabellenblatt mit Name und Datum protokolliert.
Das geht, wenn man nur 1 Zelle beschreibt oder die Eintragun...
02.05.2009 16:43:02
Thread-ID: 1072438
11 Beiträge
Anzeige
VBA: Tagesdatum auf 3 Zellen aufteilen
KlausF

Hallo Forum,
ich stehe gerade vor folgendem Problem:
Ich habe einen Button, der zellfüllend in einer beliebigen Zelle steht, z.B. in A2
Ich möchte jetzt auf Klick immer das heutige Tagesdatum wie folgt aufteilen:
die darüber liegende Zelle (hier A1) bekommt den Tag von Heute() i...
15.10.2010 15:37:47
Thread-ID: 1182643
4 Beiträge
VBA Zeilenumbrüch in Zelle auslesen
Georg

Liebe Excellenzen,
ich habe eine aus drei Spalten verbundene Zelle die eine feste Größe hat (Breite und Höhe). In diese Zelle schreibe ich via VBA unterschiedliche Texte. Normalerweise hat die Zelle eine Formatierung von Arial 24. Dann sind 2 Zeilen lesbar bei meiner Zeilenhöhe von 62.
...
17.09.2011 12:03:41
Thread-ID: 1230297
3 Beiträge
VBA: Datum verschieben und in Zelle hinzufügen
Boris

Hallo Forum,
ich habe ein kleines Problem mit einem VBA code und hoffe hier kann mir jemand helfen.
Situation ist folgende:
a) ich habe eine Excel Tabelle mit Aufgaben; das Zieldatum steht in Spalte G.
b) Bei einer Verzögerung soll das Datum in G nach H verschoben werden (um ei...
06.09.2012 12:34:04
Thread-ID: 1277594
6 Beiträge
Probleme beim Setzen von Rahmen Eigensch. in VBA
Rahmen

Hallo Forum,
habe nach einem Umstieg von EXCEL 2003 auf EXCEL 2007 folgendes Problem.
Mehrere Dateien werden hintereinander durchlaufen (durch VBA geöffnet, bearbeitet, formatiert, geschlossen) und in jeder werden unter anderem folgende Befehle ausgeführt (n = Name eines Worksheets im...
14.01.2013 17:52:16
Thread-ID: 1294238
2 Beiträge
zellenumbruch vba
Spenski

hallo
habe 3 textboxen und füge die inhalte via & in eine zelle ein
gibt es die möglichkeit die 3 inhalte untereinander in einer zelle darzustellen?
gruss
13.05.2014 23:09:52
Thread-ID: 1361408
3 Beiträge
Anzeige
VBA Autofilter nach datum in zelle filtern
Spenski

hallo habe folgenden code mit dem recorder aufgenommen Sub Makro10() ActiveSheet.ListObjects("Tabelle1").Range.AutoFilter Field:=1, Operator:= _ xlFilterValues, Criteria2:=Array(2, "6/18/2014") End Sub damit filter ich in einer tabelle das datum . in dem beispiel den 18.06.2014.
statt der...
10.06.2014 02:48:59
Thread-ID: 1365201
2 Beiträge
VBA Wenn Datum in Zelle, dann summieren...
Susanne

Hallo,
in Spalte A habe ich Rohdaten mit Datum (ein Datum kommt immer mehrmals vor). In einem zweiten Tabellenblatt habe ich das Datum für jeweils einen Tag in einer Spalte aufgelistet.
Nun möchte ich, dass wenn z.B. der 20.10.2014 mehrmals im ersten Tabellenblatt ist, diese Zeilen gezä...
18.12.2014 10:36:32
Thread-ID: 1398826
6 Beiträge
Anzeige
VBA - Summe nur von sichtbaren Zellen
sichtbaren

Hallo Forum,
mit folgendem Code errechne ich mir die Summe einer bestimmten Spalte von Werten größer 0:
Range("E1").Value = WorksheetFunction.SumIf(Range(Cells(3, 19), Cells(3, 19).End(xlDown)), ">0")
With Range("E1")
.WrapText = False
.Font.Bold = True
End With
R...
29.05.2015 11:45:22
Thread-ID: 1428320
5 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige