VBA comparaison de deux range de cellule

porcinet82

XLDnaute Barbatruc

• 4 Décembre 2008

• #2

Re : VBA comparaison de deux range de cellule

Salut,

Je ne suis pas certains de ce que tu veux, est-ce que tu pourrais mettre un exemple en pièce jointe avec le résultat que tu souhaites obtenir avec ta fonction.

@+

 

Vote positif 0 Vote négatif

K

kytoo

Guest

• 4 Décembre 2008

• #3

Re : VBA comparaison de deux range de cellule

re kikoo

merci pour ta réponse.
ci joint le fichier avec ce que je souhiates faire.

le fichier ne contient pas la macro 🙂

Kytoo

 

Pièces jointes

• test macro.xls

  27 KB · Affichages: 170
• test macro.xls

  27 KB · Affichages: 169
• test macro.xls

  27 KB · Affichages: 204

Vote positif 0 Vote négatif

porcinet82

XLDnaute Barbatruc

• 4 Décembre 2008

• #4

Re : VBA comparaison de deux range de cellule

re,

Essais avec le code suivant :

Code:

Function Compter(Plage As Range, Statut As String, Mois As Integer)
Dim Nbre As Integer
Nbre = 0
For Each c In Plage
    If Month(c.Value) = Mois And c.Offset(0, -2).Value = Statut Then Nbre = Nbre + 1
Next c
Compter = Nbre
End Function

Pour tester, tu peux mettre en H7 : =Compter(E7:E11;C7;1)

@+

 

Vote positif 0 Vote négatif

K

kytoo

Guest

• 4 Décembre 2008

• #5

Re : VBA comparaison de deux range de cellule

re... 🙂

merci beaucoup.. ca marche tres tres bien...
j'avoue ne pas tout comprendre du code.. mais merci beaucoup 🙂

@+++

 

Vote positif 0 Vote négatif

porcinet82

XLDnaute Barbatruc

• 4 Décembre 2008

• #6

Re : VBA comparaison de deux range de cellule

re,

Il n'y a rien de compliquer !!!

En gros, je parcours la plage de cellule avec la boucle For each, en vérifiant a chaque passage dans la boucle que le mois de l'année de la cellule en cours est égal à celui passé en paramètre dans la fonction et que le contenu de la cellule de la meme ligne, 2 colonne avant (=offset(ligne, colonne)) est égal au paramètre Statut de la fonction...

Bon courage,

@+

 

Vote positif 0 Vote négatif

K

kytoo

Guest

• 4 Décembre 2008

• #7

Re : VBA comparaison de deux range de cellule

Merci 🙂

c'est l'offset que j'avais du mal a saisir... maintenant tout est clair 🙂

Kytoo

 

Vote positif 0 Vote négatif

K

kytoo

Guest

• 9 Décembre 2008

• #8

Re : VBA comparaison de deux range de cellule

Bonjour,

j'ai une petite question par rapport au VBA ci-dessus.
Il marche tres bien... par contre dès que j'ouvre le fichier sur un autre PC et si j'insère une ligne dans le range de référence, j'ai un debug qui s'ouvre.

Quelqu'un a t-il une idée d'un quelconque problème de ce type?
Les version excel sont les même sur tous les PC. Excel 2003.

@++ Kytoo

 

Vote positif 0 Vote négatif

porcinet82

XLDnaute Barbatruc

• 9 Décembre 2008

• #9

Re : VBA comparaison de deux range de cellule

Salut,

Tu peux etre plus précis, peut etre en mettant un exemple du fichier avec l'endroit ou tu insères une ligne, que l'on puisse cibler exactement le problème.

@+

 

Vote positif 0 Vote négatif

K

kytoo

Guest

• 9 Décembre 2008

• #10

Re : VBA comparaison de deux range de cellule

Kikoo,

voici le fichier et screenshop de mon problème 🙂
Sur mon pc a moi .. pas de souscis... sur des PC d'autres personne j'ai l'erreur en screenshot

Bye

 

Pièces jointes

• vba-bug.jpg

  43.2 KB · Affichages: 212
• test vba-macro.zip

  20.3 KB · Affichages: 75

Vote positif 0 Vote négatif

porcinet82

XLDnaute Barbatruc

• 9 Décembre 2008

• #11

Re : VBA comparaison de deux range de cellule

re,

Rajoute la ligne suivante dans les déclarations Dim c As Range
Ce qui montre qu'il faut toujours déclarer les variables dans son programme !!! 😉

@+

 

Vote positif 0 Vote négatif

K

kytoo

Guest

• 9 Décembre 2008

• #12

Re : VBA comparaison de deux range de cellule

Re kikoo..

héhéhé comme quoi je suis un newbie.. merci ca a resolu mon problème 🙂


Bye

 

Vote positif 0 Vote négatif