Bonjour,
j'essaie de récupérer dans une cellule la valeur que je demande à l'utilisateur de saisir mais j'ai certainement un petit problème de code
Pouvez vous m'aider ???
Merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Sub Macro1() Dim mavaleur As Range Set mavaleur = Application.InputBox(prompt:="Saisir la valeur Objectif:", Title:="Saisie de données", Left:=3, Top:=-80) 'calcul l'objectif pour l'année souhaitée ActiveCell.FormulaR1C1 = "=(mavaleur*R[-4]C[1])+R[-4]C[1]" Range("F21").Select End Sub
Partager