Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
16.10.2025 17:40:39
Rabattstafel
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
1316to1320
1316to1320
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Messagebox mit VBA erstellen

Forumthread: Messagebox mit VBA erstellen

Messagebox mit VBA erstellen
25.06.2013 10:53:50
HendrikB.
Hallo liebe Community,
zuerst möchte ich mich bei allen Forennutzern bedanken! Konnte mit diesem Forum schon einige Excel-Probleme lösen - vielen Dank dafür.
Doch nun begeben ich mich in völliges Neuland - VBA.
Die Frage ist folgende:
Ich habe in Zelle E15 ( Tabellenblatt "Input") diese Formel stehen:
=WENN(ODER('Backdrop screen'!A35="-";'Backdrop screen'!A28="-");"-"; WENN(UND('Backdrop screen'!B28*1,1<Input!D15;'Backdrop screen'!A35*1,1<Input!D15);"x";"√ "))
Nun hätte ich gerne eine Messagebox die immer dann erscheint, wenn die Zelle E15 "-" ausgibt. Der Text der Messagebox soll "fehlende Werte im Backdrop screen" sein und mit einem "OK-Button" bestätigt werden.
Wie lautet der VBA-Code für solch eine Messagebox?
Leider habe ich absolute keine Ahnung von VBA und daher auch keinen Ansatz. Ich weiß nur, dass irgendwo ein "Msgbox" rein muss ;-)
Vielen Dank im Voraus!
Liebe Grüße
HendrikB.

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Messagebox mit VBA erstellen
25.06.2013 11:03:41
JACKD
Hallo Hendrik
so ZB
Einfach in das Blatt Input kopieren
Private Sub Worksheet_change(ByVal Target As Range)
Application.ScreenUpdating = False
bereich = Intersect(Target, Range("E15"))
If bereich = "-" Then
MsgBox "fehlende Werte im Backdrop screen"
End If
Application.ScreenUpdating = True
End Sub
Grüße

Anzeige
AW: Messagebox mit VBA erstellen
25.06.2013 11:19:13
GuentherH
Hallo Hendrik, hallo JackD,
Ich habe verstanden, nicht in E15 wird was eingegeben, sondern das Formel-Ergebnis ändert sich.
Dann wird der Code minimal anders: 
Private Sub Worksheet_change(ByVal Target As Range)
If Range("E15").Text = "-" Then
MsgBox "fehlende Werte im Backdrop screen"
End If
End Sub

Im Worst Case brauchen wir auch noch ein anderes Ereignis zum Auslösen der Prüfung.
Wann genau soll denn die Prüfung stattfinden?
Beste Grüße,
Günther

Anzeige
nimm -> Worksheet_Calculate() owT
25.06.2013 11:55:47
Matthias

AW: Messagebox mit VBA erstellen
25.06.2013 15:00:05
HendrikB.
Hallo GuentherH, hallo JackD,
vielen Dank für eure Ideen.
also beim ersten Vorschlag kam die Fehlermeldung "Laufzeitfehler".
Beim zweiten Vorschlag passierte einfach gar nichts :/
Die Prüfung soll dann stattfinden, wenn ich in A15 [Input] eine Materialnummer eingebe.

Anzeige
AW: Messagebox mit VBA erstellen
25.06.2013 15:27:36
GuentherH
Hallo Hendrik,
Tut sich nichts heißt, dass die If-Bedingung nicht erfüllt ist.
einfach mal
If Range("E15").Text = "-" Then
durch
If Range("E15").Value = "-" Then
ersetzen.
Ich gehe davon aus, dass du für Deinen Test dafür gesorgt hast, dass in E15 auch "-" angezeigt wird! ;-)
Gruß,
Günther

Anzeige
AW: Messagebox mit VBA erstellen
25.06.2013 15:53:51
HendrikB.
Hallo Günther,
suuuper! Mit deinem edit hat es funktioniert.
klappt einwandfrei - bin begeistert :-).
Tausend Dank!
Liebe Grüße
Hendrik

Danke für die Rückmeldung o.w.T.
25.06.2013 16:22:34
GuentherH
.
;

Forumthreads zu verwandten Themen

VBA - if anweisung mit variable
Thomas

Hallo,
ich habe ein blöds Problem und zwar habe ich folgendes If Abfrage in einer Forschleife in Pseudo:
Wenn A1 kleiner als A2 tu dies sonst tu das
VBA:
For i = 2 To 5 If "A" & i
Irgendwie trifft dort immer nur Else ein, ich glaube es liegt an der Bedingungsformulier...
16.10.2008 10:10:50
Thread-ID: 1016763
4 Beiträge
Kurze Variablendeklaration in VBA?
Gunnar

Hi Leute,
gibt es in VBA keine andere Möglichkeit, Variable zu deklarieren außer
Dim abc As Integer, abd As Integer abe As Integer
usw.? Brauch über 100 Variable, das ist mühselig.
Typenkennzeichen dürfen übrigens nicht verwendet werden, falls das wichtig ist.
Grüße Gunnar...
28.01.2009 18:36:11
Thread-ID: 1044672
5 Beiträge
VBA Abspeichern in variablen Ordner
Danomat

Hi,
folgendes Problem
In Zelle C1 steht der aktuelle Monat. Nun möchte ich die Datei als PDF abspeichern:
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"G:\Dokumente\Berichtswesen\Monatsreporting\02 Februar\Test.pdf" _
, Quality:=xlQualityStandard, IncludeDo...
13.03.2009 12:37:34
Thread-ID: 1059831
10 Beiträge
variable Zeilenanzahl kopieren, einfügen (VBA)
Alex

Hallo Leute,
In meiner Arbeitsmappe kopiere ich eine! Zeile (aus dem TabBlatt „Grundformular“) - via Doppelklick auf einen Namen in „Übersicht“ - in andere TabBlätter.
(das geht wunderbar)
Sieht jemand eine Möglichkeit ob/wie das ganze mit einer variablen Zeilenanzahl, die im „Grund...
18.03.2009 17:23:56
Thread-ID: 1061522
3 Beiträge
VBA - Hilfetexte für Funktionen wie MsgBox, InputB
Stefan

Hallo zusammen,
gibt es eine einfache Möglichkeit, in VBA Hilfetexte (welche ruhig einfachen Textfiles o.ä. entsprechen können) für Funktionen wie MsgBox, InputBox etc. zu hinterlegen?
Danke vorab und Gruß.
Stefan
12.06.2009 09:41:53
Thread-ID: 1080899
2 Beiträge
variabler SVerweis mit VBA
Jonathan

Hallo zusammen,
in einer Tabelle sind verschiedene Zeilen mit einem "x" in Spalte C markiert. Die Anzahl der "x" variert.
Nun versuche ich ein Makro zu erstellen, welches mir, wenn eine Zeile mit einem "x" markiert ist in
Spalte B einen SVerweis (Suchwert steht in Spalte A) einträg...
17.06.2009 14:28:57
Thread-ID: 1082250
3 Beiträge
Variable Liste in VBA
Diana

Liebes Forum,
ich habe ein Problem. Ich lese mit einem VBA-Makro Messwerte aus. Diese Messwerte werden über einen Namen auf einem anderen Rechner angesprochen. Derzeit gebe ich diese Namen (Adressen) direkt in das Makro ein.
strSQL = "SELECT k055z02_0.Zeit, k055z02_0.A00100001, ..., .....
14.08.2009 14:59:47
Thread-ID: 1096000
4 Beiträge
Summe mit Variable in VBA
chrissey

Hallo Leut,
hab folgende Zeile in VBA die mir in der Zelle (LeZe, 10) eine Summe bilden soll:
'Worksheets("Auswertung").Cells(LeZe, 10).Formula = "=SUM(R[-5]C:R[-1]C)"
jetzt möchte ich aber die Länge der Summe durch eine Variable ersetzen,
also
-5 durch eine Variable z.B.: -...
08.10.2009 11:16:57
Thread-ID: 1108126
4 Beiträge
Anzeige
GÜltigkeit mit Variable in VBA
Andre

Hallo,
ich habe ein Anwendungs oder Referenzobjektiven Fehler. Bei folgender Formel. Kann mir da jemand helfen?
Dim strFormel As String
For v = nTabelle1ZeileSTART To Zeilen
strFormel = "=INDIREKT($O" & v & ")"
With Cells(v, nTabelle1SpalteFBFunktion).Validation
...
09.10.2009 10:50:11
Thread-ID: 1108490
17 Beiträge
Variablen Druckbereich mittels VBA einrichten (2) | Herbers Excel-Forum
Space
Hallo Rudi, Hallo Forums-Mitglieder,
zunächst vielen Dank an dich Rudi für die schnelle Rückmeldung! Leider konnte ich auf deinen Beitrag nicht direkt antworten, deshalb muss ich einen neuen Beitrag aufmachen.
Kurz zum Thema: Ich suche eine Lösung für einen variablen Druckbereich mittels VB...
13.01.2010 08:46:23
Thread-ID: 1129313
5 Beiträge
variable Zellauswahl in VBA
L

Hallo,
habe mehrere Tabellen mit unterschiedlich vielen Zeilen aber immer nur 8 Spalten.
Im Makro habe ich die Tastenkombination
Shift+StRG+Pfeil runter
in Spalte C benutzt, damit nur bis zum Ende der Einträge markiert wird. So habe ich die Zellen markiert, in denen ich dara...
02.02.2010 14:59:00
Thread-ID: 1135122
3 Beiträge
VBA Reihen Löschen mit Variable
chrissey

Hallo Leut,
hab folgende Zeile und möchte diese durch eine Variable ersetzen ( Variablen Name = ErsteZeile )
Worksheets("A").Rows("2:2").Delete Shift:=xlUp
Das ("2:2") möchte ich durch die oben genannte Variable ersetzen.
Kriegs aber irgendwie nicht hin.
Grüße Euch ganz lieb...
15.02.2010 15:56:05
Thread-ID: 1138678
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

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