|
|
|
|
Bonjour j'ai une autre question du même type sauf que moi c'est :
Sub Calculer()
'
' Calculer Macro
' Macro enregistrée le 25/04/2009 par Moi
'
'
Si (If) : La valeur de la cellule C11 est supérieur ou égale à 3
Else
Range("H11").Select
ActiveCell.FormulaR1C1 = "Mon message 1"
Range("H12").Select
ActiveCell.FormulaR1C1 = "Mon message 2"
Else
Range("H11").Select
ActiveCell.FormulaR1C1 = "Mon message 3"
Range("H12").Select
ActiveCell.FormulaR1C1 = "=C12/(C11*C11)"
End If
End Sub |
Bonjour
Sub Calculer()
if range("C11")>3 then
Range("H11") = "Mon message 1"
Range("H12") = "Mon message 2"
Else
Range("H11") = "Mon message 3"
Range("H12").Formula = "=C12/(C11*C11)"
End if
End Sub
Cordialement
Wilfried ps: n'oubliez pas de mettre votre fil sur résolu quand vous obtenez ce que vous cherchez. Merci |
Bonjour
Sub Calculer()
If Range("C11").Value >= 3 Then
Range("H11").FormulaR1C1 = "formule 1"
Range("H12").FormulaR1C1 = "formule 2"
Else
Range("H11").FormulaR1C1 = "formule 3"
Range("H12").FormulaR1C1 = "=C12/(C11*C11)"
End If
End Sub
edit : Trop tard et bonjour à Wilfried... Toujours zen |
Asp if then C if else Else if javascript Excel fonction if Fonction if dans excel en rajoutant and If then else dans select plsql If then else vbs If then else,sql Linux shell if then else Macro excel if ternaire Perl if else Shell scripts dos if then else Shell windows if then else Utilisation $ dans if excel Vb 2007 if then Vba excel if or Vba if then else Vba if then goto
