Je veut importer des donnes dans un fichier excel

Fermé
aydridi Messages postés 1 Date d'inscription dimanche 29 septembre 2013 Statut Membre Dernière intervention 29 septembre 2013 - Modifié par Chris 94 le 29/09/2013 à 13:39
Le Pingou Messages postés 12241 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 19 février 2025 - 30 sept. 2013 à 16:00
Bonjour,

j'ai un fichier excel et je vient de crée un button de commande qui permet de importer des donner d'un fichier a un autre . le button je l'ai nomé actualiser lorsque j'ai affecter le macro au button il m'a proposer actualiser_clic() et importation_clic() !! j'ai choisit Actualiser mais rien ne se passe :( a voila le code que j'ai mis mais ça fonctionne pas :(

   Sub Actualiser_Clic()

End Sub
Sub importation_xls()
'
' importation_xls Macro
' importer et coller le fichier Excel
'

ChDrive "F:"
ChDir "F:\tth"
fichier = Application.GetOpenFilename("Excel fichiers (*.xls), *.xls")

With ActiveSheet.QueryTables.Add(Connection:= _
"EXCEL;C:\tth\Rapport.xls", Destination:=Range("$A$1"))
.Name = "rapport"

End With

End Sub

Merci d'avance
A voir également:

1 réponse

Le Pingou Messages postés 12241 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 19 février 2025 1 458
30 sept. 2013 à 16:00
Bonjour,
Pas trop clair comme explication,
Essayer de compléter la macro [Actualiser_Clic] comme ceci :
Sub Actualiser_Clic() 
Call importation_xls
End Sub


0