Copiez les valeurs d'un textbox dans une plage de cellule définie

Salut,

Afin d'activer la cellule directement libre en-dessous de A8, tu peux utiliser cette instruction, à condition que A8 soit remplis (à la place de Cells(ActiveCell.Row + 1, 1).Activate).

Range("A" & Range("A7").End(xlDown).Row + 1).Activate

En cas de doute au sujet du remplissage de A8, tu peux utiliser ce code :

If Range("A8") = "" Then
    Range("A8").Activate
Else
    Range("A" & Range("A7").End(xlDown).Row + 1).Activate
End If

Si ce n'est pas ça, merci de joindre un fichier.

Cordialement.

Un tout grand merci !!!! Je commençais à désesperer !

Je rencontre un problème avec le code lors de la validation avec le bouton, je lui demande de copiez la valeur d'un textbox en A8 et puis les lignes en dessous ( jusque la pas de soucis) mais en parrallèle je lui demande de copiez la valeur d'une combobox en C8 et puis les en dessous.

La ou je rencontre un probleme c'est que je dois clicker plusieurs fois pour qu'il me copie les valeurs exacte.

Salut,

Ton fichier démo est assez fait à-la-va-vite, il n’y a même pas le bouton dont tu fais mention dans ton texte et ton utilisation de l’instruction proposée Range("A" & Range("A7").End(xlDown).Row + 1).Activate pour trouver la première ligne vide est très hasardeuse.

Finalement, je pense qu’il vaut mieux partir dans une autre direction afin de trouver cette première ligne vide. On pourrait partir de la cellule A36 et ‘’remonter’’ à l’aide de l’instruction End(xlup), mais je ne sais pas si ta feuille correspond vraiment à la réalité ou si tu auras peut-être des modifications sur les dernières lignes.

Recherchons donc cette première ligne vide avec l’instruction Do Until / Loop, tel que dans ce fichier.

Si tu ouvres ton formulaire et que tu inscrits ‘’1^ère ligne’’ sous ‘’Catégories’’ et ‘’Fuite avant compteur’’ sous ‘’Activité’’ puis que tu cliques sur ‘’Confirmation’’, la cellule correspondante de la colonne A ne se remplit pas et faussera les prochaines inscriptions. Faudrait-il forcer l’inscription du champ ‘’OT’’ afin d’éviter ce problème ? Mais je n’ai pas trop l’envie de commencer à toucher tes codes qui mériteraient un sacré nettoyage.

D’autres choses m’étonnent un peu, comme le fait de décomposer la date en un jour et un mois ! Ceci empêche tout plein d’utilisation automatique par la suite, comme de trouver le nom du jour de la semaine de la date concernée.

Merci de rester sur le Forum pour continuer la discussion.

Cordialement.

Bonjour,

Je ne cache pas que c'est une première pour moi donc au fur et a mesure je me rend compte et j'adapte !

Effectivement je venais tout juste d'utiliser "End(xlUp)" Afin de me positionner sur la bonne ligne.

Merci

Ah oui et j'ai aussi mis une condition de blocage si mon champs OT est vide