MSGBOX CON INSERIMENTO TESTO ED INVIO A CELLA

SALVE ,
come da titolo;

esiste modo per inserire in un MSGBOX, un testo/numero ed inviarlo ad una cella prestabilita...

Ciao ema.cab
la sintassi di Msgbox è la seguente:

---

MsgBox(prompt[, buttons] [, title] [, helpfile, context])

---

dove
in prompt puoi inserire la stringa o il numero che ti pare;
in buttons puoi inserire il codice o la combinazione di codici per far apparire OK, SI/NO ecc.;
in title la stringa che si riferisce al titolo.

Dopo la pressione su OK o su uno degli altri pulsanti la macro posterà nella cella che tu indichi quello che ti pare (stringa o numero).

Ovvero, non ho capito una mazza!!!

Ciao,
Mario

ciao Marius44

esempio:

ho una macro che mi apre il msgbox, CON SCRITTO

aggiungi numero,

a questo punto vorrei inserire il numero nel msgbox, e dovra' inviarlo

ad una cella prestabilita es: "a1"

ciao
quello che vuoi è un inputbox

ecco la macro

ma la devi collegare a qualcosa

---

Sub m()
Dim x As Integer
Dim v As Variant
v = Application.InputBox("inserisci il numero")
If v = Empty Then
MsgBox "Non hai inserito nulla." & Chr(13) _
& "Esco dalla procedura"
Exit Sub
End If
If Not IsNumeric(v) Then
MsgBox ("Devi inserire solo cifre e non lettere.")
Exit Sub
End If

ActiveSheet.Range("A1") = CDbl(v)
End Sub

---

MILLE GRAZIE federico460

INTENDEVO PROPRIO QUESTO.


GRAZIE ANCORA...