Empêcher transformation dates format ENG depuis format FR
Fermé
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
-
2 sept. 2016 à 09:49
Niconz Messages postés 310 Date d'inscription lundi 16 juin 2014 Statut Membre Dernière intervention 6 juillet 2020 - 28 avril 2017 à 15:57
Niconz Messages postés 310 Date d'inscription lundi 16 juin 2014 Statut Membre Dernière intervention 6 juillet 2020 - 28 avril 2017 à 15:57
A voir également:
- Vba format date français
- Lire le coran en français pdf - Télécharger - Histoire & Religion
- Wetransfer français - Télécharger - Téléchargement & Transfert
- Telecharger format factory - Télécharger - Conversion & Codecs
- WeTransfer gratuit : envoyer des fichiers via Internet - Guide
- Format epub - Guide
127 réponses
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
18 oct. 2016 à 16:54
18 oct. 2016 à 16:54
Salut FB,
Voici le résultat de mes 1ers tests.
Je continue demain, et vous tiens au courant.
Quand je cherche votre NDA Carrefour ah que coucou (très belle référence d'ailleurs :)), le formulaire s'affiche, mais j'ai encore un msg d'erreur 380.
Ligne de bug : MOD_DOC.CURR.Text = .Range("S" & Ligne), qui correspond à la Currency… champ qui n'est pas à compléter pour un NDA….. Rrrhhhh
A part ca, la fonction Search me retrouve tous les autres type de documents, sauf les NDA…
Merci, et bonne soirée avec Jojo !
Voici le résultat de mes 1ers tests.
Je continue demain, et vous tiens au courant.
Quand je cherche votre NDA Carrefour ah que coucou (très belle référence d'ailleurs :)), le formulaire s'affiche, mais j'ai encore un msg d'erreur 380.
Ligne de bug : MOD_DOC.CURR.Text = .Range("S" & Ligne), qui correspond à la Currency… champ qui n'est pas à compléter pour un NDA….. Rrrhhhh
A part ca, la fonction Search me retrouve tous les autres type de documents, sauf les NDA…
Merci, et bonne soirée avec Jojo !
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
19 oct. 2016 à 11:22
19 oct. 2016 à 11:22
Bonjour,
Apres avoir ajouter deux lignes pour NDA R&D........ en modifiant le numero,
search ou modif, je retrouve bien les 3 NDA
Vous pouvez reexpliquez le probleme ?
fichier avec modif PAYMENT si pas NDA
http://www.cjoint.com/c/FJtju7M1uHf
Apres avoir ajouter deux lignes pour NDA R&D........ en modifiant le numero,
search ou modif, je retrouve bien les 3 NDA
Vous pouvez reexpliquez le probleme ?
fichier avec modif PAYMENT si pas NDA
http://www.cjoint.com/c/FJtju7M1uHf
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
19 oct. 2016 à 12:00
19 oct. 2016 à 12:00
Bonjour FB,
Merci pour votre retour.
"........ en modifiant le numero" : si vous parlez du num de reference, qu'avez-vous change, car celui-ci est cense se cree en fonction des champs remplis de l'UF.
Je retrouve bien les NDA, mais a chaque fois que l'UF s'affiche avec les infos, j'ai en meme temps un msg d'erreur 380 avec la ligne ci-dessous qui bug.
MOD_DOC.CURR.Text = .Range("S" & Ligne)
D'ailleurs, je ne comprends pas pourquoi dans les 3 NDA, il y avait une info pour les champs "Termination notice" et "Currency", car ces champs ne sont pas censes etre remplis lors d'un ajout de NDA.
Bref, j'ai fait le test en ajoutant un nouveau NDA, et ici aussi, il me le trouve bien, mais il m'affiche un msg 380...
Merci pour votre retour.
"........ en modifiant le numero" : si vous parlez du num de reference, qu'avez-vous change, car celui-ci est cense se cree en fonction des champs remplis de l'UF.
Je retrouve bien les NDA, mais a chaque fois que l'UF s'affiche avec les infos, j'ai en meme temps un msg d'erreur 380 avec la ligne ci-dessous qui bug.
MOD_DOC.CURR.Text = .Range("S" & Ligne)
D'ailleurs, je ne comprends pas pourquoi dans les 3 NDA, il y avait une info pour les champs "Termination notice" et "Currency", car ces champs ne sont pas censes etre remplis lors d'un ajout de NDA.
Bref, j'ai fait le test en ajoutant un nouveau NDA, et ici aussi, il me le trouve bien, mais il m'affiche un msg 380...
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
Modifié par f894009 le 19/10/2016 à 13:45
Modifié par f894009 le 19/10/2016 à 13:45
Re,
je ne comprends pas pourquoi dans les 3 NDA
J'ai rempli ces champs a la main a la suite d'erreur 380. Je ne sais pas et ne veux pas savoir quels champs sont a remplir ou pas, c'est a vous de dire et nous modifions le code en fonction pour les NDA comme a ete fait MOD_DOC.PAYMENT et eventuellement pour autres type_doc
suite:
modif a faire dans MOD_DOC, Private Sub UserForm_Activate()
dans le bloc
je ne comprends pas pourquoi dans les 3 NDA
J'ai rempli ces champs a la main a la suite d'erreur 380. Je ne sais pas et ne veux pas savoir quels champs sont a remplir ou pas, c'est a vous de dire et nous modifions le code en fonction pour les NDA comme a ete fait MOD_DOC.PAYMENT et eventuellement pour autres type_doc
suite:
modif a faire dans MOD_DOC, Private Sub UserForm_Activate()
dans le bloc
'¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤ With Worksheets("Legal docs listing")
If TYPE_DOC <> "NDA" Then MOD_DOC.PAYMENT = Val(.Range("P" & Ligne)) MOD_DOC.TERM_NOTICE.Text = .Range("Q" & Ligne) MOD_DOC.CURR.Text = .Range("S" & Ligne) End If
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
19 oct. 2016 à 14:47
19 oct. 2016 à 14:47
Re,
Desole de vous saouler avec ca, mais ca marche pas encore parfaitement.
Pour info, les champs qui ne doivent pas etre remplis pour un NDA sont les suivants : de "termination notice a "validity of the pricing" inclus.
Enfin, pour ta modif : faite, et ca marche bien pour les NDA que vous avez remplis a la main.
Par contre, des que j'ajoute un NDA, et que je cherche a le retrouver, le msg d'erreur 380 revient...
Ne serait-il pas plus simple de creer un autre formulaire dedie pour les NDA, dans la mesure ou j'ai l'impression que c'est ce qui bug.
Qu'en pensez-vous ?
Merci.
Desole de vous saouler avec ca, mais ca marche pas encore parfaitement.
Pour info, les champs qui ne doivent pas etre remplis pour un NDA sont les suivants : de "termination notice a "validity of the pricing" inclus.
Enfin, pour ta modif : faite, et ca marche bien pour les NDA que vous avez remplis a la main.
Par contre, des que j'ajoute un NDA, et que je cherche a le retrouver, le msg d'erreur 380 revient...
Ne serait-il pas plus simple de creer un autre formulaire dedie pour les NDA, dans la mesure ou j'ai l'impression que c'est ce qui bug.
Qu'en pensez-vous ?
Merci.
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
Modifié par f894009 le 19/10/2016 à 14:52
Modifié par f894009 le 19/10/2016 à 14:52
Re,
Desole de vous saouler avec ca
Ce n'est pas le cas, autrement pas la peine d'aider les autres, seulement je vais au plus simple car c'est votre fichier.
des que j'ajoute un NDA
Vous pouvez mettre le fichier avec le ou les NDA ajouter par sasie a dispo ??
Que je puisse voir de quoi il retourne
Desole de vous saouler avec ca
Ce n'est pas le cas, autrement pas la peine d'aider les autres, seulement je vais au plus simple car c'est votre fichier.
des que j'ajoute un NDA
Vous pouvez mettre le fichier avec le ou les NDA ajouter par sasie a dispo ??
Que je puisse voir de quoi il retourne
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
19 oct. 2016 à 15:23
19 oct. 2016 à 15:23
Et voici...
http://www.cjoint.com/c/FJtnwHfUMh1
Merci.
http://www.cjoint.com/c/FJtnwHfUMh1
Merci.
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
19 oct. 2016 à 15:53
19 oct. 2016 à 15:53
Re,
Dites voir, vous avez regardez comment j'ai fais la modif pour les NDA
dans votre fichier ces deux lignes sont toujours presentes en dehors du bloc IF END IF
Dites voir, vous avez regardez comment j'ai fais la modif pour les NDA
If TYPE_DOC <> "NDA" Then MOD_DOC.PAYMENT = Val(.Range("P" & Ligne)) MOD_DOC.TERM_NOTICE.Text = .Range("Q" & Ligne) MOD_DOC.CURR.Text = .Range("S" & Ligne) End If
dans votre fichier ces deux lignes sont toujours presentes en dehors du bloc IF END IF
MOD_DOC.TERM_NOTICE.Text = .Range("Q" & Ligne) MOD_DOC.CURR.Text = .Range("S" & Ligne)
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
>
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
19 oct. 2016 à 16:03
19 oct. 2016 à 16:03
Ba, j'ai gentiment applique ce que vous m'avez dit dans votre post 90.
Mais meme en enlevant ces doublons, le probleme persiste.
C'est reparti pour un tour...
Mais meme en enlevant ces doublons, le probleme persiste.
C'est reparti pour un tour...
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
>
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
Modifié par f894009 le 19/10/2016 à 16:38
Modifié par f894009 le 19/10/2016 à 16:38
Re,
c'est ici que ca coince pour le dernier NDA que vous avez saisi faut kake chose ou pas ??
c'est ici que ca coince pour le dernier NDA que vous avez saisi faut kake chose ou pas ??
MOD_DOC.TACITE_RENEWAL.Text = .Range("O" & Ligne)
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
>
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
19 oct. 2016 à 16:44
19 oct. 2016 à 16:44
Re,
Non pas de tacite renewal pour les NDA.
Lorsqu'on ajoute un NDA, ce champ est shunte, donc non remplissable.
Non pas de tacite renewal pour les NDA.
Lorsqu'on ajoute un NDA, ce champ est shunte, donc non remplissable.
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
>
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
Modifié par f894009 le 19/10/2016 à 18:06
Modifié par f894009 le 19/10/2016 à 18:06
Re,
Et ben, mettez cette ligne dans le test type_doc<>"NDA"!!!!!!
Et ben, mettez cette ligne dans le test type_doc<>"NDA"!!!!!!
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
20 oct. 2016 à 08:17
20 oct. 2016 à 08:17
Bonjour FB,
Et bien un grand MERCI alors !
Je n'en serai pas là sans vous.
Pour les 400 lignes, je vais les intégrer dans les prochaines semaines, je vous tiendrai au courant si besoin.
Encore merci, et à bientôt peut-être,
Très belle journée,
Et bien un grand MERCI alors !
Je n'en serai pas là sans vous.
Pour les 400 lignes, je vais les intégrer dans les prochaines semaines, je vous tiendrai au courant si besoin.
Encore merci, et à bientôt peut-être,
Très belle journée,
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
1 nov. 2016 à 11:45
1 nov. 2016 à 11:45
Salut FB,
Et oui, encore moi.
Je viens jouer le revenant… :)
J'ai encore (pour changer :)) identifier un problème pour lequel ta précieuse aide serait appréciable.
Ta prochaine problématique, si tu l'acceptes, est la suivante :
Lorsque je cherche à modifier un NDA existant, le fichier me demande de compléter les champs suivants : de tacite renewal à validity of the pricing inclus, alors que ces champs ne sont pas à remplir pour un NDA.
Dans la macro Private Sub UserForm_Activate() de MOD_DOC, ces champs sont bien mis en "false", j'ai donc du mal à comprendre pourquoi ils continuent de s'afficher.
Une idée de ce qui peut clocher ?
Pour info, et si ca t'est utile, j'ai constaté les 2 choses suivantes :
- Le label et textbox "DOC_VALUE" ne se grise pas lorsque je cherche à modifier un NDA, à contrario des autres champs suivant ; et ce alors que toutes les lignes sont bien mises en false…
- Le label de tous les champs ci-dessus sont bien inactifs, mais pas les textbox…
Voici la dernière version du fichier :
http://www.cjoint.com/c/FKbkSSkdW0M
Merci pour ton aide, très bon après-midi
Et oui, encore moi.
Je viens jouer le revenant… :)
J'ai encore (pour changer :)) identifier un problème pour lequel ta précieuse aide serait appréciable.
Ta prochaine problématique, si tu l'acceptes, est la suivante :
Lorsque je cherche à modifier un NDA existant, le fichier me demande de compléter les champs suivants : de tacite renewal à validity of the pricing inclus, alors que ces champs ne sont pas à remplir pour un NDA.
Dans la macro Private Sub UserForm_Activate() de MOD_DOC, ces champs sont bien mis en "false", j'ai donc du mal à comprendre pourquoi ils continuent de s'afficher.
Une idée de ce qui peut clocher ?
Pour info, et si ca t'est utile, j'ai constaté les 2 choses suivantes :
- Le label et textbox "DOC_VALUE" ne se grise pas lorsque je cherche à modifier un NDA, à contrario des autres champs suivant ; et ce alors que toutes les lignes sont bien mises en false…
- Le label de tous les champs ci-dessus sont bien inactifs, mais pas les textbox…
Voici la dernière version du fichier :
http://www.cjoint.com/c/FKbkSSkdW0M
Merci pour ton aide, très bon après-midi
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
1 nov. 2016 à 14:30
1 nov. 2016 à 14:30
Bonjour,
Je viens jouer le revenant
Soit en retard d'un jour pour Halloween!!!!!!
Soit en avance d'un jour pour la fete des morts!!!!!!!
Ok, je recupere le fichier et vous tiens au courant
Je viens jouer le revenant
Soit en retard d'un jour pour Halloween!!!!!!
Soit en avance d'un jour pour la fete des morts!!!!!!!
Ok, je recupere le fichier et vous tiens au courant
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
1 nov. 2016 à 15:24
1 nov. 2016 à 15:24
Re,
fichier modifie pour non controls d'objets si TYPE_DOC="NDA"
https://www.cjoint.com/c/FKbowww5Xlf
Par contre il serait plus judicieux des mettre les dits objets non visible car en enabled=false rien n'empeche d'ecrire dedans et la c'est le binz avec les tests de format
fichier modifie pour non controls d'objets si TYPE_DOC="NDA"
https://www.cjoint.com/c/FKbowww5Xlf
Par contre il serait plus judicieux des mettre les dits objets non visible car en enabled=false rien n'empeche d'ecrire dedans et la c'est le binz avec les tests de format
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
1 nov. 2016 à 15:32
1 nov. 2016 à 15:32
Re,
Merci, ca marche bien après 2 tests sommaires.
A voir si rien ne cloche après d'autres tests plus poussés.
Et comment fais-t-on pour mettre les objets en non visible, mais seulement pour les NDA, car pour rappel, ces champs doivent être visible et remplis si c'est un autre type de document.
Encore merci FB, à +
Merci, ca marche bien après 2 tests sommaires.
A voir si rien ne cloche après d'autres tests plus poussés.
Et comment fais-t-on pour mettre les objets en non visible, mais seulement pour les NDA, car pour rappel, ces champs doivent être visible et remplis si c'est un autre type de document.
Encore merci FB, à +
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
1 nov. 2016 à 15:34
1 nov. 2016 à 15:34
Re,
comment fais-t-on pour mettre les objets en non visible
Eh ben, nomducontrol.visible=false pour cache et nomducontrol.visible=true pour non cache
comment fais-t-on pour mettre les objets en non visible
Eh ben, nomducontrol.visible=false pour cache et nomducontrol.visible=true pour non cache
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
>
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
Modifié par Niconz le 1/11/2016 à 16:12
Modifié par Niconz le 1/11/2016 à 16:12
Ah, tout con, parfait merci.
Ca marche nickel !
Autre question plus délicate :
Je m'aperçois qu'il n'était peut-être pas très judicieux de mettre mes listes déroulantes dans le même onglet que dans le listing de mes documents…
En effet, si je supprime un doc (donc potentiellement une ligne), j'élimine un composant de plusieurs listes déroulantes, et ca fout le bordel…
J'ai essayé de voir par moi-même s'il était possible de déplacer ces listes déroulantes dans un autre onglet, et renommer le code comme je le pouvais (et le comprenais), mais ca merde à chaque fois.
Bref, ma question est la suivante : y-a-til un moyen simple de bouger mes listes déroulantes dans un autre onglet sans réécrire tout le code du fichier ?
Merci.
Re, re
J'ai appliqué votre conseil et ai mis les lignes ci-dessous en caché.
Me.Label33.Visible = False
Me.Image4.Visible = False
Me.Image3.Visible = False
Me.Label32.Visible = False
Me.Image5.Visible = False
Par contre, il continue de m'afficher les images 3, 4 et 5.
Qu'ai-je loupé ?
Ca marche nickel !
Autre question plus délicate :
Je m'aperçois qu'il n'était peut-être pas très judicieux de mettre mes listes déroulantes dans le même onglet que dans le listing de mes documents…
En effet, si je supprime un doc (donc potentiellement une ligne), j'élimine un composant de plusieurs listes déroulantes, et ca fout le bordel…
J'ai essayé de voir par moi-même s'il était possible de déplacer ces listes déroulantes dans un autre onglet, et renommer le code comme je le pouvais (et le comprenais), mais ca merde à chaque fois.
Bref, ma question est la suivante : y-a-til un moyen simple de bouger mes listes déroulantes dans un autre onglet sans réécrire tout le code du fichier ?
Merci.
Re, re
J'ai appliqué votre conseil et ai mis les lignes ci-dessous en caché.
Me.Label33.Visible = False
Me.Image4.Visible = False
Me.Image3.Visible = False
Me.Label32.Visible = False
Me.Image5.Visible = False
Par contre, il continue de m'afficher les images 3, 4 et 5.
Qu'ai-je loupé ?
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
>
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
1 nov. 2016 à 16:40
1 nov. 2016 à 16:40
Re,
Normalement avec les manips ci-dessous, les formules de vos listes se mettent a jour automatiquement
Vous faites une copie de la feuille ou il y a vos listes
Vous positionnez vos listes de facon a pouvoir copiez les colonnes de la feuille ou vous aviez prevu de mettre ces listes, renommez les deux feuilles et ca doit etre ok
Facile, mais attention
Normalement avec les manips ci-dessous, les formules de vos listes se mettent a jour automatiquement
Vous faites une copie de la feuille ou il y a vos listes
Vous positionnez vos listes de facon a pouvoir copiez les colonnes de la feuille ou vous aviez prevu de mettre ces listes, renommez les deux feuilles et ca doit etre ok
Facile, mais attention
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
>
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 nov. 2016 à 16:50
1 nov. 2016 à 16:50
C'est pourtant ce que j'avais fait, en faisant attention de bien changer le nom de l'onglet dans les macros, mais lors des tests, les listes déroulantes ne s'affichait pas.
Je referai un essai et vous l'enverrai quand j'aurai le temps.
Merci.
Je referai un essai et vous l'enverrai quand j'aurai le temps.
Merci.
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
>
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 nov. 2016 à 16:50
1 nov. 2016 à 16:50
Re, re,
Avez-vous vu mon complément de post ?
J'ai appliqué votre conseil et ai mis les lignes ci-dessous en caché.
Me.Label33.Visible = False
Me.Image4.Visible = False
Me.Image3.Visible = False
Me.Label32.Visible = False
Me.Image5.Visible = False
Par contre, il continue de m'afficher les images 3, 4 et 5.
Qu'ai-je loupé ?
Avez-vous vu mon complément de post ?
J'ai appliqué votre conseil et ai mis les lignes ci-dessous en caché.
Me.Label33.Visible = False
Me.Image4.Visible = False
Me.Image3.Visible = False
Me.Label32.Visible = False
Me.Image5.Visible = False
Par contre, il continue de m'afficher les images 3, 4 et 5.
Qu'ai-je loupé ?
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
1 nov. 2016 à 18:39
1 nov. 2016 à 18:39
Re,
Par contre, il continue de m'afficher les images 3, 4 et 5.
Qu'ai-je loupé ?
Dans uf mod_Doc, Private Sub UserForm_Activate()
il y a ceci, a la fin de la procedure
c'est la qu'il faut faire un test TYPE_DOC="NDA" pour cacher les images 3 a 5
Par contre, il continue de m'afficher les images 3, 4 et 5.
Qu'ai-je loupé ?
Dans uf mod_Doc, Private Sub UserForm_Activate()
il y a ceci, a la fin de la procedure
' boucle sur les boutons 1 à 5 For b = 1 To 5 'si cas de modif on les rend visibles, si recherche on les rend invisibles If modif = 1 Then MOD_DOC.Controls("Image" & b).Visible = True Else MOD_DOC.Controls("Image" & b).Visible = False Next
c'est la qu'il faut faire un test TYPE_DOC="NDA" pour cacher les images 3 a 5
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
2 nov. 2016 à 07:58
2 nov. 2016 à 07:58
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
2 nov. 2016 à 08:24
2 nov. 2016 à 08:24
Bonjour,
Dites voir, le doute maasaï(doute africain), c'est vous qui avez code ce fichier ?
Je regarde la chose
A+
Dites voir, le doute maasaï(doute africain), c'est vous qui avez code ce fichier ?
Je regarde la chose
A+
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
2 nov. 2016 à 08:38
2 nov. 2016 à 08:38
Re,
Non, quasiment pas.
C'est une arme charitable sur CCM qui m'a aidée à construire le fichier.
Non, quasiment pas.
C'est une arme charitable sur CCM qui m'a aidée à construire le fichier.
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
Modifié par f894009 le 2/11/2016 à 08:54
Modifié par f894009 le 2/11/2016 à 08:54
Re,
Ok, je regarde la chose
Je viens de voir aussi pourquoi avec NDA il etait possible d'ecrire dans le ctrl apres avoir mis du code en enabled=false, il y du code qui fait le contraire en fin de cette procedure
Donc je vois mieux le pourquoi de ce que je vous ai dis que le mieux serait de les rendre non visible
Je repends tout ca
Ok, je regarde la chose
Je viens de voir aussi pourquoi avec NDA il etait possible d'ecrire dans le ctrl apres avoir mis du code en enabled=false, il y du code qui fait le contraire en fin de cette procedure
Private Sub UserForm_Activate()
Donc je vois mieux le pourquoi de ce que je vous ai dis que le mieux serait de les rendre non visible
Je repends tout ca
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
2 nov. 2016 à 09:30
2 nov. 2016 à 09:30
Re,
fichier modifie pour objets visibles ou non suivant modif et type_doc
https://www.cjoint.com/c/FKciEpMaStf
fichier modifie pour objets visibles ou non suivant modif et type_doc
https://www.cjoint.com/c/FKciEpMaStf
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
2 nov. 2016 à 09:59
2 nov. 2016 à 09:59
Re,
Merci beaucoup FB, encore une fois vous avez été à la hauteur de mes espérances :)
Petite question : puis-je supprimer les 2 derniers onglets, sans risque que cela pose de bug derrière ?
Je fais des tests dans la journée et demain pour m'assurer que tout est ok.
Je vais aussi en profiter pour cacher les champs non necessaires pour les NDA lors d'un ajout de docs.
Encore merci.
Merci beaucoup FB, encore une fois vous avez été à la hauteur de mes espérances :)
Petite question : puis-je supprimer les 2 derniers onglets, sans risque que cela pose de bug derrière ?
Je fais des tests dans la journée et demain pour m'assurer que tout est ok.
Je vais aussi en profiter pour cacher les champs non necessaires pour les NDA lors d'un ajout de docs.
Encore merci.
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
2 nov. 2016 à 11:52
2 nov. 2016 à 11:52
Re,
puis-je supprimer les 2 derniers onglets
Feuil1 et (2): oui
puis-je supprimer les 2 derniers onglets
Feuil1 et (2): oui
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
2 nov. 2016 à 13:45
2 nov. 2016 à 13:45
Professeur... :)
Je viens de cacher les champs inutiles pour l'ajout d'un NDA, mais lorsque je cherche à ajouter un nouvel NDA, il me demande de compléter les champs grisés, qui sont bien sur invisibles...
Voilà le fichier.
http://www.cjoint.com/c/FKcmS7tnFXC
Comment faire pour désactiver ces champs, juste pour les NDA ?
Si jamais, expliquez-moi en terme simple, et j'essaierai de faire la manoeuvre, et si vraiment je n'y arrive pas, je reviens vous voir :)
Merci encore FB
Je viens de cacher les champs inutiles pour l'ajout d'un NDA, mais lorsque je cherche à ajouter un nouvel NDA, il me demande de compléter les champs grisés, qui sont bien sur invisibles...
Voilà le fichier.
http://www.cjoint.com/c/FKcmS7tnFXC
Comment faire pour désactiver ces champs, juste pour les NDA ?
Si jamais, expliquez-moi en terme simple, et j'essaierai de faire la manoeuvre, et si vraiment je n'y arrive pas, je reviens vous voir :)
Merci encore FB
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
>
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
2 nov. 2016 à 14:02
2 nov. 2016 à 14:02
Re,
expliquez-moi en terme simple
F a c i l e, ce sont les memes modif que pour:
modification d'un NDA dans l'UF MOD_DOC
expliquez-moi en terme simple
F a c i l e, ce sont les memes modif que pour:
modification d'un NDA dans l'UF MOD_DOC
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
2 nov. 2016 à 14:33
2 nov. 2016 à 14:33
Ok, j'aurai peut-être mieux fait de me taire...
Mise à part cacher les champs en les mettant en visible=false, que reste t-il à faire ?
Dois-je rajouter le code ci-dessous dans la macro Private Sub UserForm_Initialize() associé à l'UF ADDITION_DOC ?, en remplacant les images 3, 4 et 5 par les champs inutiles ?
' boucle sur les boutons 1 à 5
If (modif = 1 And TYPE_DOC = "NDA") Or modif = 0 Then
Image3.Visible = False
Image4.Visible = False
Image5.Visible = False
ElseIf modif = 1 And TYPE_DOC <> "NDA" Then
Image3.Visible = True
Image4.Visible = True
Image5.Visible = True
End If
Mise à part cacher les champs en les mettant en visible=false, que reste t-il à faire ?
Dois-je rajouter le code ci-dessous dans la macro Private Sub UserForm_Initialize() associé à l'UF ADDITION_DOC ?, en remplacant les images 3, 4 et 5 par les champs inutiles ?
' boucle sur les boutons 1 à 5
If (modif = 1 And TYPE_DOC = "NDA") Or modif = 0 Then
Image3.Visible = False
Image4.Visible = False
Image5.Visible = False
ElseIf modif = 1 And TYPE_DOC <> "NDA" Then
Image3.Visible = True
Image4.Visible = True
Image5.Visible = True
End If
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
2 nov. 2016 à 15:25
2 nov. 2016 à 15:25
Re,
Vu qu'il n'y a pas de modif
Vu qu'il n'y a pas de modif
If TYPE_DOC = "NDA" Then Image3.Visible = False Image4.Visible = False Image5.Visible = False Else Image3.Visible = True Image4.Visible = True Image5.Visible = True End If
Niconz
Messages postés
310
Date d'inscription
lundi 16 juin 2014
Statut
Membre
Dernière intervention
6 juillet 2020
2 nov. 2016 à 16:02
2 nov. 2016 à 16:02
Non, voici le résultat.
Qu'est ce qui cloche cette fois-ci ?
https://www.cjoint.com/c/FKcpbPEuprC
Qu'est ce qui cloche cette fois-ci ?
https://www.cjoint.com/c/FKcpbPEuprC
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
2 nov. 2016 à 18:27
2 nov. 2016 à 18:27
Re,
Non, voici le résultat.
Rien a voir avec les images, c'est un champ non rempli
Ok, je regarde
Non, voici le résultat.
Rien a voir avec les images, c'est un champ non rempli
Ok, je regarde
f894009
Messages postés
17181
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 mars 2024
1 701
Modifié par f894009 le 2/11/2016 à 18:35
Modifié par f894009 le 2/11/2016 à 18:35
Re,
Quand j'ai ecrit les memes modif que dans MOD_DOC, c'est toutes les modifs, celle qui sont dans
vu que ces deux UF sont identiques
A vous de voir si vous faites ou pas
Quand j'ai ecrit les memes modif que dans MOD_DOC, c'est toutes les modifs, celle qui sont dans
Private Sub UserForm_Initialize()ET dans Private Sub SAVE_Click()
vu que ces deux UF sont identiques
A vous de voir si vous faites ou pas
Modifié par f894009 le 18/10/2016 à 17:09
sauf les NDA…
Ben avec "mon fichier" pas de probleme
champ qui n'est pas à compléter pour un NDA….. Rrrhhhh
En effet !!!
Faire test si pas NDA pour ecriture
18 oct. 2016 à 17:29
Ba c'est avec votre fichier que le bug apparaît...
J'ai d'ailleurs ajouté plusieurs autres NDA et le même problème se pose.
Si pas NDA, toit roule à présent.
18 oct. 2016 à 17:57
Ceci-dit la recherche de docs est d'origine, donc .....
Je regarde la chose quand meme demain