K
KiWin
Guest
Bonjour,
J'ai bien compris la fonctionnement des procédures Function, mais je n'en vois pas l'intérêt...
Prenons l'exmple fourni ds l'aide VBA de Office XP :
Sub Main()
temp = Application.InputBox(Prompt:= _
"Veuillez entrer la température en degrés F.", Type:=1)
MsgBox "La température équivaut à " & Celsius(temp) & " degrés C."
End Sub
Function Celsius(fDegrees)
Celsius = (fDegrees - 32) * 5 / 9
End Function
N'est t'il pas plus simple d'écrire :
Sub Main()
temp = Application.InputBox(Prompt:= _
"Veuillez entrer la température en degrés F.", Type:=1)
Celsius = (temp - 32) * 5 / 9
MsgBox "La température équivaut à " & Celsius(temp) & " degrés C."
End Sub
Qui peut m'expliquer ce qui m'échappe ?? Merci.
J'ai bien compris la fonctionnement des procédures Function, mais je n'en vois pas l'intérêt...
Prenons l'exmple fourni ds l'aide VBA de Office XP :
Sub Main()
temp = Application.InputBox(Prompt:= _
"Veuillez entrer la température en degrés F.", Type:=1)
MsgBox "La température équivaut à " & Celsius(temp) & " degrés C."
End Sub
Function Celsius(fDegrees)
Celsius = (fDegrees - 32) * 5 / 9
End Function
N'est t'il pas plus simple d'écrire :
Sub Main()
temp = Application.InputBox(Prompt:= _
"Veuillez entrer la température en degrés F.", Type:=1)
Celsius = (temp - 32) * 5 / 9
MsgBox "La température équivaut à " & Celsius(temp) & " degrés C."
End Sub
Qui peut m'expliquer ce qui m'échappe ?? Merci.