Discussion :

[puledro]

Bonjour à tous,
J'ai développé un code pour comparer deux tableaux excel ligne à ligne.
Je mémorise chacun de ces tableaux dans deux variables.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Dim i&, a&, fin1&, fin2&, fin3 As Integer, Bdd1 As Variant, Bdd2 As Variant
Bdd1 = Empty
Bdd2 = Empty
fin1 = Feuil1.Range("A" & Rows.Count).End(xlUp).Row + 1 'Stocke le nombre de ligne de la Bdd1 dans la variable
fin2 = Feuil2.Range("A" & Rows.Count).End(xlUp).Row + 1 'Stocke le nombre de ligne de la Bdd2 dans la variable
MsgBox ("La première sélection compte " & fin1 - 1 & " enregistrements.")
MsgBox ("La deuxième sélection compte " & fin2 - 1 & " enregistrements.")
Bdd1 = Feuil1.Range("A1:O" & fin1) 'Stocke le contenu de la Bdd1 dans la variable
Bdd2 = Feuil2.Range("A1:O" & fin2) 'Stocke le contenu de la Bdd2 dans la variable

Le stockage des tableaux se faisait très correctement jusqu'à que j'obtienne l'erreur ERREUR D'EXECUTION 6 : DEPASSEMENT DE CAPACITE.
Je suis arrivé à faire disparaître cette erreur en limitant le nombre de colonnes stockées à 8.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Bdd1 = Feuil1.Range("A1:H" & fin1) 'Stocke le contenu de la Bdd1 dans la variable
Bdd2 = Feuil2.Range("A1:H" & fin2) 'Stocke le contenu de la Bdd2 dans la variable

Et là, je bute depuis des heures pour essayer de mémoriser les quinze colonnes de mes tableaux.
A titre d'information, les tableaux contiennent environ 2000 lignes.
Merci d'avance pour votre aide.

[Marc-L]

Bonjour,

face à un tel message, rien à faire à part redémarrer l'ordinateur puis après l'ouverture de Windows
fermer toutes les utilitaires résidents futiles puis ouvrir seul Excel.
Si toujours problème, essayer sur un ordinateur plus puissant (au moins disposant de plus de RAM)
voire sur une version d'Excel plus récente en 64 bits.
Quoiqu'un test succinct de mon côté sur une version 2003 ne déclenche pas d'erreur …

Tout dépendant de quelle ligne déclenche l'erreur déjà, la première ou la deuxième ?
Faut-il forcément stocker les deux plages en même temps ?
En lecture, l'accès direct aux cellules est rapide, pas besoin de stocker …

Sans connaître le but de la procédure, un seul conseil :  Penser Excel Avant VBA  …

___________________________________________________________________________________________________________

Je suis Paris, Egypte, Nigeria, New-York, Mogadicio, Barcelone, London, Manchester, Stockholm, Istanbul, Berlin, Nice, Bruxelles, Charlie, …

[puledro]

Bonjour Marc-L,
J'ai eu un coup de chaud en lisant ton message ! Je n'avais pas pensé à redémarrer le PC !
Je l'ai fait mais cela n'a rien changé...
En fait, j'ai deux exports de mon CRM à date différentes que j'essaie de comparer ligne à ligne. Cela me permet de savoir ce que devient une opportunité d'une période à l'autre. L'opportunité se caractérise par une quinzaine de champs (Identifiant, client, description, devise, montant, coût, étape, date de commande, etc....).
Pour répondre à tes questions :
Tout dépendant de quelle ligne déclenche l'erreur déjà, la première ou la deuxième ? La première.
Faut-il forcément stocker les deux plages en même temps ? Oui. Car je compare ensuite ligne à ligne en utilisant l'identifiant de l'opportunité à l'aide de boucles.

[Marc-L]

Bon ben soit tester sur un autre ordinateur, soit se passer de variables tableau via une lecture classique de cellules
soit utiliser une fonctionnalité interne d'Excel comme un TCD ou un filtre avancé (même en VBA) via un critère calculé …

[puledro]

Merci pour ton aide.