Décalage de ma formule VBA après incrémentation de lignes

[MACx]

Bonjour à vous,

SVP j'ai un méga problème que je n'arrive pas à résoudre, et je vous avoue ne pas avoir su comment chercher sur le site si mon problème avait déjà été posé auparavant.
Voilà, donc ci-joint un fichier avec plusieurs feuilles, mais seule la feuille VALIDATION nous intéresse ici:

Il y a un code VBA sur la feuille Validation que voici :

Private Sub Worksheet_Change(ByVal Target As Range)

 If Target.Column = 11 Then
    If Target = "Non Envoyée" Or Target = "A Envoyer" Or Target = " -" Then
             Cells(Target.Row, "L").ClearContents
         Else
             Cells(Target.Row, "L") = Date
    End If
 End If
     
 If Target.Column = 9 Then
     If Target = "Validée" Then
            Cells(Target.Row, "J") = Date
        Else
            Cells(Target.Row, "J").ClearContents
    End If
 End If

 If Target.Column = 5 Then
     If Target = 0 Then
            Cells(Target.Row, "I") = "Facture à 0"
            Cells(Target.Row, "K") = " -"
         Else
            Cells(Target.Row, "I").ClearContents
     End If
 End If
End Sub

Selon le libellé de la colonne I sélectionné, il y aura des petits changements sur la colonne K (au niveau du libellé) et de couleur sur les colonnes A, B & I comme vous pourrez le constater.

Je suis amateur en VBA alors je ne sais pas si par rapport à ce que j'ai fait, il y'a plus simple ou plus intelligent mais en tous cas le résultat fonctionne comme je le désire... enfin presque !

Mon problème est que au fur et à mesure que des lignes s'incrémentent (en ligne 2 uniquement) dans la feuille Validation, les valeurs des colonnes I à L ne suivent plus (vers le bas).

Comment puis-je faire pour que ce décalage se fasse de manière "régulière".
Je ne comprends pas pourquoi l'incrémentation de ligne décale mon code et donc mes valeurs des cellules de I à L.

J'espère avoir été assez clair, et merci d'avance à ceux qui pourront m'aider !

 

[MACx]

Re : Décalage de ma formule VBA après incrémentation de lignes

Si si mon problème est toujours là. Dès que je clique sur Actualiser. TOUTES les cellules de ma colonne (L) 'Notification se remettent en "Non Envoyée" 🙁

 

[MACx]

Re : Décalage de ma formule VBA après incrémentation de lignes

Là où tu vois ecrit "Voie Postale" à l'origine, par défaut il y a cette formule: =SI([@Etat]="Validée";"A Envoyer";"Non Envoyée")

 

[MACx]

Re : Décalage de ma formule VBA après incrémentation de lignes

si tu utilises teamviewer jpeux te donner accès a mon vrai fichier...

 

[Pierrot93]

Re : Décalage de ma formule VBA après incrémentation de lignes

Re,

mêrme problème pour moi... pas les sources pour tester... mais essaie en mettant des points d'arrêts sur les différents événements pour voir ce que tu peux faire avec avec la variable "b"

 

[MACx]

Re : Décalage de ma formule VBA après incrémentation de lignes

Comment on fait ça? :/ (Sorry i'm a noob!)

 

[Pierrot93]

Re : Décalage de ma formule VBA après incrémentation de lignes

Re,

cursur sur les 1ères lines des procédures, touche de fonction F9, ensuite touche de fonction F8 pour tester en pas à pas...

 

[Pierrot93]

Re : Décalage de ma formule VBA après incrémentation de lignes

Re,

petite remarque, je pense que le résultat de ta requête externe ne devrait pas se placer sur les colonnes où se trouve tes formules.... préférable de les isoler, car comment empêcher que la requête s'exécute sur ces même colonnes... perso vois pas trop...

 

[MACx]

Re : Décalage de ma formule VBA après incrémentation de lignes

Merci pour ce petit tuto ! 🙂

alors, donc je fait F9 puis dès mon premier F8 j'obtiens une erreur :
"Erreur de compilation: Variable non définie" (je clique sur OK)

Private Sub Worksheet_Calculate() (est surligné jaune)
b = (est surligné bleu)

 

[MACx]

Re : Décalage de ma formule VBA après incrémentation de lignes

Teamviewer ? 🙂

 

[Pierrot93]

Re : Décalage de ma formule VBA après incrémentation de lignes

Re,

as tu vu le post #37 ?

Teamviewer ?

non... je n'ai pas...

 

[MACx]

Re : Décalage de ma formule VBA après incrémentation de lignes

Ah désolé, le psot #37 s'est affiché en retard.
Ma requête externe ne concerne que les colonnes A à G. Est-ce que cela a une importance/conséquence quand même ?

Dommage, Teamviewer est très pratique parfois 😉

 

[Pierrot93]

Re : Décalage de ma formule VBA après incrémentation de lignes

Re,

Ma requête externe ne concerne que les colonnes A à G. Est-ce que cela a une importance/conséquence quand même ?

la ca devrait être bon, tu devrais pouvoir gérer avec le code que je te proposais.....

 

[MACx]

Re : Décalage de ma formule VBA après incrémentation de lignes

Bah non justement 🙁

J'ai toujours "Non Envoyée" qui revient 🙁

 

[Pierrot93]

Re : Décalage de ma formule VBA après incrémentation de lignes

Bonjour,

Là où tu vois ecrit "Voie Postale" à l'origine, par défaut il y a cette formule: =SI([@Etat]="Validée";"A Envoyer";"Non Envoyée")

effectivement pas de formule sur ton fichier mais à la place une liste de validation.... en l'état perso peux pas grand chose pour toi...

bonne journée
@+

 

[MACx]

Re : Décalage de ma formule VBA après incrémentation de lignes

Voici avec les formules
Merci bcp ! 🙂