PhunkyBob

Bonjour,

Voici une astuce assez méconnue de Qlik :

Créez un répertoire qui a le même nom que votre application, suivi de "-prj".
Par exemple, si votre application s'appelle "Mon_application.qvw", créez au même niveau un répertoire "Mon_application-prj".
Quand vous enregistrerez votre application (Ctrl+S), tout votre projet sera enregistré dans ce répertoire objet par objet.
Vous trouverez ainsi votre fichier de script ...

Il est très simple de lire des données d'un fichier Excel avec QlikView...
... à partir du moment où on connait le nom de l'onglet dans lequel on veut lire les données.

Dans certains cas, il peut arriver qu'on ne connaisse pas à l'avance le nombre ni le nom des onglets présents dans un fichier.


Voici une méthode qui permet de récupérer le nom des différents onglets d'un fichier Excel et de charger les données :

Code :

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

ODBC CONNECT TO [Excel Files;DBQ=ExcelFile.xlsx];

...

Vous pouvez boucler sur tous les sous-répertoire d'un répertoire pour connaitre leur contenu.

Code :

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

1
2
3
4
5
6
7
8
// Liste de tous les fichiers QV sur le disque.
sub DoDir (Root)
    for each Ext in 'qvw', 'qva', 'qvo', 'qvs'
        for each File in filelist (Root & '\*.' & Ext)
            Load '$(File)' as Name, FileSize( '$(File)' ) as Size, FileTime( '$(File)' ) as FileTime
            autogenerate 1;
        next File
    next Ext

...

Envoyé par PhunkyBob

Bonjour,

Personnellement, je trouve les rapports dans QlikView particulièrement pas pratique.

Je préfère largement passer par une macro qui fera l'export dont j'ai besoin.

Par exemple :

Code vb :

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

1
2
3
4
5
6
7
8
sub export_all
 
	for i = 0 to ActiveDocument.NoOfSheets - 1
		set sh = ActiveDocument.GetSheet(i)
		shID = sh.GetProperties.SheetId
		shName = str_clean(sh.GetProperties.Name)
 
		'msgbox(shId & "

...

Pour exporter facilement des tableaux dans un fichier Excel, j'ai créé ces fonctions, que j'ai mises dans le module de macros :

Code vb :

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

1
2
3
4
5
6
7
8
9
10
11
12
' Variables utilisées par Excel.
Dim WorkBook
Dim ExcelApp
Dim RefSh
Dim CloseExcelWhenFinished
 
const xlExcel8 = 56				' Format d'enregistrement Excel.
const xlExcel12 = 50			' Format d'enregistrement Excel.
const xlOpenXMLWorkbook = 51	' Format d'enregistrement Excel.
 
 
'***************************************************************

...