Besoin d'aide
Bonjour,
j'ai crée une macro qui permet de copié et de coller certaines cellules dans un nouveau fichier excel,
j'aimerais que celle ci se fasse sur l'ensemble de mes fichiers excel qui sont dans un répertoire précis,
mais je ne parviens pas à trouver comment faire.
Merci d'avance
voici ma macro :
Sub test()
'
' test Macro
'
'
Range("A2").Select
Selection.TextToColumns Destination:=Range("A2"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _
:="""", FieldInfo:=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:= _
True
Range("A2,B2,F2").Select
Range("F2").Activate
Selection.Copy
Windows("production semaine 37.csv").Activate
ActiveSheet.Paste
Windows("production semaine 37.csv").Activate
Range("A1").Select
Selection.End(xlDown).Offset(1, 0).Select
Workbooks("orders.csv").Close False
End Sub
Bonjour al1,
c'est juste pour te dire que le titre que tu as choisi pour ton sujet « Besoin d'aide » est bien trop vague !
en plus, très bizarrement, tout l'monde sur ce forum d'entraide a besoin d'aide !
tu pourrais mettre, par exemple : « copier/coller dans plusieurs fichiers d'un répertoire précis »
je laisse la suite à un autre intervenant.
dhany