Tableau excel de synthèses des données contenues dans une liste de fichiers exce
montparmac
Messages postés
1
Date d'inscription
lundi 4 août 2008
Statut
Membre
Dernière intervention
4 août 2008
-
4 août 2008 à 11:28
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 - 4 août 2008 à 13:48
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 - 4 août 2008 à 13:48
A voir également:
- Tableau excel de synthèses des données contenues dans une liste de fichiers exce
- Récupérer données json (javascript) - Conseils pratiques -Javascript
- Tableau php html - Conseils pratiques -PHP
- Tableau de turbo 2 ✓ - Forum C
- Tableau excel suivi maintenance - Forum VB.NET
- Suivi des interventions de maintenance excel - Forum VB.NET
1 réponse
mortalino
Messages postés
6786
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
18
4 août 2008 à 13:48
4 août 2008 à 13:48
Salut,
pour ouvrir un fichier, tu as la méthode Open de la classe objet WorkBooks :
WorkBooks.Open("c:\chemin\nom fichier.xls")
Ensuite, pour lire les données, c'est avec l'ojet Cells qu'il faut travailler :
Cells(N° Ligne, N° Colonne).Value
Une fois ouvert (le fichier), en employant la syntaxe précédante, tu peux lire les données, pour l'importer dans le classeur qui comporte le code, il faut placer ThisWorkBook devant.
Exemple pour récupérer ce qu'il y a dans B1 dans le classeur ouvert par code, et le placer dans C5 du classeur avec le code :
ThisWorkBook.Cells(5, 3).Value = Cells(1, 2).Value
Tu peux bien entendu faire des boucles avec For i = 1 to x, sachant que x est certainement la dernière ligne utilisée.
Pour la calculer, c'est
Range("A65536").End(xlUp).Row
@++
le mystérieux chevalier,"Provençal, le gaulois"
Forum Office & VBA
pour ouvrir un fichier, tu as la méthode Open de la classe objet WorkBooks :
WorkBooks.Open("c:\chemin\nom fichier.xls")
Ensuite, pour lire les données, c'est avec l'ojet Cells qu'il faut travailler :
Cells(N° Ligne, N° Colonne).Value
Une fois ouvert (le fichier), en employant la syntaxe précédante, tu peux lire les données, pour l'importer dans le classeur qui comporte le code, il faut placer ThisWorkBook devant.
Exemple pour récupérer ce qu'il y a dans B1 dans le classeur ouvert par code, et le placer dans C5 du classeur avec le code :
ThisWorkBook.Cells(5, 3).Value = Cells(1, 2).Value
Tu peux bien entendu faire des boucles avec For i = 1 to x, sachant que x est certainement la dernière ligne utilisée.
Pour la calculer, c'est
Range("A65536").End(xlUp).Row
@++
le mystérieux chevalier,"Provençal, le gaulois"
Forum Office & VBA