Userform modififer

Bonjour, j'ai un userform qui me permet de modifier un litige. Lorsque j'effectue une modif', elle apparait automatiquement sur une feuille nommée "historique litiges". Seulement, j'ai un petit problème avec le code. La modif ne s'insère pas dans la feuille. Fichier joint. Merci d'avance.

Private Sub CommandButton1_Click()

Range("Traité_par").Rows(i_cde) = ComboBox2.Value

Range("Action").Rows(i_cde) = TextBox1.Value

Range("Statut_litige").Rows(i_cde) = ComboBox3.Value

Set fh = Sheets("Historique litiges")

fh.Range("A2:G2").Insert shift:=xlDown

fh.Range("A" & 2) = TextBox2

fh.Range("B" & 2) = ComboBox1

fh.Range("C" & 2) = Range("D" & i_cde + 1)

fh.Range("D" & 2) = ComboBox2

fh.Range("E" & 2) = TextBox1

fh.Range("F" & 2) = Range("L" & i_cde + 1)

fh.Range("G" & 2) = Now

Unload Me

End Sub

Je viens de te répondre sur un autre post : tout s'écrit normalement mais sur la ligne 10 qui est masquée et que donc on ne voit pas.

Démasque-la !

Bye !

Bonjour

voila un nouveau projet avec edition PDF

avec un seule bouton

A+

Maurice