Live-Forum - Die aktuellen Beiträge

Datum

Titel

26.09.2025 18:34:36

Welches Datum gibt mein M-Code aus?

26.09.2025 10:29:46

Wert aus einer Zelle bei jeder Eingabe in neue Zelle

26.09.2025 08:51:00

Teilinhalt einer Zelle vergleichen

25.09.2025 23:04:12

Einen von drei möglichen Einträgen in einer Zeile suchen

Keine passende Antwort im Forumarchiv gefunden?

Stelle deine Frage im Live-Forum

Anzeige

Anzeige

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Vorheriger Thread

Vorheriger Thread

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Nächster Thread

Nächster Thread

Vorwärts blättern

Inhaltsverzeichnis

MessageBox an Wenn-Bedingung knüpfen

Forumthread: MessageBox an Wenn-Bedingung knüpfen
3 Beiträge zu diesem Forumthread
Anzeige
223 Threads zu ähnlichen Themen
VBA Beispiele zu verwandten Themen
Top 100 Forumthreads

Forumthread: MessageBox an Wenn-Bedingung knüpfen

MessageBox an Wenn-Bedingung knüpfen

25.01.2018 14:51:13

Gesa

Hallo zusammen,
bin ganz neu hier und versuche mich derzeit mit den Kinderfüßen der VBA-Welt.
Ich habe eine Datei, in der in Spalte "R" per Wenn-Formel das Wort "POP" steht, oder eben nicht. Ich würde gerne, sobald in einer Zeile von R irgendwo das Wort "POP" auftaucht, eine MessageBox öffnen lassen, in der der Hinweistext steht "Achtung!".
Kann mir da jemand helfen?
Ich habe mir einen Teil schon zusammen gebastelt, allerdings läuft das nur auf einer Zelle, die ich benenne. Sobald es eine andere ist, klappt der Code nicht mehr. Was muss ich anpassen?

Sub MessageBox()
Sheets("Umwandlung").Activate
If Cells(6, 18) = "POP" Then
MsgBox ("Achtung!")
End If
End Sub

Vielen Dank für die Hilfe
MfG
Gesa

Anzeige

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: MessageBox an Wenn-Bedingung knüpfen

25.01.2018 15:28:58

ChrisL
AW: MessageBox an Wenn-Bedingung knüpfen

25.01.2018 15:29:38

ChrisL
AW: MessageBox an Wenn-Bedingung knüpfen

25.01.2018 16:35:38

Gesa

Anzeige

AW: MessageBox an Wenn-Bedingung knüpfen

25.01.2018 15:28:58

ChrisL

Hi

Sub MessageBox()
With Sheets("Umwandlung")
If WorksheetFunction.CountIf(Sheets("Umwandlung").Columns(18), "POP") > 0 Then _
MsgBox ("Achtung!")
End With
End Sub

cu
Chris

AW: MessageBox an Wenn-Bedingung knüpfen

25.01.2018 15:29:38

ChrisL

sorry, der With-Rahmen macht so keinen Sinn... darum...

Sub MessageBox()
If WorksheetFunction.CountIf(Sheets("Umwandlung").Columns(18), "POP") > 0 Then _
MsgBox ("Achtung!")
End Sub

Anzeige

AW: MessageBox an Wenn-Bedingung knüpfen

25.01.2018 16:35:38

Gesa

Hervorragend. Danke für die schnelle Hilfe. Mit einer klitzekleinen Anpassung hat es tatsächlich so funktioniert, wie ich es möchte!

;

Forumthreads zu verwandten Themen

VBA-Werte aus Spalte in ComboBox

Hallo zusammen,
habe ein Formular da möchte ich die Daten nach den Werten in Spalte D Filtern. Dazu sollen die Daten ab Zeile 11 alphabetisch geordnet und jeder Eintrag nur einmal angezeigt in die Combobox eingelesen werden. Der ausgesuchte Wert wird dann als Criterium für die Filterfunktio...

25.09.2008 08:47:11

Thread-ID: 1012218

Checkbox in Zelle per VBA

Hallo Leute
ich brauche mal Hilfe vom VBA-Profi
Per VBA möchte ich
1) eine Checkbox (aus Formularsteuerungsliste) in einer bestimmten Spalte in Zeile 1 einfügen checkbox.add(....)
2) Dann Bezug auch auf diese Zelle setzen.
3) Namen ändern...
2) und 3) krieg ich sicherl...

17.10.2008 13:57:00

Thread-ID: 1017152

Hi,
ich habe folgenden Code ür eine Infobox wennd as Programm gestartet wird, leider weiß ich nicht warum die letze Zeile nicht mehr mit Angzeigt wird. Ich denke, dass es mit der Leerzeile zusammenhängt danke für Eure Hilfe.
Private Sub Workbook_Open() Dim loI Dim WsShell Set WsShell...

11.11.2008 16:48:00

Thread-ID: 1023612

VBA Code: wenn B1 <> blank, dann I in A1 schreiben

Hi mit'nander
Braeuchte einen kleine Code dafuer:
wenn B1 blank, dann schreibe ein I in A1.
kann mir vielleicht jemand helfen? :-)
vielen vielen dank
denis

18.11.2008 16:27:16

Thread-ID: 1025694

Steuerelement Listbox1 in tabelle wird in VBA n

Hallo
Ich habe in einer Tabelle aus der Symbolleiste Steuerelemente ein Listenfeld in eine Tabelle eingefügt. Der Objektname lautet "Listbox1".
Über ein Makro will ich nun diese Listbox füllen.
Listbox1.additem "Text"
wenn ich das Makro ausführen wird die Listbox1 jedoc nicht ge...

28.11.2008 11:59:00

Thread-ID: 1028645

Wenn dann mit VBA und Makro starten

Hallo guten Morgen liebe Helfer,
ich komme mit einer Wenn Dann Formel im VBA nicht klar. Wer kann mir bitte helfen.
WENN Zelle C1 = OK DANN starte Makro1 sonst MsgBox "Eingabe leider falsch"
Ich schaffe es einfach nicht das ich innerhalb der Abfrage ein Makro starten lasse möchte we...

31.01.2009 09:18:37

Thread-ID: 1045583

Listbox mit verschiedenen Einträgen mit VBA ausles

Hallöle.
Folgende Situation:
Auf einem Excel-Sheet liegt eine Listbox. Hier sind unterschiedliche Werte eingetragen die auch einzeln markiert werden können.
Wie lese ich die Listbox mit einem Macro aus und wie vergebe ich ggf. dem Formular-Element einen Namen? Ich möchte dahin komm...

02.02.2009 14:46:09

Thread-ID: 1046261

per VBA eine ListBox füllen

Guten Morgen!
Dank der freundlichen Unterstützung von Tino konnte ich meine Datei bis hierher erstellen.
Ich habe folgendes Problem:
Wenn über die Userform Daten eingegeben werden, werden diese einmal in die Seite Gesamt geschrieben und dann noch in die Seite des ausgewählten Verein...

10.03.2009 08:50:59

Thread-ID: 1058467

Messagebox verschwindet nicht automatisch

Hallo liebe EXCEL-Gemeinde,
ich möchte das eine Messagebox automatisch nach x Sek. verschwindet.
Die beiden Standardlösungen hab ich auch gefunden.
Leider funktioniert das mit dem verschwinden nicht.
Public Sub test() Dim objShell As Object Set objShell = CreateObject("WScript...

11.03.2009 11:31:19

Thread-ID: 1059042

Anzeige

Hallo,
habe folgenden CODE
Sub Bemerkung() Dim Eingabe As String Dim erg% Text = InputBox("Bitte geben Sie einen Wert für ein:", "Dateneingabe:") Range("B6").Value = Text End Sub
Nun möchte ich aber, das wenn in z.B. B6 schon was steht er den Inhalt in z.B. B7 einträgt. usw.
...

18.06.2009 14:21:23

Thread-ID: 1082593

Anzeige

TextBox mit Index füllen via VBA

Hallo Leut, guten Morgen,
habe folgendes Problem:
habe in einer UserForm eine TextBox (TextBox1 ) und möchte diese jetz über
einen Index Verweis kombiniert mit einer Vergleichen Funktion in einem Sub
(ComboBox1_initialize) füllen. Die Formel sieht folgendermaßen aus:
INDEX(...

03.11.2009 09:57:58

Thread-ID: 1114009

VBA Inputbox Type Parameter Problem

Liebes Forum,
bislang (Excel 2003) war es möglich eine Variable aus einer Inputbox auszulesen und mit Type:=0 konnte man außerhalb der Inputbox auf eine Zelle klicken - die Zelladresse wurde dann in die Inputbox übernommen und konnte ausgewertet werden.
Beispiel:
str_cell_input =...

20.01.2010 15:00:09

Thread-ID: 1131397

Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Einzelliste (ohne Inhaltsvorschau)

Messagebox verschwindet nicht automatisch

VBA InputBox

TextBox mit Index füllen via VBA

VBA Inputbox Type Parameter Problem

Wenn "Ja" dann zähle +1

Wenn Jahreszahl übereinstimmt,dann, sonst...

Wenn in D3 = X, Dann Text aus C3 -VBA

wenn CheckBox Ja, dann in Zwischenablage

VBA Datum in INPUTBOX in Tabelle suchen

wenn(isfehler=wahr;dann;sonst in vba

VBA WennDann + Variable

VBA Formel wenn Uhrzeit dann

Wenn dann als VBA

wie war das... VBA wenn dann ?

Messagebox mit Zellinhalt

Wenn-dann in VBA

Message Box nur einmalig anzeigen

wenn dann formel mit vba

VBA Wenn dann

VBA Wenn Zelle Leer dann

wenn dann Formel mit vba

VBA2010 wenn dateiname dann makro

VBA: Wenn Zellfarbe Dann Zellinhalt übertragen

VBA Wenn sich ein Zellwert ändert, dann

Messagebox mit VBA erstellen

Daten aus Messagebox einlesen

wenn, dann in VBA

VBA Wenn nicht in Zeile steht, dann Zeile einfügen

Suche, finde und dann aber nur wenn... VBA

VBA wenn ausgelöst dann Zeichen in richtiger Zeile

VBA via Inputbox suchen und Zelle ändern

VBA Wenn dann Zelle 5x kopieren in nächste Leere

VBA Zelle in Textbox übertragen

Datum per VBA in drei ComoBoxen aufteilen

VBA Wenn/Dann Formatierung

VBA Wenn Datum in Zelle, dann summieren...

Alle Listbox-Einträge per VBA auswählen

VBA Auswahl Combobox in Listbox

Messagebox bei AddIn Aktivierung unterdrücken

VBA - Prüfe ob Datei existiert, wenn ja dann copy

VBA gefilterte Daten mit textbox in listbox anzeig

VBA: Wenn dann funktion

VBA - Messagebox - Eingabeformular

VBA: Zelleninhalt zurück in TextBox

Webseiten-Inhalte per VBA in TextBox darstellen

Pivot-Tabelle mit MessageBox VBA

MessageBox in TextBox

inhalt der Messagebox in die Datei kopieren

vba Abfrage wenn leer dann

Wenn Und Dann VBA

VBA Textbox in Abh. von Listbox

per VBA InputBox in Zelle schreiben und drucken

Message Box Ja/Nein

VBA Textbox in Abh. von Listbox

wenn Ja dann Datum heute

VBA - Wenn dann

VBA Abfrage in Spalte wenn-dann

Wenn Zelle leer dann weiter in nächster Zelle! VBA

Link per VBA in Lotus Notes message einfügen

VBA-2 mark. Zellinhalte in jeweilige Textbox

VBA wenn;dann; sonnst Wert vom Vortag

Suchen /Ersetzen VBA /InputBox

Mit Vba bei bestimmtem Text eine Msg Box zeigen

VBA Input Box

UF-Listbox bedingt mittels VBA füllen

wenn dann vba

VBA Listbox füllen, Userform in Textbox einlesen

VBA wenn Wert eingetragen dann Message + Abbruch

VBA: Function in Userform Textbox

VBA: Zeilen löschen wenn dann

per VBA wenn dann

2 MessageBoxes in Code

VBA wenn Feiertag dann Wert in Zelle 0:00

VBA Wenn Status aktiv dann Name und Datum

VBA wenn dann multiplizieren

VBA - wenn-dann

Wenn Dann VBA

VBA: Inhalt einer Combobox dynamisch ändern

VBA Wörter Suchen und in Textbox ausgeben

VBA WENN Datenüberprüfung sich ändert DANN

Wenn in Spalte das steht dann kopiere VBA

VBA: Click in Listbox PDF Datei öffnen

VBA Aktion nur bei Selektierten Zeilen in Listbox

VBA wenn / dann

Wenn,dann, sonst VBA

VBA: wenn aktuelles Blatt. dann, ... sonst

Wenn Dann VBA

VBA für Wenn Dann

VBA wenn dann..

VBA: Daten aus Datenbank zurück in ListBox

VBA Do Until Look mit Inbox verlassen

VBA - Input Textbox bestimmter Wert

Wenn 13 in Zelle dann (vba)

Wenn.. Dann Sverweis VBA Hilfe

VBA Inhalte aus MsgBox in Tabelle kopieren

VBA Wenn Dann Abfrage f. mehrere selektiere Zeilen

VBA: Wenn Uhrzeit + 2 Minuten dann...

checkbox in tabelle via vba erzeugen - namen !

fillistbox in vba?

Wenn-Funktion (Wenn ja, dann Bild)

Schleife für Textbox in VBA

WENN DANN mit VBA

Messagebox noch kleiner Fehler

VBA, "Drag and Drop" in Textbox.Locked = True

Wenn dann Formel in VBA

Textboxen(1 to x) in Userform hinzufügen via VBA

DriveListBox in VBA Excel

messagebox einblenden

Beim Drucken soll MessageBox erscheinen!

WENN-DANN-SONST per VBA

VBA: Inputbox mit max. 5 stellige Nummer

DropDown Box in VBA

Wenn Dann in VBA

Wenn Dann mit VBA

VBA - Schriftgröße in Combobox ???

Inputbox-Messagebox !!!

Hilfe! Inputbox-Messagebox

Message-box beim öffnen einer xls-Datei

Info-Box ausgeben (Message-Box ohne Buttons)

Textbox in VBA-Excel

Datei öffnen duch Eingabebox In VBA

Wert in Messagebox, leider dringend :-(

Messagebox mit selbstdefinierten Buttons?

vba: wenn mehrzeilig dann zeilenhöhe optimieren

VBA inputbox

VBA aus inputbox in zelle??

Verschiedenen Textboxen über ein Button (VBA)

Message-Box überspringen

Message-Box direkt aus Excel (ohne VBA)

VBA-Wenn Wert erfüllt, dann ausblenden außer..

Wenn Dann per VBA

Wenn Dann ohne VBA

Combo-Box in VBA, wie geht das??

Wenn dann Formel als VBA-Code

VBA wenn leer dann ganze Zeile löschen

gibt es eine ChecklitBox in Excel VBA?

Filter für ComboBox in VBA

Entfernen vermeiden (wenn-dann)-> VBA ?

Wenn/Dann-Funktion mit VBA

Einmalige Messagebox, wenn Bedinung

Wenn Uhrzeit in B2 erreicht, dann .. Ohne VBA

VBA: Wenn Bedingung erfüllt dann ausschneiden

WennDann in VBA

VBA soppelte einträge Combobox

ComboBox in Tabellenblatt per VBA

TextBox in VBA "hochzählen"

wenn, dann per vba?

MsgBox kommt 2x in VBA

CheckBox in VBA ansprechen

VBA wenn ... dann... Verzweigung

Messagebox zu Uhrzeit wenn Bedingung

Messagebox nach 5 min, wenn Datei noch offen.

VBA Code in Message Box

Messagebox Ja Nein

VBA:Cosinus TextBox

ComboBox Eintrag in VBA ansprechen

Wenn-Dann in VBA (wenn Y9 >0, dann ...)

Wenn / nicht, dann Zelle löschen VBA

Wenn nicht / dann verschieben - VBA

Wenn neues Jahr dann Makro einmalig ausführen

Wenn B2 leer, dann B7 -VBA-

Message-Box nach Eingabe von F1

Wenn..., dann... - VBA

Wenn L11 das Ergebnis Januar, dann in $F$113 Ergeb

Wenn, dann (zählen) -ohne VBA-

Suchen ob Text in Zelle wenn ja dann ...

VBA inputBox

Listbox in VBA Auwahl ??

VBA-Wenn A1 aktiviert, dann Zeilen einblenden

Checkboxes in Zellen integrieren per VBA

VBA "Wenn, dann sonst"

Box in VBA

wenn leer, dann -VBA-

Wenn - dann, ohne VBA

Wenn - Dann -ohne VBA-

Wenn und Wenn - dann -VBA

wenn zelle A = jan ,dann zelle B = 1

Excel VBA wenn Wort richtig dann dieses Makro

VBA Wenn in Bereich nichts steht dann

VBA, ComboBox nur wenn bestimmter Eintrag in Listbox ausgewä

VBA: Wenn Button "Cancel" dann...

VBA Inhalt aus Textbox in Zelle schreibe

VBA, Wenn dann

VBA Code Hilfe, wenn Wert in Zelle, dann

wenn/dann mit VBA-Steuerelement

VBA falsche Datumsanzeige in ListBox

VBA Inbox Abbrechen

Message Box mit individuellem Text

VBA Wenn Zelle voll dann/leer dann

String aulesen - VBA Wenn Dann Sonst

VBA - wenn Sonntag, dann...

Messageboxen nur bei Einzelaufruf

Speichern VBA über InputBox

Wenn B2=B1 dann C2=C1 (VBA)

VBA wenn Zellen leer, dann...

VBA String aus Listbox aufteilen

Zwei Spalten Loop mit 3x Wenn dann VBA

VBA, Wenn Dann Prüfung

Ergebnis aus Inputbox in VBA Formel

Outlook VBA - Mailanzeige in MsgBox

VBA Excel in Word mit Checkboxen

VBA: Suchergebnis in Listbox

VBA wenn bestimmter Text dann Wert schre

Wenn Spalte A leer, dann... (VBA)

Wenn Dann Sonst als VBA

VBA Eindeutige Werte in Combobox

Wenn Zelle = ja, dann blende folgendes Tabellenblatt ein

VBA Userform Button Speichern und neuen Wert in Textbox

Daten einer ComboBox in VBA einer Variablen zuweisen

Textbox 1 bis Textbox 320 bedingte Formatierung mit VBA

Datedif wenn kein kein Jahr dann nicht anzeigen

PQ - Wenn der Jahrgang fehlt, dann...

VBA Makro wenn in B en Text steht dann in P X eintragen

Vba wenn Zelle durchgestrichen dann ans Ende der Tabelle

VBA Userform zeigt 10. Spalte J nicht in der Listbox1 an

Anzeige

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe
excel wenn in einer spalte ein bestimmtes wort steht dann

16524
excel zelle färben wenn andere zelle wert

16377
excel bis zu einem bestimmten zeichen auslesen

14377

Weitere Forumthreads anzeigen

excel zelle einfärben wenn andere zelle wert

12327

excel hinzufügen von zeichen

10993

excel text enthält zeichen

9700

excel kann nicht scrollen

9310

excel zeichen entfernen links

8987

excel mehrere formeln kopieren ohne bezug ändern

8929

excel wenn wert dann wert aus anderer zelle

8174

summe aus sverweis

7675

excel prüfen ob zelle text enthält

7535

excel negative zahlen auf 0 setzen

7442

excel farbe wenn andere zelle bestimmten wert hat

7418

excel abschneiden von links

7294

excel summe ist immer null

7121

doppelte einträge nur einmal zählen excel

7036

excel text zeichen entfernen

6996

excel text ab bestimmten zeichen abschneiden

6765

excel formel führende nullen entfernen

6714

excel wenn zahl in spalte vorhanden dann

6588

excel zählen wenn datum älter als

6479

excel rechts bis leerzeichen

6304

excel zählenwenn mit oder

6279

excel text auslesen ab zeichen

6206

datum und zeit zusammenführen excel

6166

excel alt 010 funktioniert nicht

5952

vba letzte zeile finden

5904

excel text vor leerzeichen ausgeben

5886

excel wenn x dann zeile ausblenden

5534

excel textkette zeilenumbruch

5403

excel vba block auskommentieren

5277

excel zählen wenn text enthält

5175

excel verlinkung auf tabellenblatt

5128

excel letzte zwei zeichen abschneiden

5093

excel nur die letzten 4 zeichen anzeigen

5012

excel zellen verbinden tastenkombination

4974

vba excel zelleninhalt löschen

4868

excel kreuz statt mauszeiger

4852

vba excel wert in zelle schreiben

4803

excel bedingte formatierung datum älter als 6 monate

4767

excel formel anführungszeichen als text

4718

excel zellen verbinden in tabelle nicht möglich

4660

zeilennummer ausgeben excel

4450

excel größer als datum

4369

excel wenn summe größer als dann

4337

excel inhalt aus anderer zelle übernehmen

4244

excel prüfen ob mehrere zellen leer sind

4183

excel vba hintergrundfarbe

4179

excel kw in monat umrechnen

4164

excel summewenn ungleich text

4139

entfernung in excel berechnen

4132

wenn dann dropdown

4055

excel datum umwandeln in monat und jahr

4049

wenn null dann leer

4047

excel formel wenn sverweis nv dann 0

4021

excel reiter wechseln shortcut

3997

excel vba zelle mit bestimmten inhalt suchen

3902

excel datum formatieren funktioniert nicht

3868

excel makro unterbrechen

3828

excel wert übertragen wenn bedingung erfüllt

3802

tabellenblattname in zelle

3799

summewenn mehrere spalten summieren

3770

excel rechnen mit uhrzeiten wenn dann

3755

excel text übernehmen aus zelle

3753

excel größer und kleiner als

3734

mehrere links in einer excel zelle

3703

excel formel finden von rechts

3677

excel msgbox ja nein

3665

excel wenn farbe dann x

3641

nur zahlen aus zelle übernehmen

3599

excel erstes wort aus zelle kopieren

3582

excel punkt aus text entfernen

3561

summewenns mit datum

3547

summewenn nicht wert

3513

excel filter trotz blattschutz ohne makro

3478

excel nummerierung funktioniert nicht

3400

summenprodukt bedingung

3374

arbeitsmappenschutz aufheben passwort vergessen

3359

excel uhrzeit ohne datum

3330

bedingte formatierungen auf andere zellen übertragen

3270

excel minuten in stunden umrechnen mehr als 24 stunden

3229

excel sverweis leere zelle statt 0

3211

wie entferne ich texte vor oder nach einem bestimmten zeichen aus zellen in excel?

3192

excel drucklinien ausblenden

3179

excel die ersten 3 zeichen löschen

3101

excel bedingte formatierung formel größer als

3094

MessageBox an Wenn-Bedingung knüpfen

3094

zeilen löschen vba

3079

excel tabelle kopieren ohne verknüpfung

3077

excel gliederung benennen

3057

excel bestimmten text aus zelle entfernen

3046

excel stunden dezimal in stunden und minuten

3043

excel automatisches datum bei eintrag

3034

excel zelleninhalt um zeichen erweitern

3030

prüfen ob datei vorhanden vba

3027

vba pause 1 second

3026

excel teilergebnis zählenwenn kombinieren

2994

excel arbeitsblatt name auslesen

2985

excel formel aktualisiert erst nach doppelklick

2941

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

Anzeige

Anzeige

Entdecke mehr

Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten

Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen

Anzeige