Mon Pb. est le suivant. J'ai une procédure qui enregistre une copie de la
feuille active au format.csv,
Une fois l'enrigistrement réalisé, les données sont éffacées et le classeurs
.xls réenregistré.
Ca fonctionne impec sauf lorsque le VBA Project est protégé pour l'affichage
par mot de passe ! Là ça ne fonctionne plus.
La procédure échoue lors de l'enregistrement.
J'ai un message d'erreure du genre : Impossibe d'enregistrer sous se format
!...
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Bonjour Christian,
Je n'ai pas vraiment saisi le problème que tu rencontres ...C'est quoi la problématique du mot de passe ?
mais si tu essayais ceci :
Dim CeClasseur as String CeClasseur = ThisWorkbook.name
Copie la feuille active vers un autre classeur ..
Sheets("MaFeuille").Copy
Tu enregistres la feuille de ce nouveau classeur en format csv
Activeworkbook.saveas .....
Fermeture de nouveau classeur sans sauvegarde ....
Activeworkbook.close False
Workbooks(CeClasseur).Activate
..../....etc
Effacer les données + sauvegarde ...
Salutations!
"Christian Neu" a écrit dans le message de news:uxP2Te% Bonjour,
Mon Pb. est le suivant. J'ai une procédure qui enregistre une copie de la feuille active au format.csv, Une fois l'enrigistrement réalisé, les données sont éffacées et le classeurs .xls réenregistré. Ca fonctionne impec sauf lorsque le VBA Project est protégé pour l'affichage par mot de passe ! Là ça ne fonctionne plus. La procédure échoue lors de l'enregistrement. J'ai un message d'erreure du genre : Impossibe d'enregistrer sous se format !...
merçi
Bonjour Christian,
Je n'ai pas vraiment saisi le problème que tu rencontres ...C'est quoi la problématique du mot de passe ?
mais si tu essayais ceci :
Dim CeClasseur as String
CeClasseur = ThisWorkbook.name
Copie la feuille active vers un autre classeur ..
Sheets("MaFeuille").Copy
Tu enregistres la feuille de ce nouveau classeur en format csv
Activeworkbook.saveas .....
Fermeture de nouveau classeur sans sauvegarde ....
Activeworkbook.close False
Workbooks(CeClasseur).Activate
..../....etc
Effacer les données + sauvegarde ...
Salutations!
"Christian Neu" <christian.neu@tele2.fr> a écrit dans le message de news:uxP2Te%23lEHA.2020@TK2MSFTNGP09.phx.gbl...
Bonjour,
Mon Pb. est le suivant. J'ai une procédure qui enregistre une copie de la
feuille active au format.csv,
Une fois l'enrigistrement réalisé, les données sont éffacées et le classeurs
.xls réenregistré.
Ca fonctionne impec sauf lorsque le VBA Project est protégé pour l'affichage
par mot de passe ! Là ça ne fonctionne plus.
La procédure échoue lors de l'enregistrement.
J'ai un message d'erreure du genre : Impossibe d'enregistrer sous se format
!...
Je n'ai pas vraiment saisi le problème que tu rencontres ...C'est quoi la problématique du mot de passe ?
mais si tu essayais ceci :
Dim CeClasseur as String CeClasseur = ThisWorkbook.name
Copie la feuille active vers un autre classeur ..
Sheets("MaFeuille").Copy
Tu enregistres la feuille de ce nouveau classeur en format csv
Activeworkbook.saveas .....
Fermeture de nouveau classeur sans sauvegarde ....
Activeworkbook.close False
Workbooks(CeClasseur).Activate
..../....etc
Effacer les données + sauvegarde ...
Salutations!
"Christian Neu" a écrit dans le message de news:uxP2Te% Bonjour,
Mon Pb. est le suivant. J'ai une procédure qui enregistre une copie de la feuille active au format.csv, Une fois l'enrigistrement réalisé, les données sont éffacées et le classeurs .xls réenregistré. Ca fonctionne impec sauf lorsque le VBA Project est protégé pour l'affichage par mot de passe ! Là ça ne fonctionne plus. La procédure échoue lors de l'enregistrement. J'ai un message d'erreure du genre : Impossibe d'enregistrer sous se format !...
