vba copie repertoire

Le
maud s
bonjour

je voudrais savoir si en VBA excel il est possible de creer un bouton sur
une feuille et de lui demander de faire une copie de c:program filesmaud
ainsi que tous les fichiers et sous repertoire dedans
sous un répertoire décider dans un explorer qui s ouvre.


merci
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Philippe.R
Le #5292421
Bonsoir,
Une mine pour ce genre de travail :
http://frederic.sigonneau.free.fr/Fichiers.htm
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"maud s" news:
bonjour

je voudrais savoir si en VBA excel il est possible de creer un bouton sur
une feuille et de lui demander de faire une copie de c:program filesmaud
ainsi que tous les fichiers et sous repertoire dedans
sous un répertoire décider dans un explorer qui s ouvre.


merci



maud s
Le #5292391
merci bcp


"Philippe.R"
Bonsoir,
Une mine pour ce genre de travail :
http://frederic.sigonneau.free.fr/Fichiers.htm
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"maud s" news:
bonjour

je voudrais savoir si en VBA excel il est possible de creer un bouton sur
une feuille et de lui demander de faire une copie de c:program
filesmaud ainsi que tous les fichiers et sous repertoire dedans
sous un répertoire décider dans un explorer qui s ouvre.


merci






seb
Le #5291911
Bonjour maud,

pour copier le contenu de toto dans tata via FSO,

Sub main()

Dim fso As Object
Dim fld As Object

Source = "c:toto"
dest = "c:tata"

Set fso = CreateObject("Scripting.FileSystemObject")
Set fld = fso.GetFolder(Source)

fld.Copy dest
End Sub

seb
Publicité
Poster une réponse
Anonyme