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

Wenn, dann Makro?

Forumthread: Wenn, dann Makro?

Wenn, dann Makro?
20.10.2002 15:57:04
Dino
Hallo,

wie mache ich dies per Makro:

wenn in Spalte D ein "58" steht dann soll der Zelleninhalt in Splate J und Spalte K in Schriftfarbe: rot sein.

Danke vorab....

Gruß
Dino


Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Wenn, dann Makro?
20.10.2002 15:58:46
Boris
Hallo Dino,

irgenwo in der Spalte D oder in einer bestimmten Zelle?
Und welche Zellen in Spalte J und K sollen dann rot werden?

Gruß Boris

Re: Wenn, dann Makro?
20.10.2002 16:06:09
PeterW
Hallo Dino,

warum nicht einfach per bedingter Formatierung?

Gruß
Peter

Re: Wenn, dann Makro?
20.10.2002 18:59:03
Dino
Hallo,

@Peter

weil ich es in ein anderes Makro einbinden möchte.

@Boris

Beispiel:


D4: 58 dann J4 und K4 (rot)
D5: 14 dann keine Änderungen
...
...
D9: 58 dann wieder J9 und K9 (rot)
usw.

Gruß
Dino

Anzeige
Re: Wenn, dann Makro?
20.10.2002 19:42:08
PeterW
Hallo Dino,

also in der gleichen Zeile. Dann wäre noch zu klären, wann der Farbwechsel erfolgen soll. Am einfachsten direkt bei der Eingabe in Spalte D.
In das Klassenmodul der Tabelle:

Gruß
Peter

Re: Wenn, dann Makro?
20.10.2002 20:36:28
Dino
Hallo Peter,

Der Farbwechsel soll erfolgen wenn ich das Makro ausführe (wird nur einmal ausgeführt).

Gruß
Dino

Anzeige
Re: Wenn, dann Makro?
20.10.2002 20:54:18
PeterW
Hallo Dino,

dann lass folgenden Code laufen:

Gruß
Peter

Re: Wenn, dann Makro?
21.10.2002 02:40:32
Dino
Hi Peter,

leider bleibt das Makro hier stehen:

lgLetzte = [d65536].End(xlUp)


Gruß
Dino

Re: Wenn, dann Makro?
21.10.2002 10:45:13
PeterW
Hallo Dino,

irgendwelche Fehlermeldungen? Du hast nicht zufällig einen Haltepunkt gesetzt?

Gruß
Peter

Anzeige
Re: Wenn, dann Makro?
21.10.2002 11:00:47
PeterW
Sorry Dino,

da fehlt eine Kleinigkeit. Richtig muss die Zeile so aussehen:
lgLetzte = [d65536].End(xlUp).Row

Gruß
Peter

Re: Wenn, dann Makro?
21.10.2002 11:26:38
Dino
Hi Peter,

vielen Dank es hat super geklappt....

viele grüße
Dino

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