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 15

DateAuteur du sujetSujetExtrait du message
23/11/2019 à 11:59master_x_99 Problème avec boucleS'il s'agit de trouver dans la colonne F (à partir de F5) les dates renseignées de plus d'un an, il vaudrait mieux utiliser : Par ailleurs, sans précision de la feuille de la plage (F5:Fxx) pas sûr que ça fonctionne bien dans Sub Workbook_Open() A+...
22/11/2019 à 17:24okguyErreur dans le code? Regropement de plusieurs feuilles sur un seul fichier...
22/11/2019 à 16:26okguyErreur dans le code? Regropement de plusieurs feuilles sur un seul fichierPour la partie référencement , par exemple, non testé ...
22/11/2019 à 12:23okguyErreur dans le code? Regropement de plusieurs feuilles sur un seul fichierIl semble ...que la description du souci n'est pas claire. Si on n'est pas sûr que ça fonctionne sur un PC, comment peut-on penser que ça marche moins bien sur un autre ? des erreurs sur une ligne de code en particulier ? sur les résultats par rapport à l'attendu ? est ce que ça signifie 1 feuille p...
20/11/2019 à 12:06bonhomAide pour modification VBA d'un Classeur Excel pour locationOn trouve sur ce blog cette version RESAHOTEL_2019_v3.1c.zip qui date d'aujourd'hui, a priori plus récente que la vôtre.....
20/11/2019 à 11:46bonhomAide pour modification VBA d'un Classeur Excel pour locationLe plus simple est sans doute de contacter l'auteur de ce classeur et/ou de visiter son blog dont le lien figure dans la discussion citée dans votre message. A+...
18/11/2019 à 20:34oiseaubleuRemplacer les points virgule par des virgules par macroJe ne comprend pas pourquoi changer , en ; et vice versa: d'autant qu'il faudrait également franciser ou "angliciser" les noms de fonction. FormulaLocal donne la formule dans la langue utilisée par Excel (Français, Allemand ....) Formula donne la formule contenu dans la cellule en "version originale...
31/10/2019 à 16:52cheribibi33VBA Exporter fichier TXT - Délimité & PositionLa première et la dernière ligne ne sont pas traitées. Il reste à le faire en adaptant le modèle des lignes destinataire. Quand je parle des lignes et colonnes vides, je parle des lignes et colonnes hors données utiles: en démarrant sur le classeur , la plage déterminée par UsedRange était A1:V38 al...
31/10/2019 à 16:18cheribibi33VBA Exporter fichier TXT - Délimité & PositionEn supposant que les colonnes sont dans le même ordre, un essai Attention dans le classeur, des lignes et colonnes vides sont prises en compte par UsedRange . il y a lieu de les supprimer avant traitement, sous peine de plantage... Il ne faut pas utiliser des mots réservés VBA comme nom de variable...
31/10/2019 à 12:35cheribibi33VBA Exporter fichier TXT - Délimité & PositionOui, mais... quelles colonnes du classeur correspondent aux colonnes du fichier ...
31/10/2019 à 12:08cheribibi33VBA Exporter fichier TXT - Délimité & PositionMais plus précisément ? Vous pourriez donner les tailles et positions souhaités ? Sinon essayez de jouer avec Separateur = vbTab , vbTab étant une tabulation. A+...
30/10/2019 à 12:06KTMImpression bordureLa bordure de gauche n'apparait pas dans le PDF. Normal qu'elle ne soit pas imprimée ! Voir l'original avant la conversion en PDF ...
26/10/2019 à 19:47Paladinduroy Méthode Jeu simple placé Etude de pronostiquesL'explication est on ne peut plus succincte ! Raison, sans doute, pour laquelle vous n'avez pas plus de réponses. Essayez d'exposer clairement ce que vous voulez comme calculs calculs , tout le monde n'est pas turfiste.....
26/10/2019 à 19:31Jeebee Masquer #N/AVous pouvez essayer en N4 : =SIERREUR(RANG(M4;M$4:M$11;0);"") et tirer vers le bas. A+ Edit : Bonjour DjiDji59430, désolé...
26/10/2019 à 19:06pierr974Stock mis à jourPour la mise à jour du stock, rajouter ou dans le code du bouton Valider A+...
25/10/2019 à 16:50TTHELEMMise en forme VBA, saut de ligne tant queQuelques explications: on met les plages de données à utiliser dans des tableaux pour plus de rapidité (T1=colonnes A-B et T2=colonnes D-E) On balaye chaque tableau pour créer les dictionary Dico1 et Dico2 ayant pour clé la concaténation de la Division et du Point expédition correspondant, séparés p...
25/10/2019 à 10:57yaphilde Suppression extension de nom de fichiers dans colonne généré par MacroSi l'extension à supprimer fait toujours 4 caractères, on peut utiliser : sinon, ou s'il y a des noms d'extension différents dans le répertoire: A+...
25/10/2019 à 09:44Huncho240Délai macroSans doute pas tout compris, car pour le code présenté, pas besoin de rafraichissement ? A+...
24/10/2019 à 18:59TTHELEMMise en forme VBA, saut de ligne tant queNouvelle mouture , qui supprime les doublons D-E (que ne faisait pas la version précédente) et qui rajoute les éléments A-B n'existant pas en D-E. le résultat est copié à partir de la colonne F sur 4 colonnes...
23/10/2019 à 16:02TTHELEMMise en forme VBA, saut de ligne tant queUne solution sans doublon qui s'exécute en moins d'une seconde : A+...
23/10/2019 à 15:48TTHELEMMise en forme VBA, saut de ligne tant queVu le temps de traitement, je suis parti sur une solution tableau (array) et dictionary. quelques questions: Faut il faire concorder également Point expédition/réception et Division ? il y a des doublons dans chaque jeu de données (1 pour colonnes A-B, 8 pour D-E) comment les traiter: ne conserver q...
22/10/2019 à 11:15Anthony2544Problème colorboxColorBox n'est pas natif Excel, mais fait part d'un "add-in" à installer. As tu fait cette installation...
20/10/2019 à 12:32Le Drosophile [VBA] - Lister les valeurs uniques et insérer une checkbox par ligneChaque case à cocher est nommée : CB suivi du N° de ligne sur laquelle elle se trouve. un essai pour lancer une action pour les case cochées, suivi de la suppression de toutes les cases à cocher: A+...
20/10/2019 à 11:51Le Drosophile [VBA] - Boucle for qui s'arrête à la première ligneDans Private Sub CommandButton1_Click() de l'USF, on trouve ce code: dès la première itération, on rencontre l'instruction Exit For ; donc la boucle ne va pas plus loin! Et on aura au mieux un seul élément dans la collection. Donc col.count = 1 ! la boucle va tourner de 1 à ... 1 , donc une seule it...
19/10/2019 à 16:00Le Drosophile [VBA] - Lister les valeurs uniques et insérer une checkbox par ligneUn essai pour ajouter les checkbox (cases à cocher formulaire) en colonne A de la feuille Résultat: A+...
18/10/2019 à 18:07Atro(userform) Afficher résultats recherche multiple dans listboxUne solution possible: adapter éventuellement le nom de la listbox, la largeur des colonnes de la listbox A+...
18/10/2019 à 14:14SEBDEL Remplacer valeur cellule alphanumerique par nombreEn complément de votre formule (substitue...) utiliser la fonction CNUM() qui convertit le texte en numérique: =CNUM(SUBSTITUE(SUBSTITUE(A2;"C";" ");"D";"-")) A+ Edit : bonjour tulipe_4...
16/10/2019 à 13:40GGautierExtraire ligne x d'un tableauUn classeur contenant des données non confidentielles permettrait de valider (ou non...) des intuitions... La recherche doit se faire sur toute la plage BD ou seulement sur une colonne(laquelle?) ? sur toute la plage, il se peut que l'on copie plusieurs fois la même ligne... A+...
16/10/2019 à 12:02Pingooo Macro pour récupérer des données sans doublonsPuisqu'il y a "plantage" lorsqu'il n'y a pas de cellules à copier, il faut, avant de copier, savoir s'il y a des cellules à copier. Exemple sur Sub SS_Maj_inventaire() modifier en à adapter pour les 2 autres sub A+...
15/10/2019 à 19:15FeUjTeK Assemblage de deux macrosPour pouvoir travailler sur les colonne M et N dans la même sub, il faut modifier le test de intersect A+...
15/10/2019 à 19:07hugomrc Création de feuille et vérification d’existenceN'oublie pas Theze qui a proposé une solution en premier !! permet de déterminer la ligne de la dernière cellule utilisée de la colonne F détermine une plage de cellule allant de F3 à la dernière cellule utilisée de la colonne F le . devant les range permet de rattacher range à une feuille précisée...
15/10/2019 à 17:51hugomrc Création de feuille et vérification d’existenceUne autre solution, sans passer par les erreurs: A+...
15/10/2019 à 13:51pat2005Convertir texte en formuleIl me semble qu'il existe une astuce utilisant la fonction EVALUER() dans le gestionnaire de nom, mais je ne retrouve pas ... Sinon, une solution par fonction personnalisée: Si en A1 est noté le texte "5*7" (sans les guillemets), insérer en B1 (par exemple) : =EvalCalculTxt(A1) et dans un module sta...
14/10/2019 à 13:37djc69Calcul du nombre de référenceUn essai par fonction personnalisée, les appels à la même date/heure ne sont compté qu'une fois: en H4 : =NbREF(D2:E24;G4) dans un module standard copier le code suivant: A+...
13/10/2019 à 13:16yannick26100 VBA Userforme checkboxDans Private Sub CommandButton2_Click() et Private Sub CommandButton3_Click() modifier : en qui se traduit par si checkbox1 est coché alors = X, sinon = vide à adapter pour les autres checkbox A+...
13/10/2019 à 12:18Novice38Positionnement sur celluleUne solution possible qui ne fonctionne que sur la structure du classeur fourni, à adapter : A+...
12/10/2019 à 12:25lenautile16Lire des données dans un classeur ferméOn pourrait écrire directement: On peut rajouter cette ligne de code pour ne plus avoir de traces du classeur dont est issue la donnée, mais seulement la donnée ...
07/10/2019 à 13:54cfn3cfn Procedure trop grandeL'utilisation d'une boucle semble pouvoir faire l'affaire, si T1,T2,... sont des textbox (?) sur Userform, numérotées jusqu'à 100 (par exemple). On pourrait avoir : A+...
07/10/2019 à 13:40abderninoModification de la macroSi j'ai bien compris (?) remplacer par A adapter pour le Hors Taxe. A+...
07/10/2019 à 12:01abderninoModification de la macroPas tout compris!! de quelles deux lignes parlez vous ? Faut-il comprendre si E33>0 alors E33=F24 sinon E33=F25 ??...
07/10/2019 à 11:46ryokenUserForm Multi dictionnaireUne mine de renseignements et d'exemples sur le site de J. BOISGONTIER notamment sur les listes en cascade avec ou sans VBA: http://boisgontierjacques.free.fr/pages_site/listes_cascade.htm A+...
06/10/2019 à 22:53campagniej Type Mismatch si cellule = "'001"Dommage que le N° de ligne ne soit pas mentionné. Tel qu'il est, ce code ne fonctionne pas mais ne provoque pas d'erreur chez moi. Essayer sans apostrophe...
06/10/2019 à 18:12Blondin02 Incrementation à l'impressionUn essai: pour plus de simplicité (pour moi...)j'ai modifié la ligne 9 de la feuille: en B9 : COLIS en D9 sera affiché le N° en cours en E9: SUR en F9 sera affiché le Nb de colis total A+...
06/10/2019 à 17:51mline Userform, listbox à choix multiples, insertion dans une celluleA tester...
06/10/2019 à 16:29mline Userform, listbox à choix multiples, insertion dans une celluleD'après ce que je comprend: Encore peu familier des tableaux ListObject, il y a peut-être un code plus spécifique... A+ A+...
05/10/2019 à 14:53C6l74 Range, Array et CellsUne autre solution : initialiser l'array avec les adresses de plage: A+...
05/10/2019 à 14:36mysterauto Enregistrement bizarreAprès un "enregistrement sous" le classeur actif est le classeur avec le nouveau nom. Dans votre cas le classeur original n'est pas enregistré, ce qui expliquerait le fait de trouver d'anciennes données. Mais vous n'y trouveriez pas les données récemment saisies. Il vaudrait mieux commencer par enre...
04/10/2019 à 16:36primokorn Intégrer un IF dans un WITHPas de modifications du caption (texte descriptif) du bouton sur excel 2007...
04/10/2019 à 13:11primokorn Intégrer un IF dans un WITHUne autre solution qui évite les Select ralentisseurs et peu lisibles: A+...
04/10/2019 à 12:43hariRecuper les valeur d'une liste VBAComme dit précédemment, les N° immo saisis sont accessibles par une boucle... C'est dans cette boucle que le traitement de suppression pourrait avoir lieu...