MsgBox avec valeur d'une cellule

C

Catrice

XLDnaute Barbatruc

• 9 Novembre 2008

• #2

Re : MsgBox avec valeur d'une cellule

Bonjour;


Private Sub Worksheet_Activate()
Calculate
If Range("G2") < 1000 Then
MsgBox "Vidange de la voiture à faire dans " & Range("G2") & " KMS", vbInformation + vbOKOnly
End If
End Sub

 

Vote positif 0 Vote négatif

P

Pierre-Henry

Guest

• 9 Novembre 2008

• #3

Re : MsgBox avec valeur d'une cellule

Bonjour,
Avec ce que tu as déjà, ça m'étonne que tu n'aies pas trouvé tout seul 😉

Code:

MsgBox "Vidange de la voiture à faire dans " & [color=red]Range("G2").Value[/color] & " KMS", vbInformation + vbOKOnly

Edit: Bonjour Catrice, bonjour Said....sacré collision là 🙂

 

Dernière modification par un modérateur: 9 Novembre 2008

Vote positif 0 Vote négatif

BERRACHED said

XLDnaute Accro

• 9 Novembre 2008

• #4

Re : MsgBox avec valeur d'une cellule

Salut,Sev

essayé ce bout decode :

Code:

Dim T As String
T = Range("G2").Value
Calculate
If Range("G2") < 1000 Then
    MsgBox "Vidange de la voiture à faire dans " & T & " KMS", vbInformation + vbOKOnly
    End If

Cordialement

 

Vote positif 0 Vote négatif

S

sev

Guest

• 9 Novembre 2008

• #5

Re : MsgBox avec valeur d'une cellule

Merci , celà fonctionne.
j'avais due faire une erreure de rédaction avant !!!

 

Vote positif 0 Vote négatif