Complement code vba
Résolu
Baki
-
Baki -
Baki -
Bonjour,
Voila j'ai un bout de code VBA qui me permet de saisir un texte dans une cellule. J'aimerai que après la saisie de mon texte dans la cellule,lorsque je recliquerai sur mon bouton de commande la prochaine valeur aille dans la cellule en dessous et ainsi de suite.
voici le code :
Mesure = imputBox(prompt :=" saisir texte")
If mesure = "" then
exit sub
else
Range ("A3").Value = mesure
end if
end sub
Merci d'avance pour toutes vos réponses
Voila j'ai un bout de code VBA qui me permet de saisir un texte dans une cellule. J'aimerai que après la saisie de mon texte dans la cellule,lorsque je recliquerai sur mon bouton de commande la prochaine valeur aille dans la cellule en dessous et ainsi de suite.
voici le code :
Mesure = imputBox(prompt :=" saisir texte")
If mesure = "" then
exit sub
else
Range ("A3").Value = mesure
end if
end sub
Merci d'avance pour toutes vos réponses
A voir également:
- Complement code vba
- Code ascii - Guide
- Code puk bloqué - Guide
- Comment déverrouiller un téléphone quand on a oublié le code - Guide
- Code activation windows 10 - Guide
- Scanner qr code pc - Guide
2 réponses
Salut,
Attention à être bien précis en codant : imput au lieu de input, Mesure au lieu de mesure. Voici ton code corrigé :
mesure = InputBox(prompt:=" saisir texte")
If mesure = "" Then
Exit Sub
Else
Range("A3").Select
Do While ActiveCell <> ""
ActiveCell.Offset(1, 0).Select
Loop
ActiveCell = mesure
End If
Attention à être bien précis en codant : imput au lieu de input, Mesure au lieu de mesure. Voici ton code corrigé :
mesure = InputBox(prompt:=" saisir texte")
If mesure = "" Then
Exit Sub
Else
Range("A3").Select
Do While ActiveCell <> ""
ActiveCell.Offset(1, 0).Select
Loop
ActiveCell = mesure
End If
