Boite de dialogue pour changer valeur cellule

Bonjour à tous!

Je recherche en VBA comment faire pour qu'en entrant une valeur dans une boite de dialogue, il me la place dans une cellule.

Je vous joint un fichier.

J'ai testé avec

Sub exemple()

End Sub

Mais je ne connais rien en VBA, je ne sais pas se qu'il faut mettre avant/après...

Merci de votre aide

Quelqu'un aurait une idée ou une piste?

Bonjour,

Pas de macro...

C'est a dire?

ActiveCell.Formula = ActiveCell.Value + InputBox("Saisir le nombre d'ajout de stock", "Nombre")

J'ai trouvé, merci

Je suis parti trop vite...

Lorsque je met Annulé sur ma boite de dialogue "erreur d'exécution 13"...

Comment faire?

Sinon, comme ajouter en texte dans ma box le contenu de la cellule qui est 2 colonnes à coté de la cellule sélectionné.

Sub STOCKPLUS()

End Sub

Merci