Bonjour tous j'arrive pas à retrouver comment on appelle une fonction d'un module VBA d'une cellule Excel ex : Nbre en A1 et B1 et le calcul / résultat en C1via la fonction VBA ? Donc que met-on en C1 pour l'opération se fasse ? Merci bien

Re : Appel fonction je pige pas ....et j'aime pasParce que vous n'aimez pas ne piger, seulement, j'espère !?D'ou ces chiffres biscornu sortent-ils ?? un matheux aime comprendre !!! 365,2425 c'est sensiblement le nombre de jours moyen d'une année. 30,436875 le nombre de jours moyen dans un mois (365,2425 / 12) 7: dans une semaine, 1 / 24: dans une heure, 1 /1440: dans une minute et le IIF , je sais plus ? IIf(Condition, ValeurSiVraie, ValeurSiFaux) Remarquez, vous pouvez vous passer des IIf en l'écrivant comme ça :Function DuréeEnClair(ByVal D As Double) As String Dim Z As String, M As Double, U As String, N As Long, NDét& Z = "" M = 365.2425: U = "an": GoSub 2 M = 30.436875: U = "mois": GoSub 2 M = 7: U = "semaine": GoSub 2 M = 1: U = "jour": GoSub 2 M = 1 / 24: U = "heure": GoSub 2 M = 1 / 1440: U = "min.": GoSub 2 1 DuréeEnClair = Mid$(Z, 5) Exit Function 2 N = Int(D / M) If N > 0 Then If N > 1 Then If InStr("s.", Right$(U, 1)) = 0 Then U = U & "s" Z = Z & " et " & N & " " & U D = D - M * N End If If Len(Z) = 0 Then NDét = 0 Else NDét = NDét + 1 If NDét >= 2 Then GoTo 1 Return End Function

Re : Appel fonction Pour tester ma fonction je l'ai transformé en SUb , pour faire du "pas à pas " CA MARCHE donc maintenant comment l'adapter DIRECT dans Excel ?? Merci bien je joins le nouveau fichier "bidouillé " pour ceux qui veulent tester, faut aller en VBA

Appel fonction

herve62

XLDnaute Barbatruc

Supporter XLD

28 Avril 2015

Re : Appel fonction

Oui quand je dis "J'aime pas !" c'est que j'ai horreur d'appliquer n'importe quel truc si j'ai pas pigé
j'aime savoir ce que je fais !
IIF : moi j'en suis encore au IF THEN ELSE ..... !!
Sinon j'ai testé ça marche , je te remercie , je vais décortiquer !!

Vote positif 0 Vote négatif

Effectuez une recherche sur Excel Downloads...

Appel fonction

herve62

XLDnaute Barbatruc

herve62

XLDnaute Barbatruc

Discussions similaires

Nous accordons de l'importance à votre vie privée