Contributeur

Inscrit le :14/10/2014
Dernière activité :Lundi à 21:26
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'622
Votes
2'107
Fichiers
54
Téléchargements
774'057
Fichiers ExcelFichiers Google SheetsSujetsMessagesStatistiquesVotes reçus

Messages postés par LouReeD - page 114

DateAuteur du sujetSujetExtrait du message
22/02/2021 à 10:42Blandine60220 Si plusieurs celulles pleines alors videMerci @ vous pour vos remerciements et votre patience ! @ bientôt LouReeD...
22/02/2021 à 09:48Blandine60220 Si plusieurs celulles pleines alors videJe vais trop vite ! Dans votre cas ce sont trois colonne avec date sans formule donc un "simple" NBVAL(P10:Q10)=3 alors N10=Vide Ce qui donne : =SI(NBVAL(P10:R10)=3;"";(SI(H10="";"";SI(NBVAL(H10:L10);MAX(H10:L10)+30;H10+30)))) @ bientôt LouReeD...
22/02/2021 à 09:44Blandine60220 Si plusieurs celulles pleines alors vide@ bientôt LouReeD...
22/02/2021 à 09:38Blandine60220 Si plusieurs celulles pleines alors videNB.SI(P10:R10;"><")=3 => si les trois cellules sont différentes de rien (ceci ne prend pas en compte une cellule vide par formule, le top quoi) @ bientôt LouReeD...
22/02/2021 à 08:34steph7609 Textbox vers liste déroulanteCode à modifier pour ne faire apparaître dans la ComboBox les seules lignes "non vides" avec un "meilleur départ" pour "i" avec le 1 au lieu du 0 ! : @ bientôt LouReeD...
22/02/2021 à 08:29steph7609 Textbox vers liste déroulanteUne solution en "direct" par le changement des TextBox. Le test des TextBox vide n'est pas intégré, donc si tout est vide la ComboBox aura bien 4 lignes vides... Mais ce n'est pas grand chose à ajouter je pense. @ bientôt LouReeD...
21/02/2021 à 00:57Cassandra Probleme "Sommeprod" et de combinaison "decaler(recherche"A cause de nous !?! Venez plus souvent pour tenter d'aider des demandeurs et vous finirez par avoir un niveau au dessus de la moyenne comme moi tout en étant bien loin des autres intervenants du site ! Merci pour vos remerciements ! @ bientôt LouReeD...
21/02/2021 à 00:44BeodenAgrandir automatiquement un formulaireUn autre exemple : @ bientôt LouReeD...
21/02/2021 à 00:24Sylvain12Ouvrir un fichier géré par protection Pratique Via une MacroEssayez de joindre Sébastien directement par MP par exemple, il est le mieux placé pour répondre à vos interrogations ! @ bientôt LouReeD...
21/02/2021 à 00:18Cassandra Probleme "Sommeprod" et de combinaison "decaler(recherche"Loin de moi cette idée ! Mais une multitude de solution peut avantageusement faire avancer le projet du demandeur... En plus cela me fait travailler les matricielles ! Pour le problème 2, j'ai simplifié du fait que je n'ai pas mis en "variable" la ligne à additionner... =SOMME.SI.ENS(INDIRECT("Journ...
21/02/2021 à 00:06Cassandra Probleme "Sommeprod" et de combinaison "decaler(recherche"Formule pour trouver la dernière saisie : {=INDEX(Journalier!E13:NT13;1;GRANDE.VALEUR(SI((Journalier!E13:NT13<>0)*(ESTNUM(Journalier!E13:NT13));COLONNE(E13:NT13));2)-4)} Une fois qu'on a la colonne alors on trouve la date... {=INDIRECT("Journalier!L4C"&GRANDE.VALEUR(SI((Journalier!E13:NT13&lt...
20/02/2021 à 23:19teddy57000Amélioration d'une formuleJe vous propose une application de suivi de qualification : ICI @ bientôt LouReeD...
20/02/2021 à 22:56starnain Masquer frame dans userform si pas dans la feuille "xxx"Merci @ vous pour les remerciements ! @ bientôt LouReeD...
20/02/2021 à 22:26starnain Masquer frame dans userform si pas dans la feuille "xxx"Ok, désolé, je n'avait pas regardé le fichier... Fichier joint : trois ajouts : les deux premiers juste avant la ligne de code d'affichage du USF "global", le troisième dans le module de classeur "thisworkbook" dans la procédure événementielle "activate" : Lorsqu'une feuille est activée, le code est...
20/02/2021 à 21:57starnain Masquer frame dans userform si pas dans la feuille "xxx"Votre ligne de code "est à l'envers" non ? if Activesheet.name="Planning" then Frame1.Visible = True else Frame1.Visible = False à la place de : Frame1.Visible = True if Activeworksheets is "Planning" else Frame1.Visible = False end if @ bientôt LouReeD...
20/02/2021 à 13:06gimarSomme d'une cellule de plusieurs feuilles - insertion d'une feuilleSi on veut on peut sélectionner une plage, lui donner un nom et enregistrer le tout en xlsX et pas de soucis... Dans votre fichier il y a l'instruction LIRE.CLASSEUR qui est une fonction Excel 4 "macrotique", c'est comme si qu'il y avait un code VBA... Mais après tout on peut bien dire ce que l'on v...
19/02/2021 à 23:15gimarSomme d'une cellule de plusieurs feuilles - insertion d'une feuilleJoyeuxNoël ! Note aussi l'obligation d'enregistrer le fichier en .xlsm même s'il n'y a pas de VBA dedans, à cause d'une plage qu'on est obligé de nommer. Je crois surtout que c'est lié à la fonction Macro Excel 4 – LIRE.CLASSEUR qu'il faut du xlsM, et non pas à la plage nommée... Non ? Ce sont des f...
18/02/2021 à 13:05PierreDCS Petite Macro VBAUne petite orientation : vous donnera le nombre de donnée "répétées" dans une cellule de la colonne H Pour scanner un nombre de ligne inconnu d'un tableau vous avez la fonction Do / Loop à laquelle il faut ajouter une condition de sortie et un incrément de ligne : Attention ! Pas testé ! @ bientôt L...
18/02/2021 à 11:00Simon17Liste déroulante dynamiqueRendons à César ce qui est à César... J'ai juste fais un fichier correspondant à votre demande grâce à une série de formules proposées par un autre intervenant sur un autre sujet, mais désolé pour lui je ne me souvient plus de son pseudo... Merci de vos remerciements. @ bientôt LouReeD...
17/02/2021 à 21:26zar78Comment enchainer des formulaires" Si quelqu’un a une idée pour orienter mes recherches, je suis preneur." : ICI @ bientôt LouReeD...
17/02/2021 à 18:49Simon17Liste déroulante dynamiqueCi joint une solution : Je passe par trois colonnes intermédiaire afin de créer une extraction sans vide, sans doublon et triée par ordre alphabétique. Ensuite les liste de choix sont issue d'une formule DECALER, afin de ne prendre que les données "pleines" de ces colonnes. @ bientôt LouReeD...
17/02/2021 à 18:33vivelesudPresentation VivelesudBienvenu !Maintenant il faut aller sur le forum VBA et Excel, déposé votre fichier et reposer votre question. @ bientôt LouReeD...
17/02/2021 à 18:00deck06 Résulats EXACTS non reconnus dans les cellulesMerci de vos remerciements ! Mais je n'ai donné aucune solution, seulement permettre de voir pourquoi le code ne fonctionnait apparemment pas comme il le fallait ! @ bientôt LouReeD...
17/02/2021 à 14:01S_Wil21Erreur d'exécution 1004Merci de vos remerciements ! @ bientôt LouReeD...
17/02/2021 à 10:15LouReeDRétro planning et planning de GANTTSuite à deux téléchargements, je me vois obligé de le supprimer... Si ce n'est vous (Valérie Morin) qui les avait téléchargé, faites moi signe @ bientôt LouReeD...
17/02/2021 à 10:13S_Wil21Erreur d'exécution 1004Pourquoi mélanger les Range et les Cells ? Range("B13") = Cells(13,2) Donc je mettrais : If Worksheets("Lal").Cells(p, 14).Value <> Worksheets(Nom_F).Cells(p + 12, 10).Value Then @ bientôt LouReeD...
17/02/2021 à 09:47univers1405Protection fichier ExcelJ'ai eu ce cas de figure dans le "passé" : je travaillais sur le fichier "Source" "le vrai, et les "autres" consultaient ses données. Pour éviter toutes modifications volontaires ou involontaires sur le fichier source, j'ai mis en place un code VBA qui faisait un enregistrement sur le réseau lors de...
17/02/2021 à 09:38feirouz Substitue en VBA ExcelUne proposition : @ bientôt LouReeD Edit : bonjour M12 ! Voilà, à ne pas rafraichir les écrans.....
17/02/2021 à 09:34deck06 Résulats EXACTS non reconnus dans les cellulesDans votre fichier, mettez le format des cellules L91 et L92 en décimal avec 4 chiffres derrière la virgule. Faites de même avec les cellules de la plage K98:M100. Voyez le résultat... En effet la cellule L100 reste en rouge car elle a bien une valeur supérieure à 6.9800 avec 6.9825 ! Le code foncti...
14/02/2021 à 14:20nando64 Deplacer des donnéesEtrange, mais il est vrai que je ne maitrise pas les filtres et compagnie en VBA ! Pour cela je passe toujours par l'enregistreur... Essayez de remplacer Add2 par Add ... @ bientôt LouReeD...
14/02/2021 à 00:10nando64 Deplacer des donnéesUne autre proposition par l'ajout d'un tableau structuré sur la feuille 2 et suppression des lignes transférées : le fichier : @ bientôt LouReeD...
12/02/2021 à 21:38LouReeDRétro planning et planning de GANTTMerci de l'intérêt que vous portez à l'application! le fichier corrigé, enfin j'espère : Effacé par LouReeD Attention ! Pour l'ajout de ligne il faut bien prendre comme "modèle" une ligne entière du tableau, c'est à dire il faut cliquer gauche sur le numéro d'entête de ligne de la feuille Excel. Si...
12/02/2021 à 11:42Kains1 Message PopUp en fonction de la date et du statut du dossierUNe idée : Rajouter à cette ligne une condition sur le statu de l'obsolescence en colonne I : If CDate(cl.Value) < Date + 31 And CDate(cl.Value) > Date And cl.OffSet(,nombre de colonne vers la droite qui sépare cl de la colonne I) = "En cours" Then Vous aurez compris que si cl est en colonne B...
12/02/2021 à 11:37Nikolas2021[Excel-2016-FR] Plusieurs menus déroulant dépendant sur deux ongletsUne solution excellente téléchargeable sur ce site : ICI Le code est accessible et il est simple de l'adapter, cerise sur le gâteau je crois que ce n'est pas limité à 3 ! @ bientôt LouReeD...
11/02/2021 à 22:41BastoufAutomatisations de procédures aléatoiresJ'ai eu le même problème, et il se trouve que le fait d'en discuter avec le "prestataire" il en est sortie qu'il ne connaissait pas les "opérations" à suivre suite à son envoie, et lorsqu'il a été au courant, le fichier est devenu stable car cela ne le "perturber" pas plus de prendre soins des donné...
10/02/2021 à 22:02mellepei Aide formules ExcelMerci @ vous pour vos remerciements ! @ bientôt LouReeD...
10/02/2021 à 21:59EricR Masquer/activer jours 28, 29, 30 et 31 en fct du mois ds une plage cellulesUne proposition qui laisse les cellules vides, première formule à mettre en J36 : =SI(MOIS($J$35+1)=MOIS($J$35);$J35+1;"") puis en J39, mettre la même formule en remplaçant le "+1" par +2 et la suivante par "+3" La formule teste si l'on est bien sur le même mois. @ bientôt LouReeD...
10/02/2021 à 21:50mellepei Aide formules ExcelLe dommage, c'est que cette date de premier contact, passera au "rouge" même s'il a eu lieu, donc les conditions de rouge devraient être en fonction de la suite des dates de suivi du dossier... @ bientôt LouReeD...
10/02/2021 à 21:48adebaEffectuer une boucle de soustraction en fonction de plusieurs variablesN'y a t il pas des guillemets en trop sur cette ligne : If Cells(S, 10) = "0" Then Car là le test se fait sur une valeur 0 mais alphanumérique, c'est à dire du texte... Ne faut-il pas mettre : If Cells(S, 10) = 0 Then Et dans vos explication le : j14 - i"ligne en cours" est fait pour un j=1 hors le...
10/02/2021 à 21:42mellepei Aide formules ExcelVotre fichier en retour J'ai mis votre plage de donnée sous format d'un tableau structuré sous Excel, comme cela à l'ajout de données, les mise en formes et formules se copieront automatiquement. Pour la mise en couleur je n'ai pas saisie car vous parlez de supérieur et d'inférieur mais par rapport...
10/02/2021 à 21:26yannick127Trouver le nom d'une valeur (référence)Formule en D12 à tirer vers le bas, qui prend en compte les valeurs en colonne C : =INDEX($A$5:A$9;SOMMEPROD(($C$5:$F$9=$C12)*LIGNE($C$5:$F$9))-4)&"-"&INDEX($B$4:$F$4;SOMMEPROD(($C$5:$F$9=$C12)*(COLONNE($C$5:$F$9)-1))) Le -4 et le -1 seront à adapter si la position de la matrice de recherche venait...
10/02/2021 à 18:58benoist Inverser un tableauVous avez ajouté un nom en deuxième colonne, hors le test de ligne "pleine" est fait sur la première... Changez le "B" de : If Range("B" & i).Value <> "" Then nbligne = nbligne + 1 par la lettre de colonne adéquate pour faire le test de ligne pleine, dans votre fichier envoyé la colonne C : If...
10/02/2021 à 18:19Raph873Remplir un formulaire pour ajouter une nouvelle ligne dans un tableauUne petite fonction trouvée sur le net, ce qui permet de faire le test et de supprimer le filtre éventuel : @ bientôt LouReeD...
10/02/2021 à 18:12benoist Inverser un tableauSi je peux, en modifiant le code de pijaku : Peut-être y a t il plus rapide, comme utiliser UsedRange pour déterminer le nombre de ligne "utiles" du premier tableau, ou bien utiliser des tableaux structurés qui s'adaptent à la taille des données. @ bientôt LouReeD...
10/02/2021 à 17:47Sky31 Formule pour vérifier l'accomplissement des des tâches - projet scolaireMerci pour le fichier ! En D2 une solution capilotractée : =SI(ET(SOMMEPROD((A$2:A$18="Rex")*(B$2:B$18=B2))>0;SOMMEPROD((A$2:A$18<>"")*(B$2:B$18=B2))>1);"OK";"Incomplétude") On vérifie la double condition : Et si "Rex" et si Nombre de chose faites supérieure à 1 (donc Rex + autre chose)...
10/02/2021 à 17:38Sky31 Formule pour vérifier l'accomplissement des des tâches - projet scolaireAlors là je dis bravo ! JoyeuxNoël ! Vous gagnez en humour de jour en jour, où se trouve le pouce bleu ? @ bientôt LouReeD...
10/02/2021 à 17:36guy123456 Optimisation et imagesDans les options Excel, liée au classeur actuel ou à l'application (il faut voir) il y a celle qui concerne les compressions d'images. Ceci veut dire qu'Excel nativement est capable de compresser les images pour un gain de place et ce en fonction de l'information donnée dans les options. Cela permet...
09/02/2021 à 23:51Oum Format cellule - Date / après conversion@ bientôt LouReeD...
09/02/2021 à 22:24Oum Format cellule - Date / après conversionAvec une signature (ou carte de visite) comme celle-ci : "VBA m'éclate, les formules m'ennuient ! Je n'y peux rien c'est comme ça..." Et voir une solution par formule ! Vous êtes sur le bon chemin ThauThème ! @ bientôt LouReeD...
09/02/2021 à 22:17Joco7915Pour les organisateurs de tournoi de pétanqueAprès avoir enregistrer 8 équipes, je me retrouve dans la feuille "Poules" avec une équipe qui reprend le nom de l'entête de colonne d'inscription : "Nom des équipes"... @ bientôt LouReeD...