XL 2016 cellule via textbox et textbox vers cellule

  • Initiateur de la discussion Initiateur de la discussion MASSJIPE
  • 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 !

Bonjour
dans la ligne With Feuil1 je voudrais la nommer data quotidian
Merci
Code:
Private Sub CommandButton2_Click()
With Feuil1
col = .Cells(8, Columns.Count).End(xlToLeft).Column + 1 ' Prend en compte la dernière valeur de la cellule plus un
.Cells(8, col) = TextBox1.Value 'ligne 8
.Cells(15, col) = TextBox2.Value 'ligne 15
.Cells(24, col) = TextBox3.Value 'ligne 24
.Cells(27, col) = TextBox4.Value 'ligne 27
End With
End Sub
 
re tous 🙂🙂🙂
en régle general il est preferable d'utiliser le code_name de la feuille plus simple en cas de renomage

dans ton exemple
on peut ecrire With Sheets("A") mais si renomage marche plus

autrement si tu veus vraiment l'ecrire a ta facon

With Sheets("Data quotidian")
 
- 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

Discussions similaires

Réponses
3
Affichages
149
  • Question Question
Microsoft 365 Lecture vocale USF
Réponses
5
Affichages
208
  • Question Question
Microsoft 365 Problème de date
Réponses
5
Affichages
266
Retour