XL 2010 Tracasseries lors d'insertions de données depuis USF

[Eric C]

Bonsoir le forum
Bonsoir à toutes & à tous

Lors de mon intervention sur le post de notre ami mic6259, j'ai constaté 2 choses :
1/ Lors de l'insertion de nouvelles données depuis l'Usf, un renvoi systématique à la ligne se crée dans les lignes de la feuille "Adhérents" alors que, depuis "Format cellules" - "Alignement", j'avais décoché "Renvoi à la ligne" ?
2/ Lors de l'activation de la ComboBox1, on constate une "croche" à la fin des Items ?
Je joints le fichier pour une éventuelle étude.
Merci à vous toutes & tous.
@+ Eric c

 

[ChTi160]

Bonjour Eric
j'ai mis :

.AddItem Replace(Trim(Ws.Range("A" & J)), vbCrLf, "")

ou alors

For J = 2 To Ws.Range("A" & Rows.Count).End(xlUp).Row
 Ws.Range("A" & J) = Replace(Trim(Ws.Range("A" & J)), vbCrLf, "")'on nettoye la cellule'
    .AddItem Ws.Range("A" & J)
Next J

ça semble répondre a la demande Lol
jean marie

 

[Eric C]

Bonjour le forum
Bonjour Jean Marie

Merci de t'être penché sur mon problème. Tes 2 soluces fonctionnent. A quoi cela était il dû ? Par ailleurs, aurais tu une idée pour le premier problème évoqué (passage à la ligne ???).

Bonne journée à toi

@+ Eric c

 

[ChTi160]

Bonjour Eric
la solution que j'ai trouvé ,c'est de remplacer les TextBox qui me semblent être Malades Lol
et la plus de problème plus besoin de Replace et Autre artifice!
jean marie