Macro événementielle.

J

jp14

XLDnaute Barbatruc

• 12 Septembre 2008

• #2

Re : Macro événementielle.

Bonsoir


Ci joint le fichier avec une macro évènementielle qui recherche la colonne correspondante au mois et année.
Le numéro de la colonne est dans la variable i. il suffit d'écrire le transfert des données pour mettre à jour le stock.

A tester et à modifier

JP

 

Pièces jointes

• Entretien.zip

  47 KB · Affichages: 35
• Entretien.zip

  47 KB · Affichages: 33
• Entretien.zip

  47 KB · Affichages: 31

Vote positif 0 Vote négatif

cibleo

XLDnaute Impliqué

• 12 Septembre 2008

• #3

Re : Macro événementielle.

Bonsoir jp14,

Tout d'abord, je voulais te dire que j'apprécie beaucoup ton travail (notamment sur les Listview) et il m'arrive souvent de faire des recherches par rapport à ton pseudo.

Je trouve que tes interventions sont toujours très sobres mais diablement efficaces.

Pour en revenir à ma question, je teste tout ça ce week-end et te donne réponse dès que possible.

Vraiment ravi de t'avoir croisé,

Au plaisir jp14

Cibleo

 

Vote positif 0 Vote négatif

cibleo

XLDnaute Impliqué

• 13 Septembre 2008

• #4

Re : Macro événementielle.

Bonjour le forum,
Bonjour jp14,

Peux-tu me commenter cette portion de code, je n'obtiens pas le résultat escompté, j'ai dû mal la paramètrer 🙁

Code:

For i = 3 To .Range("IV" & 4).End(xlToLeft).Column
        data1 = Replace(Trim(LCase(Cells(4, i))), " ", "")
        If Trim(LCase(mois & Target.Offset(1, 0).Value)) = data1 Then
            trouve = True
            Exit For
        End If
    Next i

Encore merci Cibleo

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 13 Septembre 2008

• #5

Re : Macro événementielle.

bonjour cibleo

Je confirme tes dires concernant Jp14

Salut jp14 🙂

A tester
Une version un peu differente

 

Pièces jointes

• Entretien.zip

  46.1 KB · Affichages: 24
• Entretien.zip

  46.1 KB · Affichages: 24
• Entretien.zip

  46.1 KB · Affichages: 25

Vote positif 0 Vote négatif

cibleo

XLDnaute Impliqué

• 13 Septembre 2008

• #6

Re : Macro événementielle.

Bonjour pierrejean.

Merci de venir à ma rescousse.

Mais j'ai l'impression que tu m'as envoyé le même fichier que jp14, je ne vois pas de différences. 😎

Amicalement cibleo

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 13 Septembre 2008

• #7

Re : Macro événementielle.

Re

Exact

me suis planté
Voila le fichier que je voulais poster

 

Pièces jointes

• Entretien-v1.zip

  46.9 KB · Affichages: 27

Vote positif 0 Vote négatif

cibleo

XLDnaute Impliqué

• 13 Septembre 2008

• #8

Re : Macro événementielle.

Re bonsoir le forum,
Re pierrejean,

Je te renvoie mon fichier accompagné de mes explication ci-dessous.

En résumé, avec ton fichier çà marche, avec le mien pas 🙁.

Explications : En D1, feuille de calcul "2007", j'ai 9 soit le mois de septembre.
En C43, j'ai 100 litres (Stock fin septembre). En D43, j'ai 95,70 litres (Stock fin octobre).

Maintenant, je saisis 10 (octobre) en D1, j'aimerais alors retrouver mes 95,70litres (valeur de fin octobre) en C43 puisque ma plage à glisser d'une colonne à gauche.

Mais j'obtiens 67,10 litres, chercher l'erreur 😡

Merci à tous

Cibleo

 

Pièces jointes

• révisions10.zip

  47.7 KB · Affichages: 24
• révisions10.zip

  47.7 KB · Affichages: 31
• révisions10.zip

  47.7 KB · Affichages: 26

Dernière édition: 13 Septembre 2008

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 14 Septembre 2008

• #9

Re : Macro événementielle.

Re

L'erreur etait due au fait que tu n'avais pas reporté la modification faite dans la macro Selection_change

Il m'a fallu tout de même introduire encore une modif pour que j'ai l'impression que cela fonctionne

Teste bien cette version (les tests c'est pas trop mon truc)

 

Pièces jointes

• révisions10.zip

  44.1 KB · Affichages: 29
• révisions10.zip

  44.1 KB · Affichages: 29
• révisions10.zip

  44.1 KB · Affichages: 29

Dernière édition: 14 Septembre 2008

Vote positif 0 Vote négatif