Macro : Si filtre retourn feuille vide, excel copie tout
Shaar
-
PHILOU10120 Messages postés 6511 Date d'inscription Statut Contributeur Dernière intervention -
PHILOU10120 Messages postés 6511 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Je travaille actuellement sur un ficher excel et plus précisement avec des macro.
Je souhaite obtenir des données à partir d'un tableau. Pour cela, je réalise un tri sur les colonnes souhaitées et copie/colle les éléments dont j'ai besoin.
Tout marche mais si j'ai une selection réalisé en macro qui retourne un tableau vide, il me retourne toutes les valeurs au lieu de ne me rien retourner.
Exemple :
Ma macro dit de trier selon
Colonne A = vide
Colonne B = Non vide
Colonne C = Vide
Mais ma colonne C ne devrait pas pouvoir obtenir la condition vide puisque déjà la combinaison de A et B rend une page blanche. Si j'essaye de faire cela à la main, le filtre n'est pas possible.
J'ai rechercher à regarder si les cellules sont vides mais en vain, j'obtiens toujours la même chose.
Voici le code que j'utilise
Merci de votre aide,
Je travaille actuellement sur un ficher excel et plus précisement avec des macro.
Je souhaite obtenir des données à partir d'un tableau. Pour cela, je réalise un tri sur les colonnes souhaitées et copie/colle les éléments dont j'ai besoin.
Tout marche mais si j'ai une selection réalisé en macro qui retourne un tableau vide, il me retourne toutes les valeurs au lieu de ne me rien retourner.
Exemple :
Ma macro dit de trier selon
Colonne A = vide
Colonne B = Non vide
Colonne C = Vide
Mais ma colonne C ne devrait pas pouvoir obtenir la condition vide puisque déjà la combinaison de A et B rend une page blanche. Si j'essaye de faire cela à la main, le filtre n'est pas possible.
J'ai rechercher à regarder si les cellules sont vides mais en vain, j'obtiens toujours la même chose.
Voici le code que j'utilise
ActiveSheet.Range(Cells(1, 1), Cells(DernColon, DernLigne)).AutoFilter Field:=Nom, Criteria1:="<>"
Merci de votre aide,
A voir également:
- Macro : Si filtre retourn feuille vide, excel copie tout
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Jitbit macro recorder - Télécharger - Confidentialité
- Macro maker - Télécharger - Divers Utilitaires
- Macro word - Guide
1 réponse
Bonjour
Une idée si vous mettiez une cellules comptant le nombre de valeur trouvé
=si(nbval(a1:a1000)>0;0;1) et que vous nommiez cette cellule "contrôle"
Dans la macro insérer ce code
Set myRange = Worksheets("NOM DE LA FEUILLE").Range("contrôle")
If myRange = 1 Then
If MsgBox("Attention il n'y a pas ligne correspondant à vos critères de trie ", vbYes, "") = vbYes Then
End If
Exit Sub
End If
Une idée si vous mettiez une cellules comptant le nombre de valeur trouvé
=si(nbval(a1:a1000)>0;0;1) et que vous nommiez cette cellule "contrôle"
Dans la macro insérer ce code
Set myRange = Worksheets("NOM DE LA FEUILLE").Range("contrôle")
If myRange = 1 Then
If MsgBox("Attention il n'y a pas ligne correspondant à vos critères de trie ", vbYes, "") = vbYes Then
End If
Exit Sub
End If
