Incrémenter

Bonjour à tous,

Merci à tous ceux qui ont déjà posé des questions et à ceux qui y ont répondu, j'ai déjà trouvé pas mal de réponses à mes questions.

Débutant VBA je cherche à rendre plus aisée l'utilisation d'une feuille de calcul avec des macro fonctions

la fonction basique:

Function Jeanm (a ,b)

jeanm =a*b

End Function

S'incrémente automatiquement si je fais recopie incrémentée de cellule; j'obtiens (jeanm(A1;B1),(jeanm(A2;B2)etc.

En revanche je ne sais pas comment affecter une valeur à A1pour qu'elle s'incrémente de même.(L'équivalent de Range(a))

pour ma fonction recherche (V)

Function Jeanm (a)

Jeanm = Application.VLookup(Range("A1").Value, Sheets("Feuil1").Range("K1:L10"), 2, False)

End Function

Cordialement

Bonsoir

Je ne comprends pas trop le problème

Si tu écris ta fonction comme ceci

Function Jeanm(a)
Jeanm = Application.VLookup(a, Sheets("Feuil1").Range("K1:L10"), 2, False)
End Function

Dans la page Excel en tirant la formule tu vas avoir

=jeanm(A1)

=jeanm(A2)

=jeanm(A3)

etc....

Où est le problème ?

Bonsoir,

Et tous mes remerciements pour la rapidité avec laquelle Banzai 64 (de Bidart ?)

a résolu mon problème,

Je ne savais pas comment remplacer Range (A1), par a, j'obtenais bien:

=jeanm(A1)

=jeanm(A2)

=jeanm(A3)

Mais pas de résultat à part un message d'erreur

Rechercher des sujets similaires à "incrementer"