Membre impliqué

Inscrit le :17/05/2018
Dernière activité :Aujourd'hui à 04:15
Version d'Excel :Office 365 FR
Emploi :Jeune retraité
Lieu :Nôtre beau Sud
Messages
1'293
Votes
391
Fichiers
0
Téléchargements
0
SujetsMessagesStatistiquesVotes reçus

Messages postés par Jean-Paul - page 13

DateAuteur du sujetSujetExtrait du message
07/11/2023 à 19:09sansvingt Protection macro mot de passeRe, Tu as besoin du module PWManager. Dans ton fichier. Et du dois avoir ce bout de code en début de tes procédures : Donc tu ouvre les deux fichiers le tiens et le mien et tu fais un Drag And Drop sur ton fichier du module PWManager Ensuite tu vérifie tes procédures.....
07/11/2023 à 18:58Hellspawn Forçage valeur positive ou négative SANS MACRORe, Et comment sait-tu quelle doit-être négative ...
07/11/2023 à 16:32Hellspawn Forçage valeur positive ou négative SANS MACROComment tu détermine quelle valeur doit avoir la cellule, par action sur un bouton ? Automatiquement par rapport à une autre valeur ...
07/11/2023 à 12:19Pj_Joumi Boucle qui s'arrête trop tôtRe, Les bases de données ne peuvent faire que quelque ligne supprime le superflu. Ou bien tente en le compressant...
07/11/2023 à 09:28Pj_Joumi Boucle qui s'arrête trop tôtEdit : J'ai pas été assez rapide C'est quoi ça ? Il faut que tu affectes directement, et évite les select. Y'a quoi dans Call Chercher_Commande ? Donc un fichier ou une bonne description de ce que tu veux faire nous est nécessaire...
07/11/2023 à 09:15sansvingt Protection macro mot de passeVoici un petit test à la va vite. Bien entendu le projet VBE doit-être protégé sinon aucun intérêt.Tu as trois procédures dans le module PWManager Getpassword Permet de récupérer le mot de passe actuel SetPassword Définie un nouveau mot de passe InitPassword Initialise le mot de passe cela évite une...
07/11/2023 à 08:28sansvingt Macros sur onedrive non activéesRe, Demande lui de t'envoyer le fichier et non pas le lien. c'est tout...
07/11/2023 à 08:26Heelflip Manipulation chaines de caractères (Mid/Replace)Re Bé non ! Que vient faire RefersTo ici ? Si ton tableau contient deux colonne tu prends le tableau complet pour ta liste déroulante donc : .List doit être égal à .List = Range("vt_Produits").Value ou bien .List = Range("vt_Produits[[Value]:[Produits]]").Value mais la premiè...
06/11/2023 à 23:42Heelflip Manipulation chaines de caractères (Mid/Replace)Peux-Tu mettre le fichier anonymisé ? Je fais une édition de ma précédente réponse car elle ne me satisfaisait pas. Et que mon temps libre aujourd'hui risque d'être écourté. La procédure GetTheValue ne te pose pas de problème, ça c'est acquis. Ce qui te pose problème je pense c'est l'affectation de...
06/11/2023 à 21:58Judie Eviter les écritures inutilesAvec une condition SI() =DATEDIF(A6;B6;"M") &" mois " & SI(DATEDIF(A6;B6;"MD")>0;DATEDIF(A6;B6;"MD") & " jours";"")...
06/11/2023 à 21:42didijag Msgbox qui apparaîssent plusieurs foisMerci, je pense qu'il y a toujours des âmes charitables pour aider ici, il suffit de demander alors n'hésites pas...
06/11/2023 à 15:49jajaj Formule non respectéeJe ne vois pas pourquoi tu changerais les références. que tu sois en "D1", "C8" ou autre la formule reste la même, tu fait la différence entre "A1" et "A1" des feuilles entrée sortie. Maintenant si tu dois faire la différence entre d'autres cellules alors oui tu doit adapter les fonctions...
06/11/2023 à 15:40franckythebestSupprimer des cases a cocher en fonction de leur etat vrai/fauxOk je comprends mieux maintenant, je suis vieux il faut me répéter plusieurs fois. Bon je suppose que tu fais des copie des feuilles complètes, si c'est le cas le code d'Eric devrait convenir, sinon une autre solution consisterait à ne copier que les données d'une feuille. Bonne prog...
06/11/2023 à 10:48franckythebestSupprimer des cases a cocher en fonction de leur etat vrai/fauxQuel est le but de supprimer une case à cocher ? après faut tout se retaper pour les recréer ? Worksheets("Test").Shapes.Range("MyCheckBox").Delete devrait faire le travail...
06/11/2023 à 10:17sansvingt Macros sur onedrive non activéesJe pense qu'en fait, il doit demander le fichier en pièce jointe lors du partage, et non pas le lien. J'ai déjà eu ce problème auparavant...
06/11/2023 à 09:30Heelflip Manipulation chaines de caractères (Mid/Replace)Galopin à bien fait le tour de la question. Quelques explication quand même: GetTheValue me permet d'aller chercher dans le Tag du contrôle une valeur bien déterminée exemple: Si le Tag du contrôle contient Key:=Miscellaneous.PageLoaded;ListeValueCmb:=vt_Contacts GetTheValue(cmbContacts.Tag,"ListeVa...
05/11/2023 à 12:01Heelflip Manipulation chaines de caractères (Mid/Replace)Ton code peut-être réduit en utilisant un tableau. Pour la mise en forme du textbox2 c'est dans le module Factory. J'ai modifier les tableaux et je les ai passés en structurés, les Listes déroulantes comportent le texte et la valeur à renvoyée cette dernière est cachée. N'ayant pas les images sur mo...
04/11/2023 à 23:58didijag Msgbox qui apparaîssent plusieurs foisPeux-tu tester en changeant le type pour les variables statiques (Passage en type Long). et changer les conditions ElseIf comme indiqué ci-dessous. Comme d'habitude je n'ai pas traité l'ensemble de la procédure, mais tu devrais t'en sortir...
04/11/2023 à 00:47buckOuvrir un fichier avec une ligne de codeEt si tu concatène le tout avant. J'ai fais un test et c'est bon...
03/11/2023 à 15:44LyamAfficher une photo à partir d'une listboxRe, Attention aux guillemets Excel parle français chez moi il renvoie donc Faux, et pas "Faux"...
03/11/2023 à 15:37didijag Msgbox qui apparaîssent plusieurs foisTu peux aussi utiliser des variables Static Je n'ai pas mis toute la procédure à toi de compléter Explications ici : https://learn.microsoft.com/fr-fr/office/vba/language/reference/user-interface-help/static-statement...
03/11/2023 à 14:26LyamAfficher une photo à partir d'une listboxAttention Application.GetOpenFilename renvoie False et non pas "Faux" en cas d'annulation de ta part. Donc le test doit être : If Z <> False Then ... Informations sur le site de Crosoft https://learn.microsoft.com/fr-fr/office/vba/api/excel.application.getopenfilename...
19/05/2023 à 14:42capucineChanger l'angle d'une image dans un UserFormT'as fait une erreur quelque part : Voici le contrôle que tu dois avoir dans la boite à outils : Dans les contrôles supplémentaires tu dois cocher 10Tec/vbaccelerator ImageList 2.5 si celui-ci à bien été enregistré. Je suis en 32Bits donc je ne peux pas tester en 64, si quelqu'un est dispo pour le f...
09/05/2023 à 15:23capucineChanger l'angle d'une image dans un UserFormAs-tu eu la fenêtre comme quoi l'enregistrement du contrôle vb10Tech.... avait réussi ? Si ce n'est pas le cas tu ne pourras pas le trouver dans les contrôles supplémentaires...
09/05/2023 à 09:51capucineChanger l'angle d'une image dans un UserFormRe C'est un contrôle est-il présent sur la feuille ? Si pas présent : Clic droit sur la boite à Outils dans l'environnement VBE Clic sur contrôles supplémentaires. Tu sélectionnes 10Tec/vbAccelerator..... Il doit apparaitre dans la boite à outils... Il ne te reste plus qu'a l'insérer sur la feuille...
07/05/2023 à 15:50capucineChanger l'angle d'une image dans un UserFormRe, Si je t'avais demandé de copier tout le répertoire, je t'aurais dis copie tout le répertoire non ? Je ne suis pas devant ton PC si cela n'as pas fonctionner dans le répertoire SysWow64 testes dans le répertoire System32 de Windows Tu copie et colles le fichier vbalIml250_10Tec.Ocx dans c:\window...
06/05/2023 à 07:46capucineChanger l'angle d'une image dans un UserFormTu dois copier le controle Ocx dans le répertoire System32 de Windows et lancer le fichier cmd d'enregistrement cité plus haut...
05/05/2023 à 21:23capucineChanger l'angle d'une image dans un UserFormDommage ici les gif animés ne fonctionnent pas donc : Dans VBE Tu agrandis le formulaire Tu verras le contrôle ImageList Tu le sélectionnes Dans les propriétés à gauche tu sélectionne personalisé Un fenêtre s'ouvre et tu choisi Add... Tu sélectionne l'ensemble des images à charger Tu clique sur OK E...
05/05/2023 à 18:36capucineChanger l'angle d'une image dans un UserFormAs-tu ajouter les images dans le contrôle ImageList, comme stipulé, plus haut ...
05/05/2023 à 15:31capucineChanger l'angle d'une image dans un UserFormLe fichier Curseurs.zip ? Je viens de tester c'est bon pour moi, mais pour toi aussi car je vois dans ton post que tu met les images que je t'ai envoyé en fichier compressé 12h c'est une image que j'ai crée, vite fait...
05/05/2023 à 13:53capucineChanger l'angle d'une image dans un UserFormLe contrôle imageList fait pareil en plus simple non ? Dans l'environnement VBE tu agrandis le formulaire tu y verra le contrôle ImageList, un clic sur personnalisé dans les propriétés et là tu pourras charger les photos que tu veux, de plus il accepte tous les format images , et gère la transparenc...
03/05/2023 à 22:17capucineChanger l'angle d'une image dans un UserFormOn va y arriver colles les images dans le même répertoire Il faudra peut-être les recharger dans l'ImageList...
03/05/2023 à 21:41capucineChanger l'angle d'une image dans un UserFormJe viens de me rendre compte que j'ai sauvegardé le fichier en xls...
03/05/2023 à 21:04capucineChanger l'angle d'une image dans un UserFormTu vas dans l'environnement VBE et tu lances UserForm1...
03/05/2023 à 17:48capucineChanger l'angle d'une image dans un UserFormSalut ImageList est un contrôle invisible, il te permet de stocker les images du mouvement du bouton. Tu crée le nombre d'image voulu à différente position 0, 15, 30, 45, par exemple Ensuite sur clic tu sélectionnes l'image du bouton par son index un petit exemple en pièce jointe Bien lire la doc Pe...
03/05/2023 à 09:23Joco7915 Beug sur code VBA copier/collerHum, donc double clic, la cellule s'envole, reste en suspend au dessus de D1:R15 en attendant de savoir ou elle devra se poser. Des cellules divinatoires, ça existe cela sous Excel ...
02/05/2023 à 20:30Joco7915 Beug sur code VBA copier/collerSi j'ai bien compris le double clic se fait sur la cellule qui doit recevoir les données. Par contre ce que je ne comprends pas H17:N17 cela fait 7 cellules à copier dans D1:R15 à copier individuellement alors là...
02/05/2023 à 19:41capucineChanger l'angle d'une image dans un UserFormJe ne vois pas de déclaration pour du 64bit le problème avec la fonction IIDFromString vient peut-être de là. Notre bon vieux ImageList remit aux gouts du jour ne ferait-il pas l'affaire ? et pas d'Apis comme ça ImageList OCX | 10Tec...
01/05/2023 à 20:56Baldwin46Créer une majusculeTu comprends bien que tu ne peux pas avoir, et une formule, et une zone de saisie dans la même cellule. si tu entre une valeur tu effaces la formule. En passant par VBA tu à la possibilité de le faire...
01/05/2023 à 19:59GalérienCopier graphique en .png dans le presse papierPeut-être en regardant de ce coté : Chart.CopyPicture, méthode (Excel) | Microsoft Learn...
01/05/2023 à 19:19JulieRose32 Comment utiliser un tableau dynamique verrouillé ?Plusieurs solution s'offrent à toi : Utilisation de la propriété Protect de la feuille Avant les modification WorkSheets("Feuil1").UnProtect '... Exécution code Après les modification WorkSheets("Feuil1").Protect Avec les arguments de la propriété Protect A l'ouverture du classeur WorkSheets("Feuil1...
30/04/2023 à 22:38Le Drosophile VBA - Utiliser la fonction Replace + "*" dans un ArrayLa fonction Range.Replace ne s'applique qu'aux plages. La fonction VBA Replace ne fonctionne pas sur les tableaux. Tu dois passer par la fonction Application.Substitute. Mais cette fonction ne prends pas en Charge les Opérateurs * et ? et, elle est sensible à la Casse. Peut-être en combinant Substit...
30/04/2023 à 13:30THIERRYH Incrementation et archivage factureC'est pour son bien, j'ai eu dans mon entourage, un copain qui est tombé sur un contrôle du Fisc. Et quand on te réclame 40 000€ et des brouettes parce que tu à mal rempli des papiers. ou que d'autres ne sont pas conformes (Pour exemple : attestation 20%) ça fait mal au c...l. C'était juste pour lui...
29/04/2023 à 17:13joh Ré-assigner une macro a un boutonOk tu teste des codes trouvés sur des forums. Mais tu lances ses procédure depuis quel classeur ? car ce type de programmation : For Each Shp In ActiveSheet.Shapes peut ne pas faire la chose demandée selon depuis quel classeur elle est lancée. Donc un conseil renseignes le nom du classeur et de la f...
29/04/2023 à 15:00THIERRYH Incrementation et archivage factureJe dis ça, je ne dis rien, La conservation des factures et documents pour une société et régis par des lois. On ne doit pas faire n'importe quoi sous peine de le regretter lors d'un contrôle. Un peu de lecture : BOI-CF-COM-10-10-30-10 - CF - Droit de communication et procédures de recherche et de lu...
29/04/2023 à 03:06Le Drosophile [VBA] - Erreur "Path does not exists" - Chemin pour enregistrementJe demande aux gens de ne pas copier les codes bêtement, et c'est justement ce que j'ai fais sans trop regarder. Tu dois ajouter un "\" à la fin du chemin sinon plantage...
28/04/2023 à 23:41Le Drosophile [VBA] - Erreur "Path does not exists" - Chemin pour enregistrementPeux-tu nous dire sur quelle ligne tu as l'erreur, et quel type d'erreur, car sans infos supplémentaires cela va être difficile de t'aider...
28/04/2023 à 11:55Le Drosophile [VBA] - Erreur "Path does not exists" - Chemin pour enregistrementSalut si ce n'est que le chemin qui t'intéresse alors ceci devrais faire l'affaire. Pour ma part je n'ai pas bien compris ce que contient Sheets("Options").Cells(54, 1). (qui serait d'ailleur plus lisible avec un champ nommé) J'ai passé la sub choix_dossier en Fonction, si elle est dans le même modu...
27/04/2023 à 21:35BUDGETSVariable objet ou variable de bloc with non définieRe, Toutes les infos sur le site de Crosoft : Synthèse des types de données | Microsoft Learn...
27/04/2023 à 20:58BUDGETSVariable objet ou variable de bloc with non définieRe, Grosso-modo oui, mais pas en public au niveau de la fonction tri...