Const für MsgBox erstellen

Forumthread: Const für MsgBox erstellen
5 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Const für MsgBox erstellen

18.05.2019 21:53:44

Sigi

Hallo,
warum wird hier eine Fehlermeldung ausgegeben?
Public Const PVFehler1 As String = "Sie haben ausgewählt" & vbLf & _
"Jahr: " & UF1.cboPVJahr.Value & vbLf & _
' "Monat: " & UF1.cboPVMonat.Value & vbLf & _
"Artikel: " & UF1.cboPVArt.Value & vbLf & _
"Preis: " & UF1.cboPVPr.Value & vbLf & vbLf & _
' "Für diese Auswahl liegen keine Daten vor!"
Msgbox PVFehler1
Danke!
Gruß
Sigi

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Const für MsgBox erstellen

18.05.2019 21:58:07

Hajo_Zi
AW: Const für MsgBox erstellen

18.05.2019 21:58:33

Sepp
AW: Const für MsgBox erstellen

19.05.2019 05:58:22

Sigi
AW: Const für MsgBox erstellen

18.05.2019 22:56:50

onur
AW: Const für MsgBox erstellen

19.05.2019 06:00:19

Sigi

AW: Const für MsgBox erstellen

18.05.2019 21:58:07

Hajo_Zi

Hallo Sigi,
nur wenige schauen auf Deinen Rechner und sehen die Datei.
Ich möchte gerne den Fehler im Original sehen.
Ich baue keine Datei nach. Die Zeit hat schon jemand investiert.
Ein Nachbau sieht meist anders aus als das Original. Darum sollte das Original verlinkt werden.
Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten anonymisieren bzw. pseudonymisieren.
Benutze hier im Forum die Funktion zum hochladen. Falls Du die nicht benutzen möchtest beachte, von unsicheren Servern wie z.B. www.file-upload.net lade ich keine Datei runter. (lt. Einschätzung meines Virenprogramms)

Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
Die Beiträge werden auch ignoriert, es erfolgt keine Antwort.

AW: Const für MsgBox erstellen

18.05.2019 21:58:33

Sepp

Hallo Sigi,
wie der Name 'Konstante' schon verrät, verlangt diese einen konstanten Ausdruck!
UF1.cboPVJahr.Value usw. ist nicht konstant!


Public PVFehler1 As String
PVFehler = "Sie haben ausgewählt" & vbLf & _
"Jahr: " & UF1.cboPVJahr.Value & vbLf & _
' "Monat: " & UF1.cboPVMonat.Value & vbLf & _
"Artikel: " & UF1.cboPVArt.Value & vbLf & _
"Preis: " & UF1.cboPVPr.Value & vbLf & vbLf & _
' "Für diese Auswahl liegen keine Daten vor!"