Bonjour,

J'ai un userform qui me permet d'afficher les données de ma Feuil

J'ai mis un bouton pour pouvoir enregistrer les modifications

soit:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Private Sub CommandButton2_Click()
Dim Lig As Long
Dim ws As Worksheets
Set ws = Worksheets("Feuil1")
 
ws.Cells(Lig, 1).Value = Me.Nom.Value
ws.Cells(Lig, 2).Value = Me.photo.Value
ws.Cells(Lig, 3).Value = Me.Tph.Value
ws.Cells(Lig, 4).Value = Me.valmarch.Value
ws.Cells(Lig, 5).Value = Me.prixht.Value
ws.Cells(Lig, 6).Value = Me.livraison.Value
ws.Cells(Lig, 7).Value = Me.tva.Value
ws.Cells(Lig, 8).Value = Me.etattva.Value
ws.Cells(Lig, 9).Value = Me.prixttc.Value
ws.Cells(Lig, 10).Value = Me.ventemin.Value
ws.Cells(Lig, 11).Value = Me.venteestim.Value
ws.Cells(Lig, 12).Value = Me.ecart.Value
 
End Sub
A chaque fois j'obtien une erreur "91" sur
Code : Sélectionner tout - Visualiser dans une fenêtre à part
ws.Cells(Lig, 1).Value = Me.Nom.Value
J'ai lu plusieurs poste et l'aide mais je n'arrive pas as identifier le probleme.

Pourriez vous m'aider? Merci