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 16

DateAuteur du sujetSujetExtrait du message
03/10/2019 à 20:52hariRecuper les valeur d'une liste VBAPas compris si le N° immo était un chiffre ou un nombre... après chaque validation d'un N° immo, ce N° est stocké dans la variable tableau Lst. Au final tout les N° sont contenus dans cette variable. on peut y accéder par une boucle (après la saisie de l'ensemble des N°), par exemple: Mais, sans tro...
03/10/2019 à 12:47dorothy83 Supprimer le chiffre avant la virguleSi les données "à virgule" sont en colonne B, vous pouvez utiliser cette formule pour "récupérer" la partie décimale: =B1-ENT(B1) A+ edit : trop tard ! bonjour Pedro22...
03/10/2019 à 10:26hariRecuper les valeur d'une liste VBAPas tout compris !! Le problème est-il que le N° immo est du texte ? ou bien de pouvoir récupérer cette saisie dans une variable ?? Tous les N° immo sont "stockés" dans la variable tableau Lst . ils peuvent donc être "récupérés"... Quelques précisions semblent nécessaires... A+...
30/09/2019 à 18:33nasfatAffichage contenu liste déroulante au lancement de userformQuand on saura exactement le besoin ......
30/09/2019 à 15:44nasfatAffichage contenu liste déroulante au lancement de userformUn essai, en supprimant la boucle puisqu'on ne peut double cliquer qu'une cellule: Plage Range("B1:B100") à adapter... Edit : Bonjour Girodo...
29/09/2019 à 11:16horusbk Gérer le OK et Annuler d'une InputBoxUn essai prenant en compte la gestion de "annuler sur inputbox" et modifie le fait de barrer ou "débarrer" a priori les cellules...
28/09/2019 à 13:50akasha Récupérer la valeur qui a été cliqué dans mon userformExemple pour l'entrepot: dans le module Imp_..., déclarer les variables : dans l'userform2: Dans Sub impression_bons_correspondance() à adapter pour l'autre userform A+...
28/09/2019 à 12:17akasha Récupérer la valeur qui a été cliqué dans mon userformSans avoir plus de détails sur le processus et les objets utilisés, une réponse générique possible : dans l'évènement " Click " de chaque choix initialiser une variable globale (si le choix est vrai ) avec le nom du choix (caption ?) La variable sera déclarée Public dans un module standard si on veu...
24/09/2019 à 16:14VDMICHEL Tri personnalisé - Adapter code pour Excel 2003Ce serait plus pratique d'avoir un classeur contenant quelques données (non confidentielles) pour réaliser des tests... A+...
23/09/2019 à 18:18smickouneVBA + ajouter une valeur à ma formule existantePeut-être : A+...
21/09/2019 à 13:35Yoyo01000 Garder un UsF actif après un TextBox_EnterBen ... non! ça ne peut pas le faire tout seul, il faut rajouter le code pour effacer la textbox.... rajouter...
21/09/2019 à 13:02Yoyo01000 Garder un UsF actif après un TextBox_EnterPour que la userform reste active, il suffit de ne pas la "décharger"... Supprimer la ligne: A+...
20/09/2019 à 17:28colonel coyoteAttribuer une valeur numérique à un mot pour un classementUne solution : utiliser la fonction Somme() qui ne prend pas en compte le texte. En P3 : =SOMME(Tableau2[[#Cette ligne];[Australie]:[Allemagne]]) A+...
20/09/2019 à 16:51liodVerrouillage avec conditionsEssayer avec: A+...
20/09/2019 à 16:44Steph47 Selection de plusieurs Labels et boutonsSi on opère dans une Userform, on peut utiliser ce code : à adapter pour les Optionbuttons A+...
03/09/2019 à 18:39GoauldVérifier si 2 string sont identique et calculer valeur attachéeA tester...
02/09/2019 à 23:03lindaOptionbuttonOui ! si les noms des optionbutton sont OptionButton1 et dans un autre Frame OptionButton25 (par exemple) si OptionButton1 est coché => OptionButton25 coché également si OptionButton1 est décoché => OptionButton25 décoché également A+...
01/09/2019 à 19:36Choup_12Impression avec liste déroulanteUb essai avec une Userform pour choisir les paramètres. (qui ne facilite pas la prévisualisation ...) utiliser <CTRL> + i pour lancer la macro A+...
01/09/2019 à 15:48Choup_12Impression avec liste déroulante4 fois que Excel plante à la sauvegarde du classeur avec le code fonctionnel. Terminé pour aujourd'hui.... Il faut vraiment que je change de version XL...
01/09/2019 à 14:00Choup_12Impression avec liste déroulanteSi le nom de la feuille n'est ni "INFORMATIONS" ni "SUIVI APPRO " ni "SUIVI office)" alors on fait le traitement. Il n'y a que les feuilles de menus (1,10,...) qui seront imprimées... Je regarde pour un menu d'impression paramétrable (liste client, feuille à imprimer, visualisation ou impression...)...
31/08/2019 à 21:03Choup_12Impression avec liste déroulanteUn essai: toutes les feuilles de menu (1, 10, 11, 13...) sont imprimées pour chaque nom de la plage A33 à A62 de la feuille "1" (j'ai supposé que cette liste était valable pour toutes les feuilles. Attention les lignes masquées 60 et 61(qui est vide) donneront lieu à impression... coller ce code dan...
31/08/2019 à 20:30Eli Incrémentation Num selon critères - VBAAaah ! désolé; moi qui suis plus à l'aise avec VBA, j'ai proposé une formule Excel ......
31/08/2019 à 19:45Choup_12Impression avec liste déroulanteEtant sous XL 2003, j'utilise un convertisseur qui me permet d'ouvrir les classeurs réalisés avec une version plus récente. Mais avec ton classeur, le convertisseur mouline plus de 5mn puis plante.... A moins d'avoir une version xls, je ne pourrait pas t'aider sur ce coup. A+...
31/08/2019 à 18:23Eli Incrémentation Num selon critères - VBAA essayer : en B3 : =E3&"/"&" S-"&C3&" /N-" &NB.SI($E$3:E3;E3) puis tirer vers le bas A+...
31/08/2019 à 17:29Choup_12Impression avec liste déroulanteUne réponse de principe: Une macro pourrait être une solution, mais pour la mettre en œuvre, un classeur exemple sera nécessaire (pour savoir où prendre le nom des clients ...)... A+...
31/08/2019 à 17:24GoauldVérifier si 2 string sont identique et calculer valeur attachéeUn essai par fonction personnalisée : en G3: =Max_Goauld(A3:F3) à tirer vers le bas et dans un module standard : A+...
30/08/2019 à 18:56lindaCondition et option buttonSeule la dernière condition ne fonctionne pas ou le code ne fonctionne plus ? le code proposé est-il le reflet exact du contenu de Private Sub CommandButton2_Click() ? si oui : il manque un End If à la dernière condition et le End Sub de fin de Sub si non : ???? Par ailleurs tous les Else peuvent êt...
30/08/2019 à 18:41Xmastree14 Propriétés de formesAvec plus de précisions , une réponse plus précise (?) le code s'exécute depuis une Userform ? La forme se trouve sur quelle feuille? le nom de la forme est-il bien "Ellipse1" ou "Ellipse 1" ...
30/08/2019 à 11:57New_VBA_UserProblème VBA: supprimer et compter les lignesPeut-être en utilisant l'opérateur Like et des "jockers": A+...
30/08/2019 à 11:49Xmastree14 Propriétés de formesEn gros, si la forme se nomme bien "Ellipse1" ...
28/08/2019 à 19:04CVC Limite à 65536 valeurs sur application.sum en VBA ???La limite de la fonction Somme est au moins le nombre de lignes disponible sur Excel... Toujours difficile de répondre avec si peu d'éléments... a quoi correspond BDD, une variable... représentant quoi ? une plage nommée ....? comment est déclarée cette variable ......
28/08/2019 à 16:15danval Erreur VBAC'est pas bien vu de poster le même souci sur deux forums différents! a priori j'ai perdu mon temps à trouver une solution à un problème résolu sur Excel-download.....
28/08/2019 à 14:46danval Erreur VBADans Sub Séparer() Corriger et en et plus loin, en fin de sub, une erreur sur : où Ws est une variable non définie.... A+...
28/08/2019 à 12:14Martaing Activer un userform en fonction d'une liste de validation de donnéesLorsqu'on modifie une cellule de la feuille Feuil1, la procédure événementielle Private Sub Worksheet_Change(ByVal Target As Range) de la feuille Feuil1 se déclenche. Dans l'userform un clic sur les checkbox va écrire dans la feuille Feuil1 ... et donc déclencher la procédure événementielle qui ouvr...
28/08/2019 à 11:43goldsugar Probleme vlookup + msg boxAprès modifications entre autres des doubles cotes de : “n’existe pas” et remplacement de la variable code trouvé (lookup) par la variable code cherché (ch) dans MsgBox "le compte " & lookup & “n’existe pas” une autre version: A+...
27/08/2019 à 18:46Black_HoleRécupérer la position de la valeur avec .FindA adapter : A+...
26/08/2019 à 18:35pierre_br N° de ligneUtilise: ou...
26/08/2019 à 15:41pierre_br N° de ligneCompléter quoi ? Target.Row donne le N° de ligne de la cellule sur laquelle on a "double-cliqué", et je ne sais pas ce que tu veux en faire ...
26/08/2019 à 12:57pierre_br N° de ligneA+...
23/08/2019 à 18:36flagg Probleme declaration variable dans select caseConcernant la syntaxe du select case, il vaudrait mieux utiliser: A+...
23/08/2019 à 16:17Guigui59Aide VBA Chemin d'accèsPeut-être essayer en créant une chaine de caractères valide : A+...
23/08/2019 à 16:09MytoriaIndiquer les dimensions d'une forme dans des cellulesAvec ma proposition, après modification des formes, il faut utiliser la touche F9 pour mettre à jour les colonnes B et C. A+...
23/08/2019 à 16:03YeshuaUtilisation de la Méthode " File.Exists(NomDeFichier) "Une approche à adapter: A+...
23/08/2019 à 11:11milkaman77 Bug affichage bouton de commandePas facile avec juste une image de répondre avec précision ... A priori il y a du code pour "cacher" (quoi?) Il pourrait s'agir d'une erreur de "cachage" ou "décachage". Mais sans, au moins, le code ???? A+...
23/08/2019 à 10:46MytoriaIndiquer les dimensions d'une forme dans des cellulesUne solution par fonctions personnalisées : en B2 : =Hauteur(A2) en C2 : =Largeur(A2) et tirer les formules vers le bas Dans un module standard: Le résultat est en points. Si on veut le résultat en mm, multiplier par 0,035114 et éventuellement utiliser la fonction Round() Un bémol : la modification...
22/08/2019 à 16:13MytoriaIndiquer les dimensions d'une forme dans des cellulesEn utilisant le même principe que pour définir la feuille où trouver la forme : rajouter le nom de la feuille: A+ Edit : Bonjour ThauTheme...
22/08/2019 à 15:51isabelletteRemplir la référence d'une cellule dans un TextboxPas très clair.... si la référence est l'adresse (?) : Si le numéro de cellule est son adresse (?) ...
21/08/2019 à 17:18baroudeuse75 Boucle : la feuille souhaitée ne s'affiche pasAutrement dit doit être déplacé juste avant...
21/08/2019 à 11:38baroudeuse75 Boucle : la feuille souhaitée ne s'affiche pasL'activation de la feuille "Fiche réponses" se trouve dans la boucle For ...Next et dans le test If .... Si dans la dernière itération le test est faux, on ne lance pas l'instruction pour afficher la feuille. Il faut donc "sortir" l'instruction Sheets("Fiche réponses").Activate pour la placer après...
21/08/2019 à 11:11BernardDRANEB Condition Si cellule contient mot alors cellule adjacentePas sûr d'avoir tout compris; un essai non testé faute de classeur joint: A+...