Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Fenetre pour insérer valeur dans une cellule donnée

  • Initiateur de la discussion Initiateur de la discussion Consultat
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

C

Consultat

Guest
Re-bonjour,

voila, ayant brièvement découvert aujourd'hui , ou plutot essayer de découvrir, ce qu'était les macros ainsi que visual basic, j'aurais besoin de vos connaissances.

J'ai créé un macro qui permet d'insérer une ligne au niveau de la ligne 12 de la feuille "test":
Sub Ajoutligne()
'
' Ajoutligne Macro
' Macro enregistrée le 16/04/2010

Worksheets("test").Cells(12, 1).EntireRow.Insert

End Sub

La macro marche correctement mais j'aimerais également ajouter une valeur à la cellule B12 de la feuille "test" par exemple "fruits". Si possible via l'affichage d'une fenetre me demandant l'intitulé.

Merci,
bonne journée.

PS: je rame 😀
 
Re : Fenetre pour insérer valeur dans une cellule donnée

Bonjour,

essaye peut être ainsi :

Code:
Sheets("FeuilleTest").Range("B12").Value = InputBox("Quel mot en B12")

bonne fin d'après midi
@+

Edition : bonjour Bertrand
 
Re : Fenetre pour insérer valeur dans une cellule donnée

Bonjour,

voila, mon bout de code avance, cependant il me reste encore un petit problème.


Donc la j'ajoute 1 ligne au niveau de la cellule 11 de la feuille paramètre et également sur la feuille test.
Ensuite j'ajoute un mot dans la cellule c11 sur la ligne qui vient d'être créé.
J'aimerais par ailleurs, que cela s'ajoute également sur la cellule c11 de la feuille test.

Worksheets("paramètre").Worksheets("test").Range("C11") = InputBox("mot?")
J'ai essayé cela, mais sa n'a pas l'air de fonctionner.

Auriez vous une petite idée.

Merci
 
Re : Fenetre pour insérer valeur dans une cellule donnée

re,
c'est tout simple, après cette ligne:
Worksheets("paramètre").Range("C11") = InputBox("mot?")
tu mets :
sheets("test").range("C11")=sheets("paramètre").range("C11")
 
Re : Fenetre pour insérer valeur dans une cellule donnée

Merci Bertrand... Simple lorsqu'on connait un minimum 😉
En tout cas sa fonctionne parfaitement.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

M
Réponses
6
Affichages
1 K
Michel J.
M
B
Réponses
4
Affichages
2 K
benoitoleron
B
C
Réponses
1
Affichages
2 K
claivier_58
C
C
Réponses
3
Affichages
2 K
claivier_58
C
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…