Discussion :

[RéviAT]

Bonne matinée à chacun,
Souvent j’aimerais utiliser dans mon programme VBA une fonction Excel que j’emploie dans une feuille Excel, mais je ne sais pas comment faire (sauf à effectivement écrire dans la feuille Excel). Comment donc intégrer dans VBA une fonction Excel ?
Voici un exemple avec la fonction MAX. Je voudrais mettre dans la variable « Résultat » la valeur maximale des deux variables « Valeur1 » et « Valeur2 ».
Voici le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Sub IntégrationFonctionExcel()
    Dim Valeur1 As Integer, Valeur2 As Integer, Résultat As Integer
    Valeur1 = 2
    Valeur2 = 3
    Range("A1").Select
    ActiveCell.FormulaR1C1 = Valeur1
    Range("B1").Select
    ActiveCell.FormulaR1C1 = Valeur2
    Range("C1").Select
    ActiveCell.FormulaR1C1 = "=MAX(RC[-2]:RC[-1])"
    Résultat = [C1]
    MsgBox Résultat
End Sub

Mais comment faire pour passer directement de Valeur1 et Valeur2 à Résultat. Par exemple en mettant : Résultat = MAX(Valeur1 ; Valeur2) ?
Merci par avance.
RéviAT

[fring]

Bonjour,

Voici un exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MsgBox Application.WorksheetFunction.Max(Range("A1:B1"))

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MsgBox Application.WorksheetFunction.Max(Valeur1, Valeur2)

[RéviAT]

Merci "Fring".
Cela va m'être très utile.
A bientôt.
RéviAT (58 ans)

[fring]

Maintenant que j'y repense, il me semble que tu avais un jour posé la question pour savoir comment afficher l'age.

Tu vas dans le menu "Liens rapides" ci-dessus, Modifier votre profil et sous l'endroit où tu as introduit ta date de naissance, tu as un menu déroulant qui te permet de choisir ce que tu veux afficher.