A

Membre impliqué

Inscrit le :27/02/2019
Dernière activité :17/12/2025 à 18:36
Version d'Excel :2007
Messages
1'326
Votes
324
Fichiers
0
Téléchargements
0
SujetsMessagesStatistiquesVotes reçus

Messages postés par AlgoPlus - page 10

DateAuteur du sujetSujetExtrait du message
25/11/2020 à 16:38Tony0203 Lister des numéros libreUne macro sur (un peu) le même principe: A+...
25/11/2020 à 16:07phal2ipActivation du 2ème fichier ne fonctionne pasLa variable Nom contient le chemin et, Workbooks(Nom).Activate cherche à activer le classeur ouvert " chemin + nom classeur" qui n'existe pas. Une solution possible : A+ édit : remise de la ligne originale de recherche des fichiers, avec modification ...
24/11/2020 à 12:02afraIncrémenter photo jpegUne aide précieuse : le site de J. BOISGONTIER et notamment : http://boisgontierjacques.free.fr/pages_site/lesimages.htm A+...
24/11/2020 à 11:57LORDBChapitre 3 VBA - VariablesSi ça fonctionne chez l'un et pas chez l'autre, ça ne vient pas du code mais des données de la feuille. l'erreur 13 (voir dans l'aide Excel) survient le plus souvent lorsqu'on veut initialiser une variable (définie en numérique) avec une donnée texte(string) ou qu'on essaye de faire des calculs avec...
22/11/2020 à 14:27gaaz63 Type Mistmatch sur un combo de application.index et application.matchSi j'ai compris, je ferais comme ça: puisque Application.Match(Control, Range("F:F"), 0) donne le N° de ligne DayInTheMonth + 16 donne le N° de colonne A+...
18/11/2020 à 20:10RodolpheT11 Récupérer tableau filtré dans variantJe me suis permis de modifier ton code pour arriver à ça : Pas sûr que ce soit plus rapide que ma solution proposée initialement s'il y a de nombreuses lignes? A+...
18/11/2020 à 12:51RodolpheT11 Récupérer tableau filtré dans variantEffectivement le tableau n'est initialisé qu'avec les premières lignes visibles consécutives.... Seule solution trouvée : - copier la plage filtrée dans une autre feuille (par exemple), toutes les lignes filtrées sont bien copiées - affecter cette plage à un tableau (array) - effacer la copie Quelqu...
17/11/2020 à 14:53Flost Comptage spécifique dans colonneUn essai par fonction personnalisée: Dans un module standard : Dans une cellule : =Comt_Un(C3:C29) C3:C29 étant la plage contenant les 0 et 1. A+...
16/11/2020 à 18:50Silverfox Method 'Range' of Object '_Worksheet' failedJ'arrive trop tard... mais une proposition de simplifications : et A+...
16/11/2020 à 15:00ManekeSelection de cellules dans une feuilleL'image ne montre pas que la feuille porte le bon nom. Un espace en +, en -, au début, à la fin, au milieu... ça ne se voit pas .. Le plus simple est de faire un copier coller du nom de la feuille vers le code...
16/11/2020 à 13:08Bifrons UserForm - afficher valeurs avec 2 listes déroulantes (soit 1 soit l'autre)Dans Private Sub UserForm_Initialize() la partie de code mis en commentaire ' init liste des lots fonctionne ! Il doit y avoir quelque chose dans la demande que je ne comprend pas. A+...
16/11/2020 à 12:57ManekeSelection de cellules dans une feuilleSans précision sur l'erreur... a priori la feuille "Tableau d'origine" n'existe pas ou du moins pas avec cette écriture ... A+...
14/11/2020 à 13:11ljourneSomme de plusieurs cellules qui ne se fait pasLes données de la plage H34:Y34 sont issues d'une formule : =COMPLEXE.DIFFERENCE(H32;H33) Pourquoi utiliser cette fonction de différence de nombres complexes qui renvoie un nombre(complexe) inexploitable par la fonction SOMME. En H34 : = H32 - H33 puis tirer vers la droite A+...
10/11/2020 à 15:48Hemed Problème avec VLOOKUPCe à quoi je pensais : A+...
10/11/2020 à 12:34Hemed Problème avec VLOOKUPL'utilisation de VLOOKUP est-elle obligatoire ? Si non, c'est plus simple. A+...
05/11/2020 à 16:47GVQ Dessiner un rectangleBon courage!! y'a plus qu'à clôturer le fil . A+...
05/11/2020 à 16:22GVQ Dessiner un rectangleOui ça fonctionnera, mais il serait mieux d'écrire, puisqu'on a alors des cellules contiguës: If Not Intersect(Target, Range("AC6:AC11")) Is Nothing Then bien sûr! ça ne concerne que ces 3 parties : With Shapes("PassExt") ' passe partout extérieur With Shapes("Photo") 'photo With Shapes("PassInt") '...
05/11/2020 à 13:50GVQ Dessiner un rectanglePas de secret ni de confidentialité sur ce code ( long et laborieux ) Pour accéder au code , une solution : clic droit sur l'onglet de la feuille puis choix :Visualiser le code. On arrive sur la feuille de code de la feuille initiale et on peut voir le code contenu dans Private Sub Worksheet_Change(...
05/11/2020 à 11:38GVQ Dessiner un rectangleUne version un peu plus aboutie...
04/11/2020 à 18:00GVQ Dessiner un rectanglePour les macros : pas de solutions pour les flèches ... j'ai ouvert une discussion à ce sujet sur ce forum, ... ça ne déclenche pas l'enthousiasme.....
04/11/2020 à 15:19AlgoPlus Positionnement shape flèche par VBA...
04/11/2020 à 14:39GVQ Dessiner un rectangleToujours pas résolu ce problème de positionnement de flèche verticale, je cale... il n'y a pas à se soucier du lancement de la macro. elle est lancée automatiquement à chaque modification des dimensions (en B3,B4,D3,D4,F3,F4)...
04/11/2020 à 12:23GVQ Dessiner un rectangleJe galère sur le positionnement des flèches verticales. Quelque chose m’échappe. Retard à la livraison......
04/11/2020 à 11:12GVQ Dessiner un rectanglePas de mal !! je regarde de près, a priori rien d'impossible ... A+...
03/11/2020 à 13:49GVQ Dessiner un rectangleA priori c'est possible... un peu de patience, j'ai un début à base de macro. A+ Edit : Une première version "brute de fonderie" qui demandera certainement des modifications A+...
03/11/2020 à 13:29Nonno Macro problème avec mon archivageQuel est le souci ? A+...
03/11/2020 à 13:21Manu31 Création d'un ListBox avec un dictionnaireSans plus de précisions sur les éléments à comparer, essayer un truc comme ceci : à adapter...
02/11/2020 à 17:34lolopixx Ouvrir tout fichier d'un même répertoire, les renommer selon data à l'intérSi les nom et prénom sont toujours au même endroit (et dans la même feuille "CHECKED") , (par exemple en C6 et G6) le reste sans changement. ça simplifie et évite que le Find ne trouve pas "LAST NAME ?" ou "FIRST NAME ??" (un espace en + ou - ...) et donc que les variables ne soient pas initialisées...
02/11/2020 à 11:53Manu31 Création d'un ListBox avec un dictionnairePlutôt que de tester chaque ligne et d'insérer celles retenues avec un Additem, il est peut-être (??) avantageux de tester chaque ligne et de ne constituer le dictionnaire qu'avec les lignes retenues ? Pour plus d'aide, fournir les éléments à comparer... A+...
02/11/2020 à 11:38lolopixx Ouvrir tout fichier d'un même répertoire, les renommer selon data à l'intérSi le fichier s'appelle toujours ".xlsm" , c'est que les variables FirstName et LastName ne sont pas initialisées ou bien initialisées avec ...rien. a priori les noms et prénoms se trouvent en ligne 6 , sont ils toujours au même endroit pour tous les fichiers ? si oui il est possible de simplifier l...
30/10/2020 à 18:28lolopixx Ouvrir tout fichier d'un même répertoire, les renommer selon data à l'intérUn essai d'une solution possible, si j'ai tout compris : Il faudrait sans doute gérer le cas où le nom ou le prénom n'existe pas pour éviter un plantage. A tester A+...
30/10/2020 à 17:21steve74La fonction transposerRien compris !!! et si pas plus de réponse, c'est que ce n'est pas très clair ! Transposer les colonnes de dimension à l’horizontal, mais en conservant les dimensions en colonne ????? A+...
30/10/2020 à 17:15tristan347 Boite de dialogue en fondSi on connait cette variable X, peut-être on peut la localiser et donc connaitre sa colonne ?? Mais sans le code ni les données, pas facile de savoir si c'est réalisable ni de proposer une éventuelle solution.. A+...
27/10/2020 à 00:12aitelhachmi Auto-remplir ComboBox d'un UserForm à partir de ActiveCellQuelque chose comme juste avant A+...
26/10/2020 à 19:01Legnano Macro copie-colle cases non videsSi j'ai bien compris: pour déterminer la dernière ligne renseignée de la colonne B: pour copier (par colonne) jusqu"à la dernière ligne : A+...
24/10/2020 à 14:03audrey_vba Variable tableau sans doublon@ ThauThème: Pour le passage des éléments d'un dico vers un array, j'utilise ceci trouvé je ne sais plus où: ça fonctionne jusqu'à 65536 éléments, Transpose étant dans les choux au delà. ça ne change rien pour audrey_vba A+...
21/10/2020 à 17:22maouexErreur lors de la creation d'un article (formulaire)Une solution possible: A+...
18/10/2020 à 15:51evan38 Recherche dans une listeSur quel classeur ? Surement pas le classeur joint. les seules erreurs possibles sur la ligne en question seraient que : -soit la feuille FT n'existe pas -soit la variable Incrementation_Ligne vaut 0 ou plus de 1.048.576...
18/10/2020 à 12:45evan38 Recherche dans une listePas trouvé de code approchant dans les 3 modules... après avoir inséré " M16 " (sans les guillemets) en B2 de la feuille FT ,et rajout d'un commandbutton activeX sur la feuille FT avec le code suivant: on a bien le message : OK A+...
18/10/2020 à 12:04evan38 Recherche dans une listeDans quel classeur prend on la donnée pour initialiser X ? Dans le classeur ouvert portant le nom "Nom_Classeur_Macro" ? il faudrait alors ajouter les " " autour du nom Dans le classeur portant le nom contenu dans la variable Nom_Classeur_Macro ?; cette variable est-elle initialisée ? Par ailleurs,l...
18/10/2020 à 11:28evan38 Recherche dans une listeUne solution possible; à la louche : A+...
17/10/2020 à 18:48tlam Macro d'impressionSi le but est d'imprimer les feuilles visibles d'un classeur B depuis un classeur A, dans le classeur A...
17/10/2020 à 15:11tlam Macro d'impressionUn bout de code qui permet de visualiser (ou imprimer) les feuilles visibles du classeur A+...
29/09/2020 à 15:43millioss Connaitre l'adresse d'un checkbox activeUn exemple montrant comment récupérer la ligne et la colonne de la cellule liée de la checkbox sur laquelle on vient de cliquer. Nécessite d' affecter la macro à chaque checkbox (!!) .CheckBoxes(Application.Caller).LinkedCell renvoie l'adresse de la cellule liée, soit $D$4 pour la toute première che...
26/09/2020 à 18:43rodger85 Commentaire ne suit pas la cellule avec auto-filterUn essai en modifiant les macros existantes : A+...
26/09/2020 à 17:45VengeurMasquéVBA pour création formulairePas trouvé la "case" date dans la Userform.... Pour ne permettre la saisie que des chiffres et de "/", si cette "case" est une textbox (TextBox9 par exemple): ça limite les erreurs (?), mais ce n'est pas parce qu'il n'y a que des chiffres et des "/" que la saisie aura forcément le format date A+...
21/09/2020 à 15:17clem_popComparaison cellules 2 tableaux sur même feuille avec Application.Match.Match permet de connaitre la position d'une valeur cherchée dans une plage. S'il s'agit de comparer deux cellules, le plus simple : A+...
21/09/2020 à 15:01Munouchka Une somme avec plusieurs paramètresUne proposition par fonction personnalisée: Dans un module standard : et dans la cellule C6: =NumTicket(C5;C3) A+...
04/09/2020 à 13:13tris Fonction SI : regarder si un fichier existeEssayer avec la fonction dir(): par exemple ...
24/08/2020 à 20:49TompouceProblème avec chemin d'accèsSi le décalage est constant, changer le nom des macros ... sinon demander à celui qui les a créées ... sinon comment peut on savoir ce qui cloche sans éléments à étudier ?? A+...