Format monaitaire
Fermé
Mr_Guy
Messages postés
12
Date d'inscription
dimanche 9 juin 2019
Statut
Membre
Dernière intervention
7 août 2023
-
2 juil. 2019 à 09:08
JCB40 Messages postés 2941 Date d'inscription lundi 2 juillet 2018 Statut Membre Dernière intervention 29 novembre 2024 - 2 juil. 2019 à 17:29
JCB40 Messages postés 2941 Date d'inscription lundi 2 juillet 2018 Statut Membre Dernière intervention 29 novembre 2024 - 2 juil. 2019 à 17:29
A voir également:
- Format monaitaire
- Format epub - Guide
- Telecharger format factory - Télécharger - Conversion & Codecs
- Format apfs - Guide
- Format bin - Guide
- Format dat - Guide
4 réponses
JCB40
Messages postés
2941
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
29 novembre 2024
463
2 juil. 2019 à 09:29
2 juil. 2019 à 09:29
Bonjour
Ce fichier fonctionnerait-il avec un code VBA ou macro ?
Crdlt
Ce fichier fonctionnerait-il avec un code VBA ou macro ?
Crdlt
Mr_Guy
Messages postés
12
Date d'inscription
dimanche 9 juin 2019
Statut
Membre
Dernière intervention
7 août 2023
2 juil. 2019 à 09:36
2 juil. 2019 à 09:36
Bonjour,
Oui une macro à l'ouverture mais elle ne comporte pas d'indication sur le format.
Merci
Oui une macro à l'ouverture mais elle ne comporte pas d'indication sur le format.
Merci
JCB40
Messages postés
2941
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
29 novembre 2024
463
2 juil. 2019 à 09:53
2 juil. 2019 à 09:53
pouvez-vous nous mettre une copie de la macro?
Allez sur ce site : https://www.cjoint.com/
Clic sur parcourir,
Cherche ton fichier,
clic sur ouvrir,
Clic sur "Créer le lien cjoint",
Copier le lien,
Revenir ici le coller dans une réponse...
Allez sur ce site : https://www.cjoint.com/
Clic sur parcourir,
Cherche ton fichier,
clic sur ouvrir,
Clic sur "Créer le lien cjoint",
Copier le lien,
Revenir ici le coller dans une réponse...
Mr_Guy
Messages postés
12
Date d'inscription
dimanche 9 juin 2019
Statut
Membre
Dernière intervention
7 août 2023
2 juil. 2019 à 10:04
2 juil. 2019 à 10:04
Private Sub Workbook_Open()
If Sheets("Coordonnées Vendeur").[Bz3] < Sheets("Coordonnées Vendeur").[Bz2] Then
Else
Sheets("Coordonnées Vendeur").[BY2] = "=TODAY()"
End If
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Save
End Sub
Voilà
If Sheets("Coordonnées Vendeur").[Bz3] < Sheets("Coordonnées Vendeur").[Bz2] Then
Else
Sheets("Coordonnées Vendeur").[BY2] = "=TODAY()"
End If
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Save
End Sub
Voilà
JCB40
Messages postés
2941
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
29 novembre 2024
463
2 juil. 2019 à 17:29
2 juil. 2019 à 17:29
Re
Bizarre,
Pouvez vous envoyer un extrait de votre fichier
sans données sensibles?
Crdlt
Bizarre,
Pouvez vous envoyer un extrait de votre fichier
sans données sensibles?
Crdlt