Inserer une ligne avec un texte dans une feuille

Bonjour,

J'ai un peu de notion en VBA mais pas assez pour faire ce code je souhaite que lorsque mais 2 checkbox sont true ma valeur se copie dans la cellule de mon choix et cas chaque saisie cela rajoute une ligne pour l'instant j'en suis là :

Private Sub AJOUT_Click()

If dupontSP40M = True Then

If ACTION1 = True Then

Worksheets("dupont").Range("A5" & num).Value = "ENVIRONNEMENT MAT DE DEPORT + HAUBANNAGE"

End If

End If

End Sub

vous imaginez bien que cela ne fonctionne pas.

Je vous remercie d'avance pour votre aide

Salut,

On peut voir ton fichier, s'il-te-plait ?

Cordialement.

Hello,

Comme l'a dit Yvouille, sans fichier difficile de répondre.

J'essaie tout de même : essaie le code suivant :

If dupontSP40M = True AND  ACTION1 = True Then

Worksheets("dupont").Range("A5" & num).Value = "ENVIRONNEMENT MAT DE DEPORT + HAUBANNAGE"
 

Bonjour,

Voir aussi s'il n'y aurait pas une erreur de ce côté-ci :

Range("A5" & num)

Que renvoie num ?

Bonjour, et merci d'avoir répondu si vite, mais désolé SoumZoum ton code ne fonctionne pas

Voici mon fichier.

Effectivement, oyobrans a touché juste : ta variable "num" n'est pas définie. Quelle valeur doit renvoyer "num" ?

En plus, la feuille "Combes" n'existe pas, c'est "LTN COMBES".