Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1576to1580
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1576to1580
1576to1580
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wenn Bedingung dann PopUp Fenster

Wenn Bedingung dann PopUp Fenster
01.09.2017 08:47:50
Kai
Hallo zusammen,
ich bin gerade dabei einen Konfigurator für Produkte in Excel zu erstellen.
Ich suche nun nach der Möglichkeit, dass wenn in dem Zellenbereich C42 bis C54 der Werlt in Summe größer als Null ist, ein PopUp Fenster erscheint. Lässt sich dies über VBA irgendwie lösen?
Vielen Dank im Voraus.
Viele Grüße
Kai

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wenn Bedingung dann PopUp Fenster
01.09.2017 08:53:10
Kai
Nachtrag
Ich habe es mit folgendem Code versucht 
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("C42:C54")

Erhalte aber ständig die Fehlermeldung "Typen unverträglich"
AW: Wenn Bedingung dann PopUp Fenster
01.09.2017 08:53:25
Michael
Hallo!
Ja, das geht. Führe einen ReKlick auf dem Tabellenblatt-Reiter des betroffenen Blattes aus, Klicke auf Code anzeigen. Kopiere folgenden Code in die sich öffnende VBA-Umgebung (im rechten Fenster):
Private Sub Worksheet_Change(ByVal Target As Range)
If WorksheetFunction.Sum(Range("C42:C54")) > 0 Then
MsgBox "Pop pop pop!", vbInformation, "Pop-Up Fenster"
End If
End Sub
Meldung und Titel-Text der MsgBox kannst Du nach Wunsch anpassen. Das Makro wird angestoßen, wenn sich irgendwo im Blatt ein Zell-Wert verändert (durch Eingabe, nicht bei Formeln!).
Lg
Michael
Anzeige
AW: Wenn Bedingung dann PopUp Fenster
01.09.2017 10:09:05
Kai
Hallo Michael,
vielen Dank. Funktioniert prima :)
Jetzt noch eine zweite Frage:
Wie mache ich es, wenn ich zwei Fenster für unterschiedliche Bereiche möchte? Geht das auch?
Beispiel
Wenn im Bereich 1 von C15 bis C30 und C34 bis C62 der Wert größer als Null ist, dann Fenster 1
Wenn im Bereich 2 von C66 bis C71 und C75 bis C80 der Wert größer als Null ist, dann Fenster 2
Viele Grüße
Kai
Ich will mal nicht so sein...
01.09.2017 10:20:27
Michael
Kai,
...auch wenn Du offenbar munter crosspostest; solltest Du nicht ohne entsprechende Hinweise in den Foren machen (siehe Forums-Regeln).
Private Sub Worksheet_Change(ByVal Target As Range)
If WorksheetFunction.Sum(Range("C15:C30"), Range("C34:C62")) > 0 Then
MsgBox "Pop 1!", vbInformation, "Pop-Up Eins"
End If
If WorksheetFunction.Sum(Range("C66:C71"), Range("C75:C80")) > 0 Then
MsgBox "Pop 2!", vbInformation, "Pop-Up Zwei"
End If
End Sub
Aber darauf hättest Du vermutlich selbst kommen können, oder?
LG
Michael
Anzeige
Der Klassiker! Ist ja auch "dringend" ;-), owT
01.09.2017 10:09:11
Michael
Uuuuund gebusted :D owT
01.09.2017 10:31:46
JoNNy

109 Forumthreads zu ähnlichen Themen

PopUp mit Eingabefeld
Peter

Hallo!
Wer kann mir hier weiterhelfen? Ich versuche ein PopUp zu erstellen, in welchem ein Eingabefeld für einen Betrag ist. Der Betrag soll dann in eine Zelle der Tabelle geschrieben werden. Bisher kann ich leider nur diese Pop ups erstellen:
Sub Abfrage() If MsgBox( _ prompt:="Bitte...
27.10.2008 23:54:26
Thread-ID: 1019775
2 Beiträge
Anzeige
Makro: Wenn dann
Julia

Hallo in meiner xls siehe:
https://www.herber.de/bbs/user/60693.xls
sind die Spalten A bis C gegeben
Wie kann ich den gelben Bereich (Spalte D) per Makro auffülen
Immer den letzten Status in Spalte C (nach...) in die entsprechende Zelle von Spalte D (Aktueller Status) zu schrei...
26.03.2009 12:47:12
Thread-ID: 1064207
12 Beiträge
pop up Fenster bei Fehler eines updates
Michael

Hallo!
Ich habe eine Tabelle die alle 30 Minuten im Hindergrund aktualisiert wird. Wenn bei der Aktualisierung ein Fehler auftritt, soll ein popup Fenster erscheinen. (Egal wo ich mich dann aktuell im System befinde/ Word / outlook etc.)
Danke
Gruß Michael
01.10.2009 12:12:04
Thread-ID: 1106590
4 Beiträge
Anzeige
Popup-Fenster
Ringlstetter

Hallo allerseits,
ich möchte nur in einem bestimmten Tabellenblatt ein Popup haben, welches eine Frage stellt. Die Zahl als Antwort soll dann in ein bestimmtes Feld geschrieben werden.
Das Popup soll so lange fragen und die Werte immer ein Feld unter dem letzten eingeben, bis in einem a...
05.03.2010 10:47:24
Thread-ID: 1143587
5 Beiträge
POP UP Fenster
pitmu1@web.de

Hallo zusammen,
suche eine Excel Lösung für folgendes Problem:
Habe z.Bsp. eine Zelle in der die Anzahl meiner Besuche im z.Bsp. April stehen.
Beim Klicken auf diese Anzahl soll nun ein POP UP Fenster geöffnet werden, indem
die einzelnen Besuche mit genauem Termin darinstehen b...
01.07.2010 16:29:31
Thread-ID: 1164979
2 Beiträge
Fensterstatus: xlminimized beim Öffnen setzen
Constantin

Hallo,
es ist mir nicht gelungen, folgendes Problem zu lösen: Ich habe eine Mappe1 im Pfad1, die ich öffne. Da ich dort Gültigkeitsregeln hinterlegt habe, die in Mappe2, Pfad2 stehen bzw. definiert sind (als Liste mit Bezug auf Mappe2), möchte ich Mappe2 (nur READ) beim Öffnen von Mappe1 gl...
04.01.2013 13:03:42
Thread-ID: 1292866
3 Beiträge
PopUp Fenster in bestimmtes Arbeitsblatt
Ann

Hallo Leute,
ich hab ein Workbook, in das ich Daten einlese und verarbeite. Am Ende soll sich ein PopUp-Fenster öffnen, das angibt, dass das Programm fertig ist. Das funktioniert auch soweit, nur habe ich drei Sheets und das PopUp-Fenster öffnet sich im 3. und nicht wie gewollt im 1.
Di...
13.05.2013 16:37:33
Thread-ID: 1312755
4 Beiträge
automatisches EMail wenn Wert überschritten
Julia

Hi!
ich habe eine Exceltabelle mit Messwerten pro Monat. Zu jedem Messwert gibt es einen Grenzwert, den ich "überwachen" muss. Da ich von diesen Tabellen sehr viele habe dachte ich an eine autmatisierte EMail aus Excel heraus, sobald der Grenzwert erreicht bzw. überschritten wurde (Text mus...
24.06.2013 10:16:05
Thread-ID: 1319275
14 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
2
11
3
3
4
1
2
3
13
7
2
1
7
5
9
2
7
2
3
1
1
10
5
1