Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

enregistrement sur disquette

1 réponse
Avatar
Charrier André
Bonjour,

Comment écrire en vba l'enregistrement du fichier Dépmod3.xls du disque d:
sur une disquette a:, sachant que le fichier est
de l'ordre de 700Ko
J' écris ActiveWorkbook.SaveCopyAs "a:\Dépmod3.xls", la disquette démarre
mais ne s'arrête pas. Après arrêt par Ctrl+Alt+Suppr la disquette ne
contient que 353ko inutilisables.

J'ai essayé: ActiveWorkbook.SaveCopyAs "a:\Depmod3.xls"
ActiveWorkbook.SaveCopyAs Filename:="a:\Depmod3.xls"
ActiveWorkbook.SaveAs "a:Depmod3.xls"
ActiveWorkbook.SaveAs Filename:="a:\Depmod3.xls"
Toujours sans résultat.
Quelqu'un peut-il m'aider.
Merci.
André

1 réponse

Avatar
michdenis
Bonjour André,

Est-ce possible que ta disquette soit en lecture seule ?

Observe dans le bas de ta disquette si le trou (ouverture) dans le coin inférieur gauche est ouvert .Si c'est le cas, tu dois
fermer cette ouverture par un espèce de bouton-glissoir sur une des faces de celle-ci.


Salutations!



"Charrier André" a écrit dans le message de news:cgjrn0$7r$
Bonjour,

Comment écrire en vba l'enregistrement du fichier Dépmod3.xls du disque d:
sur une disquette a:, sachant que le fichier est
de l'ordre de 700Ko
J' écris ActiveWorkbook.SaveCopyAs "a:Dépmod3.xls", la disquette démarre
mais ne s'arrête pas. Après arrêt par Ctrl+Alt+Suppr la disquette ne
contient que 353ko inutilisables.

J'ai essayé: ActiveWorkbook.SaveCopyAs "a:Depmod3.xls"
ActiveWorkbook.SaveCopyAs Filename:="a:Depmod3.xls"
ActiveWorkbook.SaveAs "a:Depmod3.xls"
ActiveWorkbook.SaveAs Filename:="a:Depmod3.xls"
Toujours sans résultat.
Quelqu'un peut-il m'aider.
Merci.
André