XL 2019 Complément dans ma VBA : Problème

[SamLion91]

Bonjour à tous

Grâce à l'aide précieuse de @sylvanu j'ai une superbe macro avec des userforms
J'ai modifié légèrement 2 userforms
Mais je rencontre quelques problème avec

Sur l'userform2:
* J'aimerai que les cases "Client", "Film" et "Laize et LAP" se remplissent automatiquement grâce notamment à la cellule "CP" qui renvoi au tableur de l'onglet "Dossier"
(dans mon tableau Stock_Sleeves j'y ai mis une formule pour le faire (pour ceux qui ont du mal à me comprendre) mais j'aimerai que cela se face automatiquement à l'affichage de l'userform2 une fois que le CP est noté)
* J'aimerai aussi que la date et l'heure du jour de la saisie apparaissent dans la colonne "L"

Sur l'userform3:
* Mon bouton " A bientôt" ne fonctionne pas
* J'aimerai que mon dossier s'enregistre automatiquement et se ferme à la fin

Qui pourrait m'aider?

Cordialement

 

[sylvanu]

Bonjour SamLion,
Vous avez testé votre PJ ?
Les objets Colonne et Sig n'existaient plus. Je les ai rebaptisés.
En PJ un essai.

Mon bouton " A bientôt" ne fonctionne pas

Private Sub CommandButton1_Click()
    Unload UserForm3
End Sub

J'aimerai que les cases "Client", "Film" et "Laize et LAP" se remplissent automatiquement

Private Sub CP_Change()
    ValCP = Val(userform2.CP)
    With Sheets("dossier")
        If Application.CountIf(.[B:B], ValCP) > 0 Then
            Lcp = Application.Match(ValCP, .[B:B], 0)
            userform2.Client = .Cells(Lcp, "C")
            userform2.Film = .Cells(Lcp, "F")
            userform2.LaizeLap = .Cells(Lcp, "E")
        End If
    End With
End Sub

J'aimerai aussi que la date et l'heure du jour de la saisie apparaissent dans la colonne "L"

.Cells(L, "L") = Date

 

[SamLion91]

Merci à @sylvanu tout fonctionne parfaitement en plus grâce à toi je découvre de plus en plus le codage excel

mon seul souci c'est que lorsque on rajout du stock dans le tableur, il manque le quadrillage du tableur :-(

 

[sylvanu]

mon seul souci c'est que lorsque on rajout du stock dans le tableur, il manque le quadrillage du tableur

Simple esthétique.
Voir PJ.

 

[SamLion91]

Merci @sylvanu
J'ai encore un petit souci que je n'avais pas vu
Quand je créer un ligne à l'aide de Userform2, la date apparait , ça c'est cool
Mais mon souci c'est que ça va mettre la date du jour tous les jours.
Moi j'aimerais que cette date reste fixe à la date de création de la ligne.

Quelle macro dois-je modifier pour que la date reste fixe?

Cordialement

 

[sylvanu]

Bonjour,
Sur les lignes collées seule la date du jour est inscrite et "en dur", elle ne sera pas modifiée.
Par contre en L15 vous avez =+AUJOURDHUI(), donc elle évoluera chaque jour. Mais cela n'a rien à voir avec la macro, c'est dans votre fichier que cette cellule est calculée.

 

[SamLion91]

merci @sylvanu
Je viens de voir mon erreur
cette VBA est parfaite
Merci

Je vais créer une autre discussion pour une autre VBA

Merci pour tout