Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1724to1728
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Den Inhalt von Zellen einer bestimmten Farbe nach einem Schema ergänzen

Den Inhalt von Zellen einer bestimmten Farbe nach einem Schema ergänzen
26.11.2019 11:48:47
Zellen
Hallo,
ich möchte die Zellen einer Tabellenspalte (D) per Makro danach absuchen, welche davon eine blaue Schrift haben. Diese (blauen) Zellen sollen dann nach einem Schema umbenannt werden.
Laut Makroaufzeichnung ist der Farbton: xlThemeColorAccent1
Der Zellenname soll wie folgt umgewandelt werden:
„“
Aus der (blau beschrifteten) Zelle
123
wird also

usw.
Beispieldatei: https://www.herber.de/bbs/user/133442.xlsx
Schöne Grüße,
Tobias

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Den Inhalt von Zellen einer bestimmten Farbe nach einem Schema ergänzen
26.11.2019 12:01:07
Zellen
Hallo Tobias,
so (siehe Tabelle "Vor Makro"). Code in Module1:
https://www.herber.de/bbs/user/133443.xlsm
Bemerkung fuer das naechste mal. Wenn du eine VBA Loesung suchst, dann lade deine Beispieldatei bitte auch als .xlsm Datei hoch. Danke.
Gruss Torsten
AW: Den Inhalt von Zellen einer bestimmten Farbe nach einem Schema ergänzen
26.11.2019 13:21:50
Zellen
Hallo Torsten,
Klappt super! Vielen Dank und wird gemacht.xlsm
Schöne Grüße,
Tobias
gerne und danke fuer die Rueckmeldung
26.11.2019 13:22:47
Torsten
AW: gerne und danke fuer die Rueckmeldung
26.11.2019 15:38:35
Tobias
Ho Torsten,
jetzt ist mir doch noch etwas aufgefallen: Wenn in den Zellen der Inhalt mit einer Null beginnt, beispielsweise 020 dann entfällt die erste Null bei der Umbenennung.
Aus 020
wird also:
Kann man das verhindern?
Danke und Grüße,
Tobias
Anzeige
AW: gerne und danke fuer die Rueckmeldung
27.11.2019 07:26:23
Torsten
Hallo Tobias,
bei mir nicht. Jedenfalls nicht, wenn der Inhalt der Zelle ein Text ist. Also z.B. "020blabla"
Oder auch eine Zahl, als Text formatiert.
Gruss Torsten
AW: gerne und danke fuer die Rueckmeldung
27.11.2019 12:05:43
Tobias
Hi Torsten,
die Spalte ist dummerweise nicht als Text formatiert und eine Umwandlung unter Beibehaltung der Null scheint gar nicht so einfach zu sein, zumindest habe ich zu diesem naheliegenden Thema nichts gefunden ...
Über Selection.NumberFormat = "@" beispielsweise wird aus 020 leider 20
Hast Du eine Idee? Ansonsten poste ich das noch extra.
Danke und Grüße,
Tobias

307 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige