Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
168to172
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
168to172
168to172
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Wenn, dann Makro?

Wenn, dann Makro?
20.10.2002 13: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


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

Betreff
Datum
Anwender
Anzeige
Re: Wenn, dann Makro?
20.10.2002 13: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 14:06:09
PeterW
Hallo Dino,

warum nicht einfach per bedingter Formatierung?

Gruß
Peter

Re: Wenn, dann Makro?
20.10.2002 16: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

Re: Wenn, dann Makro?
20.10.2002 17: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

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

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

Gruß
Dino

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

dann lass folgenden Code laufen:

Gruß
Peter

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

leider bleibt das Makro hier stehen:

lgLetzte = [d65536].End(xlUp)


Gruß
Dino

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

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

Gruß
Peter

Re: Wenn, dann Makro?
21.10.2002 09: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 09:26:38
Dino
Hi Peter,

vielen Dank es hat super geklappt....

viele grüße
Dino

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige