Userform - Transfert données vers première colonne vide??

Question

Bonjour à tous, 

Je suis nouveau sur le forum en tant qu'inscrit, mais suis habitué d'en parcourir les questions et les solutions. 

J'ai actuellement deux soucis avec Userform:

#1: J'ai créé mon Userform, tout est OK. J'aimerais simplement intégré une fonction qui me paraît pourtant être simplissime mais je ne trouve pas la solution...

J'aimerais que les données de mon Textbox1 soient intégrées en ligne 5 de la première colonne vide,
J'aimerais que les données de mon Textbox2 soient intégrées en ligne 6 de la première colonne vide,
J'aimerais que les données de mon Textbox3 soient intégrées en ligne 7 de la première colonne vide
Le but étant qu'à chaque fois que je renseigne le Userform et que je valide, les données soient envoyées dans une nouvelle colonne, à la suite de la précédente renseignée...

Pour le moment, je l'avais fais différemment mais avait trouvé une solution par ligne et non par colonne comme je souhaite l'avoir...

#2: J'aimerais également que la forme de chaque nouvelle colonne ainsi créée reprenne celle de la précédente (c'est à dire l'épaisseur des traits des cellules, la couleurs des cellules etc...)

Un grand grand merci à ceux qui me liront, et un énorme merci à ceux qui tenteront de m'apporter leurs lumières.

jordane45 · Answer

Bonjour,


Je ne vois pas de difficultés dans votre demande.
Avez-vous commencé à écrire du code ? Si oui, sur quoi bloquez vous ?

Trouver la première colonne vide :

If Range("iv1").End(xlToLeft).Column > 1 Then
    num_col = Range("iv1").End(xlToLeft).Column + 1
Else
    num_col = 1 'aucune colonne utilisée..
End If

Coller des valeurs à partir d'un textbox contenu dans un userform.

Cells(5,num_col).value = Me.TextBox1.value 
Cells(6,num_col).value = Me.TextBox2.value 
' etc..

J'aimerais également que la forme de chaque nouvelle colonne ainsi créée reprenne celle de la précédente (c'est à dire l'épaisseur des traits des cellules, la couleurs des cellules etc...)

Un petit coup d'enregistreur de macro devrait largement suffire à vous donner le code à utiliser


Cordialement,
Jordane

ucfoutu · Answer

Bonjour,
On va encore me dire je ne sais trop quoi à propos de la sémantique, mais le développement impose la rigueur.
Qu'est donc exactement, pour le demandeur, une "colonne vide" ?
Pour moi, c'est une colonne dont aucune des lignes n'est remplie.
On voit bien ici la nécessité d'être précis, car la solution à la difficulté exposée est différente selon la définition de cette colonne.
La réponse donnée entraîne le remplissage à partir de la colonne suivant la dernière remplie de chaque ligne.
La réponse serait totalement différente si le remplissage devrait être fait, sur chaque ligne, à partir de la  colonne suivant la dernière colonne contenant une ou plusieurs valeurs.
Ce n'est pas dut tout la même chose !

Userform - Transfert données vers première colonne vide??

2 réponses

Votre réponse

Discussions similaires