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

Valeurs textbox

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

apdf1

XLDnaute Impliqué
Bonjour et bonne année à tous

Voila comment envoyer les valeurs des textboxs vers la ligne 6 de la feuille 1 en utilisant "xlDown" pour avoir toujours les nouvelles info sur cette ligne 6.

Merci d'avance

Ci joint fichier

Max
 

Pièces jointes

Re : Valeurs textbox

Bonjour Apdf1 🙂,
Modifie ton code comme ceci :
Code:
With Sheets("Feuil1")
.Range("B6:M6").Insert Shift:=xlDown, CopyOrigin:=xlFormatFromRightOrBelow
.Cells(6, 2) = TextBox1.Value 'nom
.Cells(6, 3) = TextBox3.Value 'Date
.Cells(6, 4) = TextBox4.Value 'N° Facture
.Cells(6, 5) = TextBox5.Value 'adresse
.Cells(6, 6) = TextBox6.Value 'CP
.Cells(6, 7) = TextBox7.Value 'ville
.Cells(6, 8) = TextBox8.Value 'tel
End With
Bon dimanche 😎
 
Re : Valeurs textbox

bonjour apdf1
dans ton cas l'instruction with sert a rien !!!!
sans passer par une boucle

Code:
Rows("6:6").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
    Cells(6, 2) = TextBox1.Value 'nom
    Cells(6, 3) = CDate(TextBox3.Value) 'Date
    Cells(6, 4) = TextBox4.Value 'N° Facture
    Cells(6, 5) = TextBox5.Value 'adresse
    Cells(6, 6) = TextBox6.Value 'CP
    Cells(6, 7) = TextBox7.Value 'ville
    Cells(6, 8) = TextBox8.Value 'tel

il faut traiter les formats


ps :bonjour JNP on c'est loupe de peu bon dimanche🙂🙂🙂🙂🙂
 
Dernière édition:
- 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
256
Réponses
10
Affichages
384
Réponses
17
Affichages
836
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…