Macro Excel : Filtre et sélection post-filtre
Résolu
Théo
-
uptoyu Messages postés 4 Statut Membre -
uptoyu Messages postés 4 Statut Membre -
Bonjour à toutes et à tous,
Après des heures de recherche non fructueuse sur le web , je viens vous exposer mon problème.
Contexte : j'ai des capteurs de température à différents endroits qui me donnent chacun la température et l'heure à laquelle la mesure a été prise.
toutes ces données sont envoyées dans un fichier que je récupère par la suite dans excel.
J'ai donc 4 colonnes ( emplacement du capteur, état du capteur, heure et valeur)
j'ai fait une macro pour filtrer par exemple uniquement les données du capteur N°7 et avoir toutes ces valeurs.
Mon problème : comment sélectionner toutes les valeurs (Ex: du capteur n°7) après le filtrage pour les coller dans une autre page étant donné que je ne sais pas combien il va y avoir de ligne de données.
En fait à chaque fois que la température change, la valeur est enregistré... c'est pour cette raison que je ne sais pas combien il va y avoir de mesure...
Je vous remercie par avance des pistes ou solution que vous m'apporterez.
à bientôt
Après des heures de recherche non fructueuse sur le web , je viens vous exposer mon problème.
Contexte : j'ai des capteurs de température à différents endroits qui me donnent chacun la température et l'heure à laquelle la mesure a été prise.
toutes ces données sont envoyées dans un fichier que je récupère par la suite dans excel.
J'ai donc 4 colonnes ( emplacement du capteur, état du capteur, heure et valeur)
j'ai fait une macro pour filtrer par exemple uniquement les données du capteur N°7 et avoir toutes ces valeurs.
Mon problème : comment sélectionner toutes les valeurs (Ex: du capteur n°7) après le filtrage pour les coller dans une autre page étant donné que je ne sais pas combien il va y avoir de ligne de données.
En fait à chaque fois que la température change, la valeur est enregistré... c'est pour cette raison que je ne sais pas combien il va y avoir de mesure...
Je vous remercie par avance des pistes ou solution que vous m'apporterez.
à bientôt
Configuration: Windows Vista Firefox 3.0.10
1 réponse
-
J'avais le même problème et je l'ai résolu de la manière suivante:
Range("A1:D1").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Le Range étant la première ligne...
Sinon pour savoir combien des lignes sont sélectionnées:
MsgBox ActiveSheet.AutoFilter.Range.Columns(1).SpecialCells(xlCellTypeVisible).Cells.Count - 1
sans compter la ligne des titres
J'espère que cela pourra vous aider.
Bonne soirée :D
