XL 2016 Majuscule inattendue dans une colonne

[Scorpio]

Bonjour à tous,
Dans ce classeur, qui fonctionne très bien, le souci, c'est dans la colonne "B" de la feuille "Saisie"
En fait, lorsque je transfert mes données, je me retrouve avec que des majuscules dans la colonne "B"
Pourriez-vous s'il vous plaît, m'informer ??
Merci d'avance et a++++

 

[M12]

Bonjour,

A tester

 

[vgendron]

Bonjour
c'est dans ce code que ca se passe

Private Sub CommandButton1_Click()
If Me.ComboBox1 <> "" And Me.ComboBox2 <> "" Then
  ActiveCell = UCase(Me.ComboBox1)
  ActiveCell.Offset(, 1) = Me.ComboBox2
  ActiveCell.Offset(, 2) = Me.ComboBox3
  ActiveCell.Offset(, 3) = CDbl(Me.TextBox1)
  Unload Me
Else
   MsgBox "Veuillez remplir tous les champs, avant de transférer sur la feuille... "
   Exit Sub
End If
End Sub

avec la commande UCASE



hello @M12

 

[Scorpio]

Salut M12
Salut vgendron
A oui, j'ai compris, le UCase
Merci à tout deux de votre aide, super.
A++++