Discussion :

[Sami_Ba]

Bonjour à tous ,

J'utilise cette ligne de code pour déterminer ma dernière cellule utilisée :

Code :

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

Set SD_plage = SD.Range(SD.Range("A1"), SD.Range("A1").SpecialCells(xlCellTypeLastCell))

J'utilise cette dernière cellule pour déterminer la taille de mon tableau virtuel pour exécuter toute sorte de calcul par la suite.

Le problème est le suivant :

Lorsque aucun filtre n'est activé sur la feuille, la ligne de code me trouve bien la dernière cellule utilisée.

Mais lorsqu'un filtre est activé sur la feuille (par exemple un filtre sur les dates de juin)
La dernière cellule trouvée se trouve sur la dernière ligne filtrée.

Exemple :

Sans filtre : dernière celulle => colonne = CA, ligne = 1556

Avec un filtre : dernière cellule => colonne = CA , ligne = dernière ligne qui correspond au filtre.

Je tiens à préciser que ce problème n'est arrivé que récemment, la version précédente de mon fichier excel fonctionnait parfaitement même avec les filtres activés.
Ce qui a changé entre ces deux versions est le nombre total de ligne utilisée mais je ne pense pas que le problème vienne de là.


Pour l'instant je désactive et réactive les filtres pour que l'outil continue d'être utilisable mais j'aimerai bien comprendre d'où vient le problème.

Merci d'avance pour votre aide

[Menhir]

Essaye ça :

Code :

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

Set SD_plage = SD.Range("A1", SD.Cells(Rows.Count, 1).End(xlUp))

Ou ça :

Code :

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

Set SD_plage = Application.Intersect(SD.Rows(1), SD.UsedRange)

[Sami_Ba]

Bonjour Menhir,

Désolé pour la réponse tardive

Malheureusement les deux exemples ne fonctionne pas.

J'ai une erreur "indice n'appartient pas à la sélection" dans les deux cas.

Ce qui me perturbe vraiment c'est que ce problème apparaît "comme par magie"...

[Menhir]

J'ai une erreur "indice n'appartient pas à la sélection" dans les deux cas.

Quand la macro plante, regarde le contenu de la variable SD dans la liste des variables locales.

[Sami_Ba]

Quand la macro plante, regarde le contenu de la variable SD dans la liste des variables locales.

SD est le nom de ma feuille, vu que je l'utilise souvent cette variable est défini en public et je fais un set à chaque début de programme.
Lorsque la macro plante, sa valeur n'est pas affichée dans les variables locales.

Sinon j'ai trouvé une solution qui me convient donc je la partage :

je récupère la dernière ligne et la dernière colonne utilisée grâce à ces lignes.

Code :

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

1
2
Application.CountA(SD.Columns(X))
Application.CountA(SD.Rows(Y))

Il faut juste faire gaffe que sur la colonne X et la ligne Y il n'y a pas de cellule vide au milieu sinon ça ne marche pas.

Puis je récupère la plage total :

Code :

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

Set SD_plage = SD.Range("A1", SD.Cells(nombre_max_lig_suivi + 1, nombre_max_col_suivi + 1))

Merci pour ton aide Menhir !