Version d'évaluation
Résolu
Percydev2018
Messages postés
11
Date d'inscription
Statut
Membre
Dernière intervention
-
Percydev2018 Messages postés 11 Date d'inscription Statut Membre Dernière intervention -
Percydev2018 Messages postés 11 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- Version d'évaluation
- Dernière version ccleaner gratuit français - Télécharger - Nettoyage
- Splitcam ancienne version - Télécharger - Messagerie
- Ancienne version autocad gratuite - Télécharger - CAO-DAO
- Télécharger zuma revenge version complète gratuit pour pc - Télécharger - Jeux vidéo
- Dernière version chrome - Accueil - Applications & Logiciels
3 réponses
Ok,je l'essaie
Pour l'envoyer à un client, j'ai oublié de mentionner ceci:
Allez dans ThisWorkbook et activer les lignes citées dans Workbook_BeforeClose
Allez dans Sub creer_vbs sur cette ligne : f.write ("Dim nomfichier: nomfichier = ""Activation.xls"" ") & vbCrLf changer le nom et renommer le classeur à ce nom ensuite après avoir fermé
Enregistrer et fermer le classeur. Ensuite n'oubliez pas de le renommer .
A la prochaine fermeture, il va s'auto détruire en mettant la date d'évaluation dans la base de registre.
Sinon tu n'es pas obligé de détruire le classeur. A ce moment là tu supprimes toute cette procédure
@+ Le Pivert
Allez dans ThisWorkbook et activer les lignes citées dans Workbook_BeforeClose
Allez dans Sub creer_vbs sur cette ligne : f.write ("Dim nomfichier: nomfichier = ""Activation.xls"" ") & vbCrLf changer le nom et renommer le classeur à ce nom ensuite après avoir fermé
Enregistrer et fermer le classeur. Ensuite n'oubliez pas de le renommer .
A la prochaine fermeture, il va s'auto détruire en mettant la date d'évaluation dans la base de registre.
Sinon tu n'es pas obligé de détruire le classeur. A ce moment là tu supprimes toute cette procédure
@+ Le Pivert
