Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

MSG-Box, wenn Zellen nicht = 0
#1
Hallo Helfer

Könnt Ihr mir bitte ein Makro schreiben das folgendes auslöst:

Wenn im aktiven Tabellenblatt die Zellen  
Q24    und/oder  
Q32    und/oder 
Q37
<> 0 sind,
Hintergrund der betroffenen vorgelagerten Zellen
B24, B32, B37
rot einfärben
und eine MSG-Box anzeigen mit dem Text "Kontierung fehlt!"

Also wenn zum Beispiel die Zellen Q24 und Q37 <> 0 sind,
die Zellen B24 und B37 rot einfärben
und die MSG-Box anzeigen.

Ich bin sehr froh, wenn Ihr mir helfen könnt.

Dank und Gruss

Theo
Antworten Top
#2
Hallo Theo,

das sind mir zu viele UND/ODER Huh .

Dein Beispiel ist soweit klar. Aber was ist in diesem Fall mit der Zelle Q32?

Gruß
Max
Antworten Top
#3
Hallo Theo,

grundsätzlich ginge es leichter mit einer Kombination aus Bedingter Formatierung und Datengültigkeit, also ohne VBA.


Wenn Du aber unbedingt VBA einsetzen möchtest, dann brauchen wir mehr Infos.
Soll das Makro manuell angestoßen werden?
Wenn ja, muss noch ein Makro her, dass nach Korrektur der Eingaben die Farben wieder zurücksetzt, auch manuell.

Sonst musst Du beschreiben, ob die Eingaben in Spalte B gemacht werden oder in andern Zellen?
Gruß Atilla
Antworten Top
#4
Hallo Max

Danke für Deine Antwort.

Q32 ist in meinem Beispiel = 0, also muss B32 nicht eingefärbt werden.

Zur Erklärung:
In Spalte B sind Kontierungen. In Spalte Q kumulierte Umsätze.
Es braucht jedoch nur einen Eintrag in Spalte B, wenn auch Werte in Spalte Q vorhanden sind.

Wenn in einer Zelle in Spalte Q ein Wert vorhanden ist, muss das Makro prüfen ob in Spalte
B auf der gleichen Zeile ein Eintrag enthalten ist. Also Zellinhalt <> 0.
Wenn nein, soll es Zelle Bx markieren und die MSG-Box aktivieren.

Gruss

Theo
Antworten Top
#5
Hi Theo,

also prüfst Du zeilenweise. Okay.

Dann blieben noch die Fragen von Atilla offen.

Gruß
Max
Antworten Top
#6
(24.02.2015, 12:43)atilla schrieb: Hallo Theo,

grundsätzlich ginge es leichter mit einer Kombination aus Bedingter Formatierung und Datengültigkeit, also ohne VBA.


Wenn Du aber unbedingt VBA einsetzen möchtest, dann brauchen wir mehr Infos.
Soll das Makro manuell angestoßen werden?
Wenn ja, muss noch ein Makro her, dass nach Korrektur der Eingaben die Farben wieder zurücksetzt, auch manuell.

Sonst musst Du beschreiben, ob in die Eingaben in Spalte B gemacht werden oder in andern Zellen?

Hallo Atilla

Ich brauche die MSG-Box, damit die fehlende Kontierung nicht übersehen wird. Ich denke, das geht nur mit VBA, oder?
Das Makro soll angestossen werden, wenn in Spalte Q der Wert <> 0 wird. Der Wert wird aus vorgelagerten Zellen berechnet.

An das Zurücksetzten der Farbe habe ich nicht gedacht.
Kann man im Makro einbauen, dass, wenn in den definierten Zellen Qx und den entsprechenden Zellen Bx
in beiden Zellen "0" oder in beiden Zellen ein Wert ist, keine Färbung erfolgen soll?
  Huh
Kompliziert...

Danke Dir für Deine Unterstützung

Gruss

Theo
Antworten Top
#7
Hallo Theo,

eine Datei mit anonymisierten Daten wäre einfacher für uns.
Wie sollen wir wissen, in welchem Bereich die auszuwertenden Daten stehen?
Hast Du in Zeile 1 Überschriften und danach folgen dann die Daten, oder wie sieht die Tabelle aus?

Gruß
Max
Antworten Top
#8
Hallo Theo,

das geht auch ohne VBA.

In den Zellen der Spalte Q befinden sich Formeln, richtig?
Diese Formel hat einen Bezug zu einer Zelle, in der eine Eingabe gemacht wird. Welche Zelle ist das?

Zeig uns mal die Formel in Q24
Gruß Atilla
Antworten Top
#9
(24.02.2015, 13:19)atilla schrieb: Hallo Theo,

das geht auch ohne VBA.

In den Zellen der Spalte Q befinden sich Formeln, richtig?
Diese Formel hat einen Bezug zu einer Zelle, in der eine Eingabe gemacht wird. Welche Zelle ist das?

Zeig uns mal die Formel in Q24

Hallo Atilla

auch mit MSG-Box? Oder Kommentar? Oder sonst einem Popup? Ich bin gespannt.

Also, in Q24 steht zum Beispiel:
=SUMME(E24:P24)

Gruss

Theo
Antworten Top
#10
(24.02.2015, 13:28)Theo schrieb:
(24.02.2015, 13:19)atilla schrieb: Hallo Theo,

das geht auch ohne VBA.

In den Zellen der Spalte Q befinden sich Formeln, richtig?
Diese Formel hat einen Bezug zu einer Zelle, in der eine Eingabe gemacht wird. Welche Zelle ist das?

Zeig uns mal die Formel in Q24

Hallo Atilla

auch mit MSG-Box? Oder Kommentar? Oder sonst einem Popup? Ich bin gespannt.

Also, in Q24 steht zum Beispiel:
=SUMME(E24:P24)

Gruss

Theo

Hallo Atilla,

Ich bin irritiert.
Warum steht da nicht
=Summe(E23:'P14')

Theo
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste