Bonjour à tous et à toute, je viens de finir un programme en vba qui me permet de sélectionner la dernière cellule d'une colonne , jusque la pas de soucis. Hors maintenant je souhaite insérer dans cette dernière cellule une information de code barre que j'aurai relevé avec une douchette, pour ce faire je me suis servi de la fonction with, mais quand je lance l’exécution je reçois un message qui m'indique "l'objet associé à with doit être de type défini par l'utilisateur, Object ou variant. Je me suis jamais servis des with je sais pas si c'est la meilleur solution pour cela. Désolé je débute en vba.

Programme :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Sub Vid ()
Dim Espace As Object
Dim Lig As Long
Lig = 7
Do While Not IsEmpty(Range("A" & Lig))
    Lig = Lig + 1
Loop
    With Espace
Cells(Lig, 1).Value = Espace.Value
    End With
End Sub
Pouvez vous m'aider s'il vous plait. Bonne après midi à vous.