Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1380 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  VB Macro Importer des infos de tous mes docs excel dans un doc excel

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

VB Macro Importer des infos de tous mes docs excel dans un doc excel

n°2110484
TomLondon
Posté le 09-11-2011 à 12:41:18  profilanswer
 

Bonjour a tous.
Je suis actuellement en stage a Londres et j'ai besoin de creer une macro et je vous avoue que j'y connais pas grand chose...
Mon probleme est assez complique, du moins pour moi...
J'aimerais creer une macro sur un document excel qui me renvoi la liste des valeurs de la cellule A1 de tous les fichiers excels qui se trouvent dans un dossier D1. Et lorsque j'ajoute un nouveau fichier excel au dossier, l'information arrive directement dans ma liste.
Si vous pouvez m'aider se serait vraiment cool, car je galere trop!
Merci

mood
Publicité
Posté le 09-11-2011 à 12:41:18  profilanswer
 

n°2110490
kiki29
Posté le 09-11-2011 à 13:03:53  profilanswer
 

Salut, cela devrait t'aider http://forum.hardware.fr/hfr/Progr [...] 0232_1.htm , à adapter


Message édité par kiki29 le 09-11-2011 à 13:20:02

---------------
Myanmar 90/91 : http://gadaud.gerard.free.fr/publi [...] index.html
n°2110898
TomLondon
Posté le 11-11-2011 à 11:40:10  profilanswer
 

Dans ton code, je comprend pas ce qu'est 'ShImport' car losrque je lance la macro, elle me renvoi un message d'erreur comme quoi cette variable n'est pas definie?
Merci

n°2110905
kiki29
Posté le 11-11-2011 à 12:45:10  profilanswer
 

Salut, il s'agit du CodeName donné à la feuille recevant les données
voir http://www.developpez.net/forums/d [...] vba-bases/
pour comprendre l'intérêt de l'utilisation du CodeName au lieu du nom d'onglet
 
Sinon dans l'entête cela est précisé :
 
 Créer un classeur avec une feuille vierge que l'on nommera  
     Import ( Nom sans importance )    : propriété Name sous VBE  
     ShImport                          : propriété (Name) sous VBE


Message édité par kiki29 le 11-11-2011 à 13:06:48

---------------
Myanmar 90/91 : http://gadaud.gerard.free.fr/publi [...] index.html
n°2110912
TomLondon
Posté le 11-11-2011 à 13:06:11  profilanswer
 

Merci pour la rapidite de tes reponses.
Mais je ne comprend pas pourquoi la macro me demande de definir la variable s'il s'agit d'un CodeName...

n°2110913
kiki29
Posté le 11-11-2011 à 13:11:47  profilanswer
 

Salut,sous VBE dans la fenêtre propriétés de ce qui doit être chez toi Sheet1
remplacer dans (Name) Sheet1 par ShImport
voir 1er snapshot du post#2  http://www.developpez.net/forums/d [...] vba-bases/


Message édité par kiki29 le 11-11-2011 à 13:15:33

---------------
Myanmar 90/91 : http://gadaud.gerard.free.fr/publi [...] index.html
n°2110945
TomLondon
Posté le 11-11-2011 à 17:24:01  profilanswer
 

Voila ca fonctionne merci beaucoup. Pour adapter ton code a mon projet je souhaiterais ne pas afficher d'entete, ni le nom des fichiers, seulement les valeurs des cellules, mais ton code semble base sur le nom des fichiers?

n°2110954
kiki29
Posté le 11-11-2011 à 18:25:45  profilanswer
 

Re, pas forcément, dans ton cas utilise le macro recorder pour mettre en forme cette feuille puis incorpore l'appel au code généré par le macro recorder dans cette procédure à la procédure principale
 
Bref qqch comme

Private Sub Recadrage()
    With ShImport
        .Rows("1:3" ).Delete Shift:=xlUp
        .Columns("A:E" ).Delete Shift:=xlToLeft
        .Range("B1" ).Select
    End With
End Sub


Message édité par kiki29 le 12-11-2011 à 07:56:09

---------------
Myanmar 90/91 : http://gadaud.gerard.free.fr/publi [...] index.html
n°2111474
TomLondon
Posté le 15-11-2011 à 12:01:44  profilanswer
 

Merci beaucoup tu m'as vraiment beaucoup aide et ca fonctionne parfaitement avec mon cas! Maintenant j'aimerais aller encore lpus loin... Je souhaites n'ajouter que les nouveaux fichiers introduits dans le dossier et donc ne pas effacer les lignes dont les fichiers sont deja dans le dossier...

n°2111670
TomLondon
Posté le 16-11-2011 à 10:04:36  profilanswer
 

Quelqu'un aurait une idee comment s'y prendre pour adapter le code?


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  VB Macro Importer des infos de tous mes docs excel dans un doc excel

 

Sujets relatifs
Insérer le contenu d'un textbox sur une feuille de excelMacro pour convertir chiffre en lettre
[RESOLU]Macro excel modification hypertexte[Windows/PostgreSQL) Importer base sur un autre ordinateur ?
[Résolu] MIME::Lite Fichier Excel corrompu lors de l'envoi par mailVB pour envoyer par mail plusieurs lignes excel
essai 
Plus de sujets relatifs à : VB Macro Importer des infos de tous mes docs excel dans un doc excel


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR