| Date | Auteur du sujet | Sujet | Extrait du message |
|---|
| 29/05/2024 à 21:28 | galopin01 | 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:50 | galopin01 | 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:15 | galopin01 | 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:44 | McCall | Cliquer sur une image pour afficher une feuille et en masquer d'autres | Merci de votre retour et de vos remerciements ! Reste le retour de McCall... @ bientôt LouReeD... |
| 29/05/2024 à 12:42 | galopin01 | VBA : Ellipse (et plus si affinité...) | Moi j'attends de voir votre fichier ! @ bientôt LouReeD... |
| 29/05/2024 à 08:18 | McCall | Cliquer sur une image pour afficher une feuille et en masquer d'autres | Je 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:48 | galopin01 | 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:25 | galopin01 | 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:13 | McCall | Cliquer sur une image pour afficher une feuille et en masquer d'autres | Un essai : @ bientôt LouReeD... |
| 28/05/2024 à 19:04 | galopin01 | 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:27 | galopin01 | 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:43 | galopin01 | 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:26 | galopin01 | 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:43 | galopin01 | 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:41 | Actarus57 | Tableau copié plusieurs feuilles | Tableau 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:33 | galopin01 | 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:35 | galopin01 | 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:36 | Seiya1 | Liste déroulante multi-selection | En désactivant plusieurs lignes et en restructurant le code : @ bientôt LouReeD... |
| 24/05/2024 à 21:00 | guigol | Mélange de somme.si et de rechercheV (et peut etre de somme.si.ens | Une 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:21 | galiax | Formule avec NB.SI.ENS | Avec 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:32 | galiax | Formule avec NB.SI.ENS | Je 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:34 | galiax | Formule avec NB.SI.ENS | Doux 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:44 | arsene6 | 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:20 | xxmedxx | Boucle de recherche sur deux colonnes | Avec Find, regardez du côté de FindNext. @ bientôt LouReeD... |
| 21/05/2024 à 10:25 | ExcelMu | Numéro d'index pour une plage de cellule | Merci de votre retour ! @ bientôt LouReeD... |
| 21/05/2024 à 10:24 | robertduval | Déporter une entrée | Merci pour ce retour ! @ bientôt LouReeD... |
| 20/05/2024 à 21:59 | Konan255 | Calcul de somme | Inscrivez 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... |
| 20/05/2024 à 21:02 | Konan255 | Calcul de somme | Un essai : =SOMMEPROD((Tableau1[@[versment1]:[date3]])*(MOD(COLONNE(Tableau1[@[versment1]:[date3]]);2)=0)) Je teste si la colonne est paire (en effet la première somme est en colonne paire, et après je suppose que la structure est la même), si oui =1 s... |
| 20/05/2024 à 20:53 | DSL | Incrementer dates | Et bien si cela vous convient, vous me voyez ravis ! Merci de votre retour et remerciement ! @ bientôt LouReeD... |
| 20/05/2024 à 20:27 | DSL | Incrementer dates | Un essai : avec la formule en C4 : =SI(D4<>"";MAX(C$3:C3)+1;"") Mais il se passera un "recalage" si sur une cellule vide en colonne D vous inscrivez une donnée. @ bientôt LouReeD... |
| 20/05/2024 à 20:00 | DSL | Incrementer dates | A mon niveau il faudrait plus d'explication car même avec le fichier je vous avoue ne pas saisir le problème... @ bientôt LouReeD... |
| 20/05/2024 à 19:58 | Trucky93 | Supprimer les lignes à blanc d'une listbox | N'ayant pas compris le fonctionnement du besoin je ne puis vous aider plus pour le moment. Bon courage. @ bientôt LouReeD... |
| 20/05/2024 à 16:30 | Trucky93 | Supprimer les lignes à blanc d'une listbox | Voilà : @ bientôt LouReeD... |
| 20/05/2024 à 16:00 | MIO | Formule pour copier et coller une donnée dans une cellule en texte | Si c'est pour garder en mémoire une valeur issue de formules qui elles-mêmes fonction de cellules dont les valeurs changent, alors nul besoin de transformer la donnée en texte, il vous faut l'écrire "en dur", donc passer par VBA. Il faudra seulement savoir ce qui déclenchera cette "mise à jour" : un... |
| 20/05/2024 à 15:56 | Trucky93 | Supprimer les lignes à blanc d'une listbox | Après avoir mis en commentaire votre double boucle i et j, je me retrouve avec USF sans lignes blanche allant de 0 à 14 avec seulement "métier". Comment cela doit-il fonctionner ? @ bientôt LouReeD... |
| 19/05/2024 à 21:16 | cousinhub | Désactivation macro à l'ouverture | Juste avant d'ouvrir ce fichier, pourquoi ne pas aller dans le centre de confidentialité afin d'augmenter la sécurité en demandant de ne pas lancer les macros ou bien de laisser le choix avec le niveau suivant ? Cela ne marche t il pas ? Si cela marche alors il est vrai que la manipulation est "pomp... |
| 18/05/2024 à 00:12 | robertduval | Déporter une entrée | Une proposition à mettre sur la page de code de la feuille "Stats" : Votre problème venait que le code de tirage est lié à la détection de "Change" de la cellule "O2" de la feuille "Tirages", mais ceci ne fonctionne pas avec les formules, donc on détecte le changement de valeur sur "Stats" et on va... |
| 18/05/2024 à 00:04 | railman | Imbrication de fonctions SI et cherche......qui me rend fou | Avec TROUVE(texte cherché; dans texte), cela renvoie une valeur numérique si vrai = position du premier caractère du texte cherché. L'instruction ESTNUM afin d'éviter les erreurs si le texte n'est pas trouvé. Un si pour la condition. =SI(ESTNUM(TROUVE("TN";A1));"oui";"zute") Voilà, à vérifier le fon... |
| 17/05/2024 à 20:59 | ExcelMu | Numéro d'index pour une plage de cellule | Vous pouvez écrire : ActiveSheet.Cells(1,1).Resize(X,3) Un petit fichier : Pour les variables lignes il vaut mieux les dimensionner en Long car le Integer est limité à environ 32000 ! @ bientôt LouReeD... |
| 17/05/2024 à 18:47 | ExcelMu | Numéro d'index pour une plage de cellule | En VBA avec votre exemple "A1 : C3" : ActiveSheet.Range(Cells(1, 1), Cells(3, 3)) ou ActiveSheet.Cells(1,1).Resize(3,3) @ bientôt LouReeD... |
| 16/05/2024 à 22:21 | ben25000 | Petite VBA message d'accueil | Merci pour votre retour et remerciement ! @ bientôt LouReeD... |
| 16/05/2024 à 22:20 | xxmedxx | Afficher plusieurs lignes selon valeur inputbox dans msgbox | Un essai avec VBA et une boucle "simple", vous devriez pouvoir la modifier si besoin : @ bientôt LouReeD... |
| 16/05/2024 à 21:49 | FBidee | Liste déroulante par selection de cellule | Bon courage à vous ! @ bientôt LouReeD... |
| 16/05/2024 à 21:47 | Mgxcel59 | Ajustement colonnes | Vos feuilles n'ont pas la même structure ! Il vous faut adapter les numéros de colonnes de début de boucle et de fin de boucle ! For i = 3 To 15 Step 3 => ici le 3 correspond à la colonne C et le 15 à la colonne O ce qui est vrai pour la première partie du tableau de la feuille "jeunesse", et pou... |
| 16/05/2024 à 21:40 | Alexlaporte | Calculer nbre cellules remplies avec une condition | Merci de vos remerciements ! Un "coucou" à BeGood dont je n'avez pas vu le message @ bientôt LouReeD... |
| 16/05/2024 à 18:51 | Alexlaporte | Calculer nbre cellules remplies avec une condition | NB.SI.ENS peut-être, ce qui permet de compter le nombre de fois que les conditions multiples sont vrais par exemple : NB.SI.ENS(E2;"Individuel";F2;"><") @ bientôt LouReeD... |
| 16/05/2024 à 12:07 | Mgxcel59 | Ajustement colonnes | Regardez du côté de .Autofit des colonnes. @ bientôt LouReeD... |
| 16/05/2024 à 12:05 | FBidee | Liste déroulante par selection de cellule | Un copier/déplacer feuille en créant une copie ne suffirait il pas à se retrouver avec une feuille sans bug ? @ bientôt LouReeD... |
| 15/05/2024 à 21:52 | FBidee | Liste déroulante par selection de cellule | Je viens de tester le fichier de boss_68 et il fonctionne chez moi... mais le votre je viens de le retélécharger, ne fonctionne pas... @ bientôt LouReeD... |
| 15/05/2024 à 21:11 | FBidee | Liste déroulante par selection de cellule | Votre fichier en retour : Sur le votre chez moi cela ne marchait pas. Suppression des deux colonnes inutiles sur client et site = ne marche toujours pas. Suppression de votre feuille, création d'une nouvelle, sans "triple colonne", et deux tests : - le premier avec une référence "directe" aux plages... |