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

userform vers tableau

Créer une discussion

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 !

S'inscrire
P

Profane

XLDnaute Occasionnel
Bonjour le forum,
allez je rentre dans le vif du sujet
j'avais trouvé sur le forum une reponse à ce sujet
qui m'avait a l'époque impecablement été
car j avais a remplir un tableau de 5 colonnes
via un userform et des textbox

Private Sub CommandButton1_Click()
Dim i As Integer
i = Range("B65536").End(xlUp).Row + 1
Range("B" & i) = Format(Date, "dd mm yyyy")
Range("C" & i) = TextBox1
Range("D" & i) = TextBox2
Range("E" & i) = TextBox3
Range("F" & i) = TextBox4
Range("G" & i) = TextBox5
Range("H" & i) = TextBox6
TextBox1 = ""
TextBox2 = ""
TextBox3 = ""
TextBox4 = ""
TextBox5 = ""
TextBox6 = ""
End Sub

mon soucis aujourd'hui c'est que j'aimerai faire la même chose
pour un tableau de 30 colonnes , et que je peux pas
me permettre de consever la methode de remplissage via
Range("G" & i) = TextBoxN sachant que si quelqu'un insere une colonne
tout est foutu 🙂 (moins facile a voir que sur un tableau à 5 colonnes)
je me rappelle avoir vu un autre post parlant d'une méthode
"nommée" par le nom du champ pour éviter ces soucis
mais pas moyen de remettre la main dessus

quelqu'un pourrais m'aider ?

merci d'avance

@++
 
Trier par date Trier par votes
Re : userform vers tableau

bonjour Profane

voila une macro qui peut convenir

veiller a renommer d'autres textbox qui ne seraient pas concernés

Code: 
Private Sub CommandButton1_Click()
Dim i As Integer
Dim n As Integer
i = Range("B65536").End(xlUp).Row + 1
For n = 0 To UserForm1.Controls.Count - 1
If Left(UserForm1.Controls(n).Name, 7) = "TextBox" Then
Cells(i, 3 + n) = UserForm1.Controls(n)
UserForm1.Controls(n) = ""
End If
Next n
Cells(i, 2) = Format(Date, "dd mm yyyy")
End Sub
 
Vote positif 0 Vote négatif
Re : userform vers tableau

Bonjour Pierre jean, et bonjour le forum

en fait pierrejean ta reponse ne reponds pas completement a ma demande 🙂

je m'explique "en gros" il faudrait que les champs du userForm
comportant des textbox ou combobox, remplissent un tableau en
fonction du "nom des champs" du tableau, et non pas en fonction d'un numero alphabetique de colonne
tout ceci dans le but d'éviter l'insertion malheureuse d'une colonne

voila @++

ps: je ne retrouve pas ce post où une personne décrivait cette methode
 
Vote positif 0 Vote négatif
Re : userform vers tableau

re

et peut-on savoir comment faire la relation entre chacun des textbox (ou combobox) et la colonne a desservir ???

si tu acceptes de nommer chacun de tes textbox (ou combobobox ) comme le titre de la colonne c'est envisageable , et encore en sachant dans quelle ligne aller chercher le titre

en bref, on serait plus a l'aise avec un fichier exemple
 
Vote positif 0 Vote négatif
Re : userform vers tableau

c'est pas faux
sinon faut faire une fonction qui recherche la position l'intitulé des colonnes (s'il ne change pas) dans la ligne contenant les intitulés.

pas trop trop dur a faire et ca permet de tolérer les insertions de colonnes.
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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

F
  • Résolu(e)
Autres Insérer une ligne
2 3
Réponses
36
Affichages
3 K
francescofrancesco
F
G
  • Question Question
XL 2016 Compte à rebours dans un userform
2
Réponses
15
Affichages
983
patricktoulon
  • Question Question
XL 2021 Verifier les doublons dans feuille avant validation
Réponses
11
Affichages
503
cathodique
B
  • Résolu(e)
Microsoft 365 affecter des valeurs dans un tableau de noms de variable
Réponses
4
Affichages
1 K
bérylion
B
  • Question Question
importation de donnees dans un fichier excel dans un formulaire
Réponses
3
Affichages
646
kkamadou
B
  • Question Question
Microsoft 365 Additionner des cellules même ligne en userform vba
Réponses
13
Affichages
969
sousou
F
  • Résolu(e)
Microsoft 365 Commentaire cellule dans TextBox dans UserForm
Réponses
4
Affichages
760
Francky79
F
A
  • Résolu(e)
XL 2013 Afficher tableau sur userform
2
Réponses
25
Affichages
2 K
Appo1985
A
D
  • Question Question
XL 2021 Filtre Multi Critères Listview VBA
2
Réponses
21
Affichages
3 K
Dranreb
P
  • Résolu(e)
Microsoft 365 Erreur d'exécution "9" :L'indice n'appartient pas à la sélection
Réponses
9
Affichages
2 K
pelerin65
P
B
  • Question Question
Microsoft 365 formulaire VBA problème
Réponses
3
Affichages
1 K
herve62
C
  • Résolu(e)
XL 2010 D'une userform transfert sur plusieurs feuilles en fonction
Réponses
4
Affichages
968
ccia
C
D
  • Résolu(e)
Microsoft 365 Mise à jour de certaines données dans une ListView d'un UserForm
Réponses
8
Affichages
882
Diane272727
D
R
  • Résolu(e)
XL 2016 Un petit coup de main pour un code VBA
Réponses
11
Affichages
1 K
ReneDav14000
R
T
  • Question Question
Renommer les doublons
Réponses
3
Affichages
937
Tickaff
T
A
  • Question Question
XL 2019 ajout automatique de quantités de sortie de stock au méme produit existant deja au tableau
Réponses
3
Affichages
1 K
vgendron
A
  • Résolu(e)
XL 2010 ajout de textbox
Réponses
2
Affichages
929
Appo1985
A
P
  • Question Question
XL 2016 userform base de donnée
Réponses
4
Affichages
613
Paillou
P
R
  • Question Question
Microsoft 365 Mise en forme email
Réponses
7
Affichages
1 K
dysorthographie
  • Question Question
XL 2019 Ajouter un " aperçu avant impression " à ce code
Réponses
7
Affichages
1 K
Yann71
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…