Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
608to612
608to612
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Zellenformat mit bedingter Formel kopieren

Forumthread: Zellenformat mit bedingter Formel kopieren

Zellenformat mit bedingter Formel kopieren
09.05.2005 17:55:24
mykey2002
Moinsens zusammen,
wie kann ich die Textfarbe einer Zelle in einer Formel kopieren ?
=WENN(A9=1;A4;B4)
A4 --&gt roter Text "Achtung"
B4 --&gt grüner Text "OK"
Danke im Vorraus
Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellenformat mit bedingter Formel kopieren
09.05.2005 17:58:32
Hajo_Zi
Hallo myky2002
mit Formeln können keine Formate übergeben werden.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem Windows 2000 SP4 und Excel Version 2000 SP3.



"Wer Rechtschreibfehler findet, darf sie behalten!"
Dies gilt auch für Bert.
Anzeige
AW: Zellenformat mit bedingter Formel kopieren
09.05.2005 18:00:27
mykey2002
Hmm okay ...
muss ich das dann über ein Makro oder Modul formatieren ?
Danke im Vorraus
AW: Zellenformat mit bedingter Formel kopieren
09.05.2005 18:03:06
Hajo_Zi
Hallo mykey2002
Über ein Makro.
Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.

"Wer Rechtschreibfehler findet, darf sie behalten!"
Dies gilt auch für Bert.
Anzeige
AW: Zellenformat mit bedingter Formel kopieren
09.05.2005 18:18:27
mykey2002
Kannst Du mir evtl. sagen wie das Makro erstelle ? Wo finde ich eine Anleitung für dieses Makro ?
Vielen Dank !
AW: Zellenformat mit bedingter Formel kopieren
09.05.2005 18:25:13
Hajo_Zi
Hallo mykey2002,

Sub Werte_Format()
Range("C10").Copy
Range("A1").PasteSpecial Paste:=xlFormats      ' Formate
Application.CutCopyMode = False
End Sub

Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.

"Wer Rechtschreibfehler findet, darf sie behalten!"
Dies gilt auch für Bert.
Anzeige
AW: Zellenformat mit bedingter Formel kopieren
09.05.2005 18:27:11
Luc:-?
Hallo mykey,
das, was du in diesem einfachen Bsp erreichen willst, kannst du mit bedingter Formatierung realisieren. Wenn hierzu Fragen, F1 drücken oder ? anklicken. Wenn's nicht reicht: im Forumsarchiv existiert kilometerweise Material zum Thema Bedingte Formatierung einschl. VBA-Codes und Verweisen auf Fremdtools. Wenn es ein Format sein soll, dass die bedingte Formatierung nicht unterstützt, musst du wirklich in die VBA-Kiste greifen. Da gibt's dann auch 'nen Trick, mit dem eine benutzerdefinierte Funktion (in einer Formel) eine Formatübertragung anstoßen nicht vornehmen kann.
Gruß Luc :-?
Anzeige
AW: Zellenformat mit bedingter Formel kopieren
09.05.2005 18:37:15
mykey2002
Klappt das denn wenn ich diese Formatierung benutze ?

Private Sub Worksheet_Change(ByVal Target As Range)
With Range("B9")
If .Value = "OK" Then
.Interior.ColorIndex = 4
.Font.ColorIndex = 4
ElseIf .Value = "Achtung !!" Then
.Interior.ColorIndex = 3
.Font.ColorIndex = 3
End If
End With
End Sub

In Zelle B9 sitzt die Formel =WENN(A9=1;A4;B4) . . . . .
MfG
max
Anzeige
AW: Zellenformat mit bedingter Formel kopieren
09.05.2005 21:49:45
Hajo_Zi
Hallo max,
einfach Testen.
Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.

"Wer Rechtschreibfehler findet, darf sie behalten!"
Dies gilt auch für Bert.
Anzeige
AW: Zellenformat mit bedingter Formel kopieren
12.05.2005 16:50:35
mykey2002
danke shcön hat soweit geklappt !
:)

Forumthreads zu verwandten Themen

Spalten ausblenden wenn Bedingung erfüllt
Thorsten
Hallo zusammen,
Ich habe ein Modell, wo ich in Zeile 2 von Spalte F bis AS sich jeweils Produktnamen befinden können (= maximal 40 Produkte). In den nachfolgenden Zeilen werden dann verschiedene Daten / Produkt abgefragt. (aber das nur zur Info)
Wie kann ich die Spalten automatisch ausblende...
05.12.2023 23:43:18
Thread-ID: 1956661
5 Beiträge
Zeile mit Suchbegriff+2 Zeilen sichtbar
Burghard
Hallo,
ich möchte Zeilen ausblenden, die nicht eine Bedingung erfüllen, mit einer Ergänzung: Wenn der Suchbegiff gefunden wird, soll die Zeile mit dem Suchbegriff sichtbar sein, aber die nachfolgenden zwei Zeilen unter der Suchbegriffszeile sollen ebenfalls sichtbar sein. Der Suchbegriff kommt i...
17.08.2021 22:33:47
Thread-ID: 1843926
9 Beiträge
Drucken aller eingeblendeten Zeilen mit Überschrif
Gernot

Hallo Excel-Gemeinde,
es geht um das Drucken von nicht-ausgeblendeten Zellen. Der Marc hatte mir bereits sehr gut geholfen beim ein- und ausblenden von Zeilen nach einem bestimmten Kriterium.
Die Datei, um die es geht, findet ihr hier:
https://www.herber.de/bbs/user/27607.xls
Die...
18.10.2005 20:15:42
Thread-ID: 683591
1 Beitrag
Suche in Array - Ausblenden
Aloha

Hallo.
Wäre toll wenn mir jemand helfen könnte - bin leider wirklich nur VBA Beginner :(
Ich habe eine Excel-Datei, in die per DDR Schnittstelle regelmässig Daten einfiessen, die ich dann verarbeite/sortiere usw.
Um nur mit erwünschten Datensätzen/Zeilen zu arbeiten , blende ich Zei...
09.02.2015 21:41:11
Thread-ID: 1408292
2 Beiträge
Zeilen in Abhängigkeit einer Bedingung ausblenden
Volker

Hallo zusammen,
ich bekomme trotz intensiver Recherche und meiner Mühen mein Problem nicht gelöst.
Wie hier in einem Archivthreat beschrieben möchte ich alle Zeilen eines Tabellenblatts in Abhängigkeit einer Bedingung ausblenden.
Im Prinzip identisch wie in dieser Beispieldatei:
...
21.11.2017 12:42:51
Thread-ID: 1592654
8 Beiträge
Zeilen ausblenden wenn Bedingung erfüllt ist
Schlandro

Hallo,
ich würde gerne per VBA Zeilen ausblenden wenn in einer bestimmten Zelle (D7) ein bestimmter Wert ausgegeben wird. Heißt wenn beispielsweise XY ausgegeben wird sollen Zeilen 25 bis 30 ausgeblendet werden.
Nun zu meinem Problem, ich habe Schwierigkeiten das "Private Sub" auszuführ...
31.07.2019 14:01:10
Thread-ID: 1705135
18 Beiträge
Zeilen ausblenden mit Bedingung per Makro ohne Button
Elysa1891
Hallo zusammen,
die Basis ist ein Excel-Formular,dass zur Erfassung von Daten zur Reisekostenabrechnung.Dabei gibt es in ZelleB4 ein Drop-down mit der Auswahl(hinterlegt in anderem Tabellenblatt) Reisekosten und Belege ohne Reise.
Ich möchte, dass wenn im Drop-down Belege ohne Reise ausgewä...
22.05.2024 13:37:29
Thread-ID: 1978834
9 Beiträge
Ausblenden leerer Zellen
Gerhard

Hallo,
ich möchte mit Excel ein Formular erstellen, bei dem bestimmte Texte nur unter bestimmten Bedingungen erscheinen.
Wenn ich in den Zellen =Wenn(Bedingung;"Text";"") eingebe, dann nimmt die Zelle dennoch den für den Text vorgesehenen Platz ein. Lässt sich dies vermeiden, z.B. dadur...
21.10.2009 21:35:11
Thread-ID: 1111080
1 Beitrag
Makro mit Autofilter + speichern unter in Schleife
Frank

Hallo zusammen,
ich habe folgendes Makro für eine Togglebox: Private Sub ToggleButton4_Click() Call Blatt_entsperren If CBool(ToggleButton4.Value) Then 'es gibt nur Wahr oder Falsch, daher keine weitere _ Bedingung nötig. Wahr = Ausführung, Falsch = Else ToggleButton4.BackColor = &H80...
19.12.2016 17:11:20
Thread-ID: 1530920
3 Beiträge
Zeilen mit Bedingung ausblenden
AbertTV
Hallo,
Ich hoffe hier kann man mir helfen.
Ich versuche meine Buchführungs-Exceltabelle aufzuwerten. Dafür habe ich pro Monat 216 Zeilen für einträge(4-219), was für mich auf jeden Fall reicht. Anfangs sollen die Zeilen 219-6 augeblendet sein.
Was ich dann zu erreichen versuche, dass sob...
10.01.2022 02:05:53
Thread-ID: 1864677
7 Beiträge
Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum