Microsoft 365 Power Query - importation données masquées

Alexx2019

XLDnaute Nouveau
Bonjour,

J'utilise Power Query pour importer des données de plusieurs tableurs dans une base de données générale. Le souci, c'est que dans les excel source, il y a des données masquées que je n'aimerais pas afficher dans la base de données Power Query. Pour l'instant toutes les lignes masquées apparaissent. Je ne trouve pas l'option pour ne pas importer ces données. Savez-vous m'aider?

Merci d'avance.
 

Hasco

XLDnaute Barbatruc
Repose en paix
Bonjour,

A ma connaissance il n'y en a pas. Une façon de contourner le problème est de rajouter une colonne dans chaque source avec une formule comme ci-dessous qui indiquera si la ligne est visible (1) ou non (0): =AGREGAT(3;5;[@lacolonne])

Ensuite dans les requêtes vous pouvez filtrer les lignes 0 sur cette colonne.

Bonne journée
 

Pièces jointes

  • Classeur1.xlsm
    20.7 KB · Affichages: 5

job75

XLDnaute Barbatruc
Re,

Bien entendu on peut utiliser le VBA, voyez les fichiers joints et cette macro dans le fichier .xlsm :
VB:
Sub Importer()
Dim chemin$, fichier$, F As Worksheet, lig&
chemin = ThisWorkbook.Path & "\"
fichier = Dir(chemin & "*.xlsx")
Set F = ActiveSheet
Application.ScreenUpdating = False
Application.DisplayAlerts = False 'si le fichier est déjà ouvert
Rows("2:" & Rows.Count).Delete 'RAZ
While fichier <> ""
    With Workbooks.Open(chemin & fichier).Sheets(1)
        lig = F.Cells.Find("*", , xlValues, , xlByRows, xlPrevious).Row + 1
        If .ListObjects.Count Then .ListObjects(1).DataBodyRange.Copy F.Cells(lig, 1)
        .Parent.Close
    End With
    fichier = Dir
Wend
With F.UsedRange
    .Interior.ColorIndex = xlNone
    .Borders.LineStyle = xlNone
End With
End Sub
Edit : j'ai testé avec 38 fichiers sources (copies des précédents), la macro s'exécute en 8 secondes chez moi.

Bonne nuit.
 

Pièces jointes

  • Synthèse(1).xlsm
    19 KB · Affichages: 6
  • Fichier1.xlsx
    9.8 KB · Affichages: 4
  • Fichier2.xlsx
    10 KB · Affichages: 4
  • Fichier3.xlsx
    10.2 KB · Affichages: 5
Dernière édition:

Discussions similaires

Réponses
7
Affichages
203
Réponses
13
Affichages
474

Statistiques des forums

Discussions
311 725
Messages
2 081 949
Membres
101 851
dernier inscrit
vaiata