probleme if/then dans macro

[pakalom]

bonjour,

Je me tourne encore une fois vers vous ( et!! oui......)

je souhaite que mon message change lorsque ma diff est sup à 8 ou pas.

MAIS comme d'habitude l'ordinateur est tétu, il ne veut pas le faire.

Pouvez vous venir a mon secours !!!!!


Merci d'avance

 

[pakalom]

Re : probleme if/then dans macro

Info c'est sur excel 2003 et non 2010

 

[ROGER2327]

Re : probleme if/then dans macro

Bonjour pakalom

[COLOR="DarkSlateGray"][B]Sub test()
Sheets("feuil1").Select
Range("g8").Select
If ActiveCell.[COLOR="Red"]Value [/COLOR]< 8 Then
MsgBox (" A L A R M !!!  DEPECHE TOI !!!")
Else
MsgBox (" RELAX TU AS LE TEMPS !!!!!")
End If
End Sub[/B][/COLOR]

fera l'affaire.

Plus simplement :

[COLOR="DarkSlateGray"][B]Sub test()
  If Sheets("feuil1").Range("g8").Value < 8 Then
    MsgBox (" A L A R M !!!  DEPECHE TOI !!!")
  Else
    MsgBox (" RELAX TU AS LE TEMPS !!!!!")
  End If
End Sub[/B][/COLOR]

Plus court :

[COLOR="DarkSlateGray"][B]Sub test()
  MsgBox IIf(Sheets("feuil1").Range("g8").Value < 8, " A L A R M !!!  DEPECHE TOI !!!", " RELAX TU AS LE TEMPS !!!!!")
End Sub[/B][/COLOR]

Bonne nuit !

ROGER2327
#4158

Vendredi 13 Absolu 138 (Saint Cantarel, l'illuminateur, SQ)
4ème Sanculottide An CCXVIII
2010-W38-1T22:25:43Z

 

[pakalom]

Re : probleme if/then dans macro

Bonsoir roger2327,

merci merci merci BEAUUUUUUUUUUCCCCCOOOUUUUUPP !!!!!!

ça marche......