Contributeur

Inscrit le :14/10/2014
Dernière activité :Il y a 12 minutes
Version d'Excel :Excel 2021 Fr
Emploi :Contributeur
Lieu :Bordeaux
Biographie :Je vous propose un peu plus d'une cinquantaine d'applications et de jeux (54), il y en a pour tous les goûts. A vous de les apprécier ou pas ! lol
Messages
13'650
Votes
2'107
Fichiers
54
Téléchargements
777'182
Fichiers ExcelFichiers Google SheetsSujetsMessagesStatistiquesVotes reçus

Messages postés par LouReeD - page 30

DateAuteur du sujetSujetExtrait du message
30/05/2024 à 20:57arsene6 Cellules vides non "neutres"Merci de votre retour ! @ bientôt LouReeD...
30/05/2024 à 20:55Seiya1 Liste déroulante multi-selectionBelle soirée @ vous ! @ bientôt LouReeD...
30/05/2024 à 20:53Manu31 Temps d'exécution d'une macro démesuréJe sais je sais... je suis rapide ! @ bientôt LouReeD...
30/05/2024 à 20:52xxmedxx Afficher plusieurs lignes selon valeur inputbox dans msgboxMerci de votre retour et désolé pour le retard ! @ bientôt LouReeD...
30/05/2024 à 20:51galiax Formule avec NB.SI.ENSMerci de votre retour ! @ bientôt LouReeD...
30/05/2024 à 20:48Curulis Formule EQUIV dynamiqueRe bonsoir, vous devriez retirer vos lunettes, la colonne je la voie plus saumon que jaune... mais ce doit être une question de réglage (icône homme qui rit) Formule en G3 si j'ai bien compris : =PETITE.VALEUR(SI(Planning!A:A=Data!$C3;LIGNE(Planning!A:A);9^9);1) Alors j'ai pris la colonne entière ma...
30/05/2024 à 19:59Curulis Formule EQUIV dynamiqueJe dis ça parce qu'avec 5206 messages je pensais trouver un fichier... Mais bon vu que les émoticônes sont absent eux aussi... @ bientôt LouReeD...
30/05/2024 à 18:51Manu31 Temps d'exécution d'une macro démesuréMerci de ce retour ! Pour compléter ce que dit saboh12617 , le ScreenUpdating est remis automatique à True lorsque la sub où il a été mis à False se termine, donc la ligne n'est pas nécessaire, ceci est valable également pour le On Error Resume Next, si le "End Sub" de la procédure qui l'a lancé arr...
30/05/2024 à 18:46Manu31 Temps d'exécution d'une macro démesuréA partir du moment où vous mettez du "Cells(R,C) =", Excel détecte le changement de valeur dans la cellule et lance le calcul de la feuille voir du classeur si cette dernière est liée à des formules, essayez de mettre les calcul en manuel afin d'éviter ceci. @ bientôt LouReeD...
30/05/2024 à 17:55galopin01 VBA : Ellipse (et plus si affinité...)Un fichier avec remplissage d'un tableau de données comprenant : - le nom du Shape sur 6 digits - le Left - le Top - l'IDLC correspondant à sa position sur la MAP. - numéro de ligne de la MAP - numéro de colonne de la MAP - IDLC du shape théorique au Nord Ouest (NO) - IDLC du shape théorique au Nord...
30/05/2024 à 16:37galopin01 Module de classe : Déclaration de Shapes sur SheetsLe tableau Data qui regroupe toutes les données des shapes ? Oui par exemple. @ bientôt LouReeD...
30/05/2024 à 13:57Manu31 Temps d'exécution d'une macro démesuréAjoutez ces deux lignes en début de procédure : Puis à la fin de la procédure : @ bientôt LouReeD...
30/05/2024 à 13:54galopin01 Module de classe : Déclaration de Shapes sur SheetsNul besoin de classe vu la demande, lors de la création du modèle : Sh.OnAction = "EventClick", puis une Sub : Ce qui renverra le "chiffre" après "HEX". Le deuxième avantage d'affecter une macro à la forme, c'est qu'on ne peut plus la sélectionner par erreur avec le clic gauche ! @ bientôt LouReeD...
30/05/2024 à 12:29Buraliste Fenêtre lien hypertexte dans un UserFormMerci pour le retour (bien qu'incomplet ) et vos remerciements ! Après pour le boss, je dirais plutôt que je suis fort en puzzle ! Un peu à la façon de scratch (je crois) : des modules de codes ici et là et l'envie, l'idée, la demande de les imbriquer ensemble afin d'arriver à un résultat souhaité....
30/05/2024 à 11:34siccmdlExcel - Calcul de date selon criteres et jours feriesUn essai : @ bientôt LouReeD...
30/05/2024 à 10:19galopin01 VBA : Ellipse (et plus si affinité...)Le code est sympa ! C'est vrai que de calculer les différentes coordonnées du modèle pour faire les test après c'est super ! Je vais travailler sur ce point au niveau de mon code : toujours essayer de mutualiser les codes et d'éviter les répétition de calcul ! Je n'ai toujours pas compris l'histoire...
30/05/2024 à 09:33galopin01 VBA : Ellipse (et plus si affinité...)Bon pour le centrage du texte sur la forme libre : J'ai ajouté "consolas" mais ce n'est peut-être pas la peine... J'ai également ajouté ceci à la création du modèle afin de dissocier les hexagones de la taille des cellules, sait-on jamais : @ bientôt LouReeD...
30/05/2024 à 08:59galopin01 VBA : Ellipse (et plus si affinité...)Pour répondre à BsAlv, l'hexagone proposé par Excel n'est pas "régulier" lorsque vous appliquez une rotation à la forme elle ne se superpose pas (au 6ième de tour près) à une forme de taille identique. J'ai fais cette expérience : création d'un hexagone régulier, ce qui me donne un shape avec des di...
30/05/2024 à 08:40galopin01 VBA : Ellipse (et plus si affinité...)Centrage horizontal et vertical : @ bientôt LouReeD...
29/05/2024 à 23:39galopin01 VBA : Ellipse (et plus si affinité...)Bizarrement le centrage sur une forme créée ne marche pas... ou bien je suis passé à côté d'un truc... @ bientôt LouReeD...
29/05/2024 à 21:49galopin01 VBA : Ellipse (et plus si affinité...)Symétrie ? C'est la première fois que je vois ce mot, non ? BsAlv ? Sinon je calculai un centrage en horizontal, juste à faire la même chose en vertical ce qui engendrera une symétrie... @ bientôt LouReeD...
29/05/2024 à 21:43Buraliste Fenêtre lien hypertexte dans un UserFormUn essai : reste à bien choisir les évènements : le premier pour la recherche du document, le second pour suivre le lien. Ici c'est le "enter" du textbox si celui-ci est vide, ensuite le double clic pour suivre le lien : Le fichier : @ bientôt LouReeD...
29/05/2024 à 21:29siccmdlExcel - Calcul de date selon criteres et jours feriesEn utilisant une de mes applications voilà ce que cela peut donner : Supprimer par LouReeD afin de ne pas interférer avec les compteurs de téléchargements de ses applications. @ bientôt LouReeD...
29/05/2024 à 21:28galopin01 VBA : Ellipse (et plus si affinité...)Pour l'espèce de TAG, vous avez ceci : Sh.AlternativeText = 25 ' la sorte de Tag comprenant une valeur, le hic c'est du texte...mais *1 cela devient numérique. @ bientôt LouReeD...
29/05/2024 à 20:50galopin01 VBA : Ellipse (et plus si affinité...)Et bien voilà, avec la formule de BsAlv et ma "façon de faire" je me retrouve avec un fichier sans hexagone en dehors de l'ellipse, ni même sur le trait de cette dernière. Possibilité de choisir la taille du shape et Hop ! Merci à vous deux ! Galopin01 quand vous voulez pour d'autre remu méninges !...
29/05/2024 à 20:15galopin01 VBA : Ellipse (et plus si affinité...)BsAlv : en effet je crée ma propre forme et comme cela elle est régulière, la forme d'Excel me paraît toujours déformée... et pour savoir s'il faut la créer je vais partir sur la vérification que les 6 sommets sont bien sur l'ellipse ou plutôt l'inverse interdire sa création si au moins 1 sommet est...
29/05/2024 à 13:44McCallCliquer sur une image pour afficher une feuille et en masquer d'autresMerci de votre retour et de vos remerciements ! Reste le retour de McCall... @ bientôt LouReeD...
29/05/2024 à 12:42galopin01 VBA : Ellipse (et plus si affinité...)Moi j'attends de voir votre fichier ! @ bientôt LouReeD...
29/05/2024 à 08:18McCallCliquer sur une image pour afficher une feuille et en masquer d'autresJe nomme les boutons comme la feuille qu'ils ciblent. Ensuite j'affecte la macro commune à chaque bouton. Lors du clic sur un bouton, la macro est lancée. Grâce à l' instruction Application.Caller on sait "qui" à demandé à la lancer, cette instruction renvoi le nom du bouton. Comme plus haut on lui...
28/05/2024 à 21:48galopin01 VBA : Ellipse (et plus si affinité...)On ne lâche rien ! Le fichier avec des hexagones réguliers, créés seulement si nécessaire, "dans le bon sens" pour le texte et avec du texte ! Toujours sur un cercle, mais avec la formule de BsAlv je devrait pouvoir le faire sur une ellipse ! @ bientôt LouReeD...
28/05/2024 à 21:25galopin01 VBA : Ellipse (et plus si affinité...)BsAlv, pour le fichier je parlais à galopin01 ! Mais nos réponses se sont croisées mais comme souvent c'est vous le plus rapide ! Petit code pour faire un hexagone régulier dans le bon sens sans rotation : Mais mon problème c'est le texte, qui se trouve sans artifice dans le bon sens mais pas au bon...
28/05/2024 à 19:13McCallCliquer sur une image pour afficher une feuille et en masquer d'autresUn essai : @ bientôt LouReeD...
28/05/2024 à 19:04galopin01 VBA : Ellipse (et plus si affinité...)Merci pour le partage de l'image ! Comme on le dit souvent : un fichier est bien mieux en s'assurant de le rendre anonyme ! @ bientôt LouReeD...
28/05/2024 à 08:27galopin01 VBA : Ellipse (et plus si affinité...)La construction mathématique pour la mise en place des shapes plutôt qu'à la main, et ensuite création du tableau des coordonnées de chaque shape. Bon je suis ravi que cela puisse vous faire avancer dans votre projet. Pour ce qui est du démineur, on m'a construit un code pour ma version qui même s'i...
27/05/2024 à 23:43galopin01 VBA : Ellipse (et plus si affinité...)Je n'avais pas vu qu'il fallait faire une rotation de 90° de la shape, du coup nouveau fichier qui prend en compte cette subtilité : Reste plus qu'à trouver les conditions de nettoyage pour une ellipse ! @ bientôt LouReeD...
27/05/2024 à 21:26galopin01 VBA : Ellipse (et plus si affinité...)Je reviens avec "mon code"... Bon j'y suis pour un cercle, je ne suis pas loin de l'ellipse ! Le code : Le fichier : Pour se rapprocher de vos 798 hexagones il vous faut mettre : Cela va en créer 790 dans le cercle. @ bientôt LouReeD...
26/05/2024 à 23:43galopin01 VBA : Ellipse (et plus si affinité...)Trouvez les coordonnées des sommets de l'hexagone et testez les avec le deuxième code et vous saurez si ce sommet est sur l'ellipse ou pas, non ? @ bientôt LouReeD...
26/05/2024 à 21:41Actarus57 Tableau copié plusieurs feuillesTableau structurés sur chaque feuille, une surveillance événementielle sur ces dernières, et lorsque cela touche un des tableaux ou une des cellules juste en dessous alors un code VBA ajoutera une ligne à chaque tableau avec les trois même données en ID, nom et prénom. Ou un truc dans le genre, bon...
26/05/2024 à 21:33galopin01 VBA : Ellipse (et plus si affinité...)En retravaillant les codes fournis précédemment : Je boucle sur les valeurs du tableau, je fais les trois tests, disons plutôt la série des trois mais cela s'arrête à la première condition vrai trouvée. Si dedans = True, si dehors = False, et si en "coupe" sur le trait du shape = True. J'ai pris la...
26/05/2024 à 18:35galopin01 VBA : Ellipse (et plus si affinité...)En supposant un shape de taille 1 de forme cercle (petit cercle) , que l'on déplace à chaque coordonnée du tableau, il suffit alors de faire les trois tests afin de savoir s'il se trouve sur l'ellipse (le grand cercle). Pour vous, trouver sur le net : Le fichier dont sont tirés ces codes : @ bientôt...
25/05/2024 à 22:36Seiya1 Liste déroulante multi-selectionEn désactivant plusieurs lignes et en restructurant le code : @ bientôt LouReeD...
24/05/2024 à 21:00guigolMélange de somme.si et de rechercheV (et peut etre de somme.si.ensUne formule : =SOMME( RECHERCHEV(C$3;TabPro;2;0)*SI(ESTNUM(C4);C4;SI(C4<>"";1;0)); RECHERCHEV(D$3;TabPro;2;0)*SI(ESTNUM(D4);D4;SI(D4<>"";1;0)); RECHERCHEV(E$3;TabPro;2;0)*SI(ESTNUM(E4);E4;SI(E4<>"";1;0)) ) Mais au vu du grand nombre de client / produits ce sera viable avec le PQ de...
23/05/2024 à 22:21galiax Formule avec NB.SI.ENSAvec DROITE on gagne un peu de caractère encore, comme on sait qu'il y a 2 caractères à gauche à ne pas prendre : =SOMMEPROD((DROITE(INDIRECT($E$1);NBCAR(INDIRECT($E$1))-2)*1>=1)*(DROITE(INDIRECT($E$1);NBCAR(INDIRECT($E$1))-2)*1<=4)*(INDIRECT($H$1)=$D4)) @ bientôt LouReeD...
23/05/2024 à 21:32galiax Formule avec NB.SI.ENSJe supprime VALEURNOMBRE en multipliant STXT par 1, je mutualise la recherche du nombre de ligne de la feuille source ainsi que son nom en cellule E1 et H1 (comme cela vous gardez la forme de l'onglet suite à l'extraction, ce que je n'avais pas compris...), ce qui fait qu'avec les INDIRECT introduit...
23/05/2024 à 20:34galiax Formule avec NB.SI.ENSDoux Rêveur bonjour, un essai pour la première question en E2 en ayant supprimé les "espaces" dans le nom de la feuille ! Ce n'est pas beau dans les formules ! Il faut ajouter des apostrophes ! Donc formule en E4 : =SOMMEPROD((VALEURNOMBRE(STXT(Colis_non_comptés!B2:B414;TROUVE("-";Colis_non_comptés...
22/05/2024 à 20:44arsene6 Cellules vides non "neutres"Quel type d'addition faites vous ? Si c'est =cellule1 + cellule2 + cellule3 alors un texte oublié provoque l'erreur, mais si vous faites =SOMME(cellule;cellule;cellule) la somme se fera malgré les valeurs textes. @ bientôt LouReeD...
22/05/2024 à 12:20xxmedxxBoucle de recherche sur deux colonnesAvec Find, regardez du côté de FindNext. @ bientôt LouReeD...
21/05/2024 à 10:25ExcelMu Numéro d'index pour une plage de celluleMerci de votre retour ! @ bientôt LouReeD...
21/05/2024 à 10:24robertduval Déporter une entréeMerci pour ce retour ! @ bientôt LouReeD...
20/05/2024 à 21:59Konan255Calcul de sommeInscrivez la formule par macro alors... Lors d'un ajout d'un montant et d'une date, par macro point de mise à jour si ce n'est en mettant une surveillance évènementielle, mais pourquoi donc ? @ bientôt LouReeD...