Ajouter des lignes via un formulaire

Bonjour,

J'aimerai ajouter des lignes sur une nouvelle feuille et avoir un enregistrement automatique à chaque fois. j'ai commencer une macro mais je n'arrive pas à ajouter les lignes à la suite. en gros A chaque fois que j'appuis sur le bouton il faut ajouter une ligne dans le référencement et revenir à la feuille bouton automatiquement et supprimer les infos sauf la case chargeur. je mets mon fichier en lien merci d'avance.

Bonjour Xavier77600,

Voici un code VBA pour faire ce que tu demandes :

Sub AjoutLigne()

Application.ScreenUpdating = True

Sheets("Macro").Select

    If Range("B4").Value = "" Or Range("C4").Value = "" Or Range("D4").Value = "" Or Range("D4").Value = "" Then

        MsgBox "Vous n'avez pas ou partiellement saisis les champs nécessaires"

    Else

        Sheets("Macro").Select
        Range("B4:E4").Select
        Selection.Copy
        Sheets("Référencement chargeurs").Select
        derniereLigne = Range("A" & Rows.Count).End(xlUp).Row + 1
        Range("A" & derniereLigne).Select
        Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
            :=False, Transpose:=False
        Sheets("Macro").Select
        Range("B4:E4").Select
        Selection.ClearContents

    End If

Application.ScreenUpdating = True

End Sub

Je te joins le fichier.

j'ai pris le temps d'ajouter un msgbox afin d'alerter lorsque la ligne est pas ou pas entièrement rempli :)

bonne continuation

UPDATE :

J'avais mal lu ton post, mon code effaçais la case avec écrit CHARGEUR :

Range("C4:E4").Select 
Selection.ClearContents

Voila, j'ai corrigé cette partie. Je te joins une V2

cdlt,

Merci beaucoup ça fonctionne nickel. merci.

je t'en prie, n'hésite pas à dire que le sujet est clos

En me relisant, j'ai encore fait une boulette, dans le code il faudrai que tu modifies

Sub AjoutLigne()

Application.ScreenUpdating = True

par

Sub AjoutLigne()

Application.ScreenUpdating = False

Sinon, tu vois la mise à jour pendant la macro, c'est pas beau.

Ok pas de soucis j’ai bien modifié la macro et ça fonctionne du coup sujet clos pour moi merci encore