VBA - Sélection cellules visibles

Version imprimable

1 pièce(s) jointe(s)

Bonsoir

J'ai un souci que je ne parviens pas à comprendre :

J'ai sur un classeur une feuille "base de données" et une feuille "Fiche métier". Je veux afficher les données filtrées de la BDD sur la feuille Métier. Ma macro lancée manuellement (F8) fonctionne correctement ; Quand je la lance depuis le bouton "Afficher la fiche complète" elle fait n'importe quoi pour la 3ème colonne (Facteur d'expo). Mais que ce passe-t-il ? : Il n'y a pourtant aucune différence avec les deux recherches précédentes.
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 ... 'Famille de risque BDD.Range("H9:H" & Range("B1000").End(xlUp).Row).SpecialCells(xlVisible).Copy FME.Range("G12").PasteSpecial Paste:=xlPasteValues 'Activité BDD.Range("F9:F" & Range("B1000").End(xlUp).Row).SpecialCells(xlVisible).Copy FME.Range("H12").PasteSpecial Paste:=xlPasteValues 'Facteur d'exposition BDD.Range("I9:I" & Range("B1000").End(xlUp).Row).SpecialCells(xlVisible).Copy FME.Range("I12").PasteSpecial Paste:=xlPasteValues ...
Pour info, si je déplace dans la macro le code "Activité" en troisième position, c'est lui qui ne fonctionne pas correctement.

Merci de votre aide.
Cordialement

06/03/2017, 21h27
tony76

2 pièce(s) jointe(s)

salut Gllou06

j'ai testé ton code il fonctionne correctement même avec le code "Activité" en troisième position

Pièce jointe 251516

Pièce jointe 251519

si c'est bien le but rechercher
06/03/2017, 21h53
unparia

Bonjour
1) je n'ouvre jamais un classeur tiers et n'ai donc pas ouvert le tien
2) je ne vois rien qui, dans le code montré et au vu de tes seules explications, qui n'aboutirait pas comme tu l'entends

Je ne peux qu'en conclure que des données dans la colonne F (à partir de la ligne 9) ne sont pas elles-mêmes des constantes pures/directes (sans savoir à quoi elles correspondent). Et cela, tu es seul à pouvoir le vérifier.