marcodebute350
XLDnaute Nouveau
Bonjour,
Après 2 jours de recherche sur internet, je ne trouve aucune solution à mon problème.
Voici une macro que je n'arrive pas à faire fonctionner:
Sub Augmente()
Dim myRange As Range
myRange = WorksheetFunction.VLookup(Range("R6").Value, Sheets("FORFAIT").Range("A2350"), 14, False)
myRange = myRange + 1
End Sub
Disons que sur une feuille nommée "2015" j'ai une case "R6" avec un nombre à l'intérieur (1120 pour l'exemple)
Sur une seconde feuille, nommée "FORFAIT", j'ai un tableau avec une base client (1120 étant la référence client).
Ce que je voudrais, c'est que la macro me prenne la valeur contenu dans R6 (soit 1120), me la cherche dans la feuille FORFAIT (disons qu'il la trouve en ligne 22), et m'augmente la case ligne 22 colonne 14 de 1.
Je pense que ce ne doit pas être très compliqué mais je suis débutant en macro et je n'ai vraiment rien trouvé sur internet...
Pouvez-vous m'aider s'il vous plait?
je vous remercie d'avance,
Cordialement,
marc
Après 2 jours de recherche sur internet, je ne trouve aucune solution à mon problème.
Voici une macro que je n'arrive pas à faire fonctionner:
Sub Augmente()
Dim myRange As Range
myRange = WorksheetFunction.VLookup(Range("R6").Value, Sheets("FORFAIT").Range("A2350"), 14, False)
myRange = myRange + 1
End Sub
Disons que sur une feuille nommée "2015" j'ai une case "R6" avec un nombre à l'intérieur (1120 pour l'exemple)
Sur une seconde feuille, nommée "FORFAIT", j'ai un tableau avec une base client (1120 étant la référence client).
Ce que je voudrais, c'est que la macro me prenne la valeur contenu dans R6 (soit 1120), me la cherche dans la feuille FORFAIT (disons qu'il la trouve en ligne 22), et m'augmente la case ligne 22 colonne 14 de 1.
Je pense que ce ne doit pas être très compliqué mais je suis débutant en macro et je n'ai vraiment rien trouvé sur internet...
Pouvez-vous m'aider s'il vous plait?
je vous remercie d'avance,
Cordialement,
marc