Herbers Excel-Forum - das Archiv

msg box

• msg box von Drum vom 31.10.2003 12:43:34
  • AW: msg box - von xXx am 31.10.2003 12:45:16
  • AW: msg box - von Monika Weber am 31.10.2003 12:45:42
  • AW: msg box - von WernerB. am 31.10.2003 12:46:11
    • AW: msg box - von Drum am 31.10.2003 12:50:47
      • AW: msg box - von xXx am 31.10.2003 13:02:15
      • AW: msg box - von WernerB. am 31.10.2003 13:02:24
  • msgbox [a1]___oT - von GerdW am 31.10.2003 12:46:25

Betrifft: msg box
von: Drum
Geschrieben am: 31.10.2003 12:43:34
Hallo liebes forum!

ich möchte in einer msgBox den Wert einer Zelle einbinden.
Also wie z.B. in Zelle A1 steht ein Name (nicht der username) welcher in der Box angezeigt wird.

Habt ihr eine Idee?



Betrifft: AW: msg box
von: xXx
Geschrieben am: 31.10.2003 12:45:16
Hallo,

msgbox(Range("A1"))

Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S. Das Forum lebt auch von den Rückmeldungen der Frager an die Antworter!

Betrifft: AW: msg box
von: Monika Weber
Geschrieben am: 31.10.2003 12:45:42
Hi

Suchst Du das?

MsgBox Range("A1")

Es liebs Grüessli
Monika





Betrifft: AW: msg box
von: WernerB.
Geschrieben am: 31.10.2003 12:46:11
Hallo Drum,

das geht z.B. so:

MsgBox = Range("A1").Text

Viel Erfolg wünscht
WernerB.

P.S.: Das Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter (siehe Forums-FAQ).

Betrifft: AW: msg box
von: Drum
Geschrieben am: 31.10.2003 12:50:47
Hallo!
Vielen dank für die schnelle antwort!
Folgendes:



Sub Kontrolle_Ende()
a = MsgBox("Die Kontrolle der Datei des Mitarbeiters" & vbCrLf & _
' hier soll der Wert der Zelle A1 hin
"wurde erfolgreich ausgeführt." & vbCrLf & _
"Um zu erfahren, welche Daten nach welchen Kriterien kontrolliert wurden," & vbCrLf & _
"schauen Sie bitte in der Hilfe nach.", _
0 + 64, "Liebe(r) " & Application.UserName)
End Sub



Ne Idee?

Betrifft: AW: msg box
von: xXx
Geschrieben am: 31.10.2003 13:02:15



Sub Kontrolle_Ende()
a = MsgBox("Die Kontrolle der Datei des Mitarbeiters" & vbCrLf & _
Range("a1") &"wurde erfolgreich ausgeführt." & vbCrLf & _
"Um zu erfahren, welche Daten nach welchen Kriterien kontrolliert wurden," & vbCrLf & _
"schauen Sie bitte in der Hilfe nach.", _
0 + 64, "Liebe(r) " & Application.UserName)
End Sub



Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S. Das Forum lebt auch von den Rückmeldungen der Frager an die Antworter!

Betrifft: AW: msg box
von: WernerB.
Geschrieben am: 31.10.2003 13:02:24
Hallo Drum,

mein Vorschlag lautet:


Sub Kontrolle_Ende()
MsgBox "Die Kontrolle der Datei des Mitarbeiters" & vbCrLf & _
Range("A1").Text & " wurde erfolgreich ausgeführt." & vbCrLf & _
"Um zu erfahren, welche Daten nach welchen Kriterien" _
& vbCrLf & "kontrolliert wurden, schauen Sie bitte in der Hilfe nach.", _
0 + 64, "Liebe(r) " & Application.UserName
End Sub


Gruß WernerB.

Betrifft: msgbox [a1]___oT
von: GerdW
Geschrieben am: 31.10.2003 12:46:25
ot