Inputbox à l'ouverture du fichier Résolu

Question

Bonjour,

J'aimerai créer une inputbox à l'ouverture d'un fichier excel
Une fois la valeur entrez et valider j'aimerai qu'elle s'affiche dans la feuille 1 à la cellule D4

Merci pour votre aide

pijaku · Answer

Bonjour,
1- ouvrez votre classeur,
2- Tapez ALT + F11 ---> une fenêtre Visual Basic s'affiche
3- Sur la gauche de cette fenêtre, double cliquez sur "This workbook"
4- Menu déroulant (fenêtre centrale) de gauche (général) choisir : WorkBook, menu déroulant de droite (déclarations) choisir : "Open"
5- 2 lignes de code s'affichent :
Private Sub Workbook_Open()

End Sub
6- entre ces deux lignes collez ce code pour obtenir :
Private Sub Workbook_Open()
Dim a As String
a = InputBox("Merci de saisir ici le contenu de la cellule D4", "Saisie")
Sheets("Feuil1").Range("D4") = a
End Sub

paul57 · Answer

Merci à toi pijaku,

C t super bien expliqué et ca marche comme je le voulais
Merci beaucoup

Inputbox à l'ouverture du fichier

2 réponses

Votre réponse

Discussions similaires

Newsletters