VBA Excel 2010: Lancer un fichier .bat / copier TOUT contenu d'1 .xtx

VBA Excel 2010: Lancer un fichier .bat / copier TOUT contenu d'1 .xtx - VB/VBA/VBS - Programmation

Marsh Posté le 16-07-2013 à 19:21:32    

Bonjour à tous,  
 
Je suis débutant en VBA et je n'arrives pas à réaliser la macro que je souhaiterais faire (et dont j'ai besoin 3* par jour).
 
J'ai besoin de:
 
1- Lancer un fichier : "Folder_Structure.bat"
2- Attendre 10sec qu'il finisse de mouliner
3- Copier tout le contenu du fichier : "Folder_Structure.txt"
 
Par ailleurs, j'ai demandé lors de l'enregistrement de la macro qu'Excel me copie.paste spécial avec le caractère "\" comme séparateur mais il ne semble pas l'avoir pris en compte
 
La suite de ma macro ressemble à cela pour le moment:  
 
Sub MaJ()
 
'PARTIE MANQUANTE
    Sheets("Feuil5" ).Select
    Range("B2" ).Select
    ActiveSheet.PasteSpecial Format:="Texte Unicode", Link:=False, _
        DisplayAsIcon:=False
    Range("K2:O2" ).Select
    Selection.AutoFill Destination:=Range("K2:O200" ), Type:=xlFillDefault
    Range("K2:O200" ).Select
    Sheets("DM" ).Select
    Range("H3:I3" ).Select
    Selection.AutoFill Destination:=Range("H3:I206" ), Type:=xlFillDefault
    Range("H3:I206" ).Select
End Sub
 
 
Je sais qu'il existe probablement une réponse à ma question mais j'ai beau cherché je ne trouves pas et donc je n'arrives pas à mes fins.
 
Merci par avance pour vos conseils :)

Reply

Marsh Posté le 16-07-2013 à 19:21:32   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed