rep = "d:classeurs" nf = Dir(rep & "*.xls") Do While nf <> "" Workbooks.Open Filename:=rep & nf [A1] = DateSerial(2007,1,1) ActiveWorkbook.Save ActiveWorkbook.Close nf = Dir Loop
Cordialement JB
On 14 mai, 09:55, magic-dd wrote:
bonjour
j'aimerai inscrire une seule et meme date dans tous mes classeurs excel contenu dans D:CLASSEURS sans les ouvrir .
une macro peut elle faire ca ?
est ce possible ou alors je dois les ouvrir 1 par 1.
merci
magic-dd
On 14 mai, 10:14, JB wrote:
Bonjour,
rep = "d:classeurs" nf = Dir(rep & "*.xls") Do While nf <> "" Workbooks.Open Filename:=rep & nf [A1] = DateSerial(2007,1,1) ActiveWorkbook.Save ActiveWorkbook.Close nf = Dir Loop merci jb, cela correspond à ce que je souhaitais
@u plaisir
Cordialement JB
On 14 mai, 09:55, magic-dd wrote:
bonjour
j'aimerai inscrire une seule et meme date dans tous mes classeurs excel contenu dans D:CLASSEURS sans les ouvrir .
une macro peut elle faire ca ?
est ce possible ou alors je dois les ouvrir 1 par 1.
merci
On 14 mai, 10:14, JB <boisgont...@hotmail.com> wrote:
Bonjour,
rep = "d:classeurs"
nf = Dir(rep & "*.xls")
Do While nf <> ""
Workbooks.Open Filename:=rep & nf
[A1] = DateSerial(2007,1,1)
ActiveWorkbook.Save
ActiveWorkbook.Close
nf = Dir
Loop
merci jb, cela correspond à ce que je souhaitais
@u plaisir
Cordialement JB
On 14 mai, 09:55, magic-dd <ciolan...@gmail.com> wrote:
bonjour
j'aimerai inscrire une seule et meme date dans tous mes classeurs
excel contenu dans D:CLASSEURS sans les ouvrir .
une macro peut elle faire ca ?
est ce possible ou alors je dois les ouvrir 1 par 1.
rep = "d:classeurs" nf = Dir(rep & "*.xls") Do While nf <> "" Workbooks.Open Filename:=rep & nf [A1] = DateSerial(2007,1,1) ActiveWorkbook.Save ActiveWorkbook.Close nf = Dir Loop merci jb, cela correspond à ce que je souhaitais
@u plaisir
Cordialement JB
On 14 mai, 09:55, magic-dd wrote:
bonjour
j'aimerai inscrire une seule et meme date dans tous mes classeurs excel contenu dans D:CLASSEURS sans les ouvrir .
une macro peut elle faire ca ?
est ce possible ou alors je dois les ouvrir 1 par 1.