Passionné d'Excel

Inscrit le :23/04/2022
Dernière activité :Aujourd'hui à 08:50
Version d'Excel :PC 365 NL
Lieu :Belgique
Messages
7'290
Votes
2'112
Fichiers
0
Téléchargements
0
SujetsMessagesStatistiquesVotes reçus

Messages postés par BsAlv - page 142

DateAuteur du sujetSujetExtrait du message
20/05/2022 à 14:36JB_ Tirage aléatoire sans doublonsRe, je n'ai aucune idée, 2 essais en rouge et si cela ne marche pas, est-ce que vous pouvez ajouter votre dernier fichier entier ici ? (Il s'arrête maintenant sur la ligne rouge avec x= ... ou la ligne suivante ? Ici, tout passe bien Sub Optimisé(nr) Dim arr() , i As Double a = Sheets("feuil1").List...
20/05/2022 à 12:36topprofitComment éliminer des combinaisons qui ne sont pas dans le même ordreS'il y a beaucoup de combinaisons a verifier, on peut utiliser un macro. Il y a combien de combinaisons ...
20/05/2022 à 12:25JB_ Tirage aléatoire sans doublonsRe, l'erreur d'exécution, c'est de nouveau votre version moins récent , mais comme application.version = 16 pour 2019, 2021 et 365, il faut tester pour savoir lequel on a (See TestExcelVersion_2016_2019_365). Donc je fais pareil dans le macro "optimisé"; J'essaie à utiliser "RandArray" et si cela es...
20/05/2022 à 11:11JB_ Tirage aléatoire sans doublons@LouReed, sorry de dire sorry . optimisé et evolutif...
20/05/2022 à 08:04JB_ Tirage aléatoire sans doublons@LouReeD, avec un écart de 10 minutes la même réponse, oui, donc cela devait être correct, mais je n'avais pas vu ta réponse, sorry. Pour être complet, une solution uniquement pour excel2021-365...
19/05/2022 à 23:03Alix-nj Copier et Insérer des lignes à la suite dans VBAFaute classique, avec des problèmes pareilles, le boucle est de la fin jusqu'au début, donc For index = last to 2 step -1 mais je vois nul part où vous insérer x nouveau lignes ? je ne suis pas sur des formules, problème linguistique ...
19/05/2022 à 22:56JB_ Tirage aléatoire sans doublonsC'etait aleatoire entre 1 et 13 et ne pas 2 - 14...
19/05/2022 à 22:44MC83 Séparateur de milliersOubien texte to colonne avec aucun separateur...
19/05/2022 à 22:32DUAL ex Rechercher une cellule au format date "avr.22"La cellule concernée est c.Cells(1, r) et donc avec cet offset(1), ce sera c.cells(2,r).select...
19/05/2022 à 21:18seddiki_adz Code affiche erreurRe, le bouton est un ActiveX-commandbutton sur la fueille repartition, son nom est "CBnTirage" et le macro correspondant est alors "CBnTirage_Click". A mon avis, ce bouton fonctionne...
19/05/2022 à 15:09laurent69490 Tableau croisé dynamique - date pas regroupée en année, trimestre et moiPour grouper tous les lignes doivent etre un numéro (avec numberformat d'une date), dès qu'il y a un valeur de type différent (vide, string, erreur, ...), c'est fini ! Pas de discussion sur ce point...
19/05/2022 à 15:05AD2001Ecart de résultat avec la fonction Days360Re, je ne comprends pas ces différences, maintenant vous avez même 2 resultats et aucun des 2 est egale a mes valeurs. Vous etes sure que le programme utilise la methode "jour360 ...
19/05/2022 à 14:41laurent69490 Tableau croisé dynamique - date pas regroupée en année, trimestre et moiVotre colonne contient des cellules vides, donc c'est impossible de grouper par mois, trimèstre, etc, sauf si vous faitez cela en créer ces 3 colonnes à main...
19/05/2022 à 14:17Xavier_09 Création d'une boucle pour importer des imagesMerci pour votre reponse...
19/05/2022 à 14:14AD2001Ecart de résultat avec la fonction Days360Bonjour, dans le fichier ajouté, les 2 dates 1/1/22 et 19/5/22 avec la methode Jour360 = 4.63 mois (avec VBA et avec la formule), aussi simple que bonjour. Maintenant, la question est lequel des 2 résultats, la formule ou celui que votre programme propose, est correct. Peut-etre l'autre solution uti...
19/05/2022 à 11:04AD2001Ecart de résultat avec la fonction Days360Est-ce possible de joindre un fichier avec vos calculs, donc 10 lignes de 2 dates + 2 salaires + le niveau de prime calculé ...
19/05/2022 à 09:54AD2001Ecart de résultat avec la fonction Days360Ca sert a quoi ? c'est 1.030 années ou 1.030 jours de différence ? Pouvez-vous donner les 2 dates concernés et le resultat attendu ...
19/05/2022 à 07:55Kymie1213Ouvrir plusieurs fichiers en même tempsApparament des pesticides J'ai renommé "AZR34.xls B " et celui-là et "b4eer-lot.xlsx" doivent etre ouvert au moment de lancer ce macro. Les résultats sont dans "blad1"...
18/05/2022 à 23:27DUAL ex Rechercher une cellule au format date "avr.22"...
18/05/2022 à 22:42thomsbrnConvertion Heures:Minutes > Jours:Heures:Minutes2 autres methodes...
18/05/2022 à 22:22GeoD Boutons ActiveX nombreux et instablesMa reponse était plustot pour vous indiquer que vous pouvez créer votre userforme à la carte. Soit vous faitez tout dans un userform avec la possibilité de cacher certains boutons selon les circonstances, soit vous créez plusieurs userfoms, une pour chaque feuille par exemple. Votre 1ier userform, c...
18/05/2022 à 22:15seddiki_adz Code affiche erreurIl n'y a que 70 profs pour 72 places .....
18/05/2022 à 20:19Xavier_09 Création d'une boucle pour importer des imagesLe macro pour tous les noms Puis si vous "DoubleClick" sur une de ces cellules du tableau (pas un hypertexte vrai), ce macro saute vers cette feuille. ( dans le VBA module de la feuil1) et finallement, si vous "DoubleClick" dans cellule A1 de n'importe quelle feuille, vour retourner vers A1 de feuil...
18/05/2022 à 18:19Xavier_09 Création d'une boucle pour importer des imagesAvec width and height = -1, vous ne definiez pas leur dimensions, mais si vous leur donnez un vrai valeur ..., donc changez ce -1 en 50 pour commencer...
18/05/2022 à 18:13CorinneRTester une date dans un intervalleLe nom du textbox est modifié, il est maintenant Textbo_DateDebut, c'est pourquoi, il disait erreur...
18/05/2022 à 18:02seddiki_adz Code affiche erreur...
18/05/2022 à 17:54GeoD Boutons ActiveX nombreux et instablesUn userform qu'on peut lancer avec CTRL+l. Puis vous pouvez ajouter autant de boutons et les regrouper comme vous vouler. Puis vous pouvez cacher certaines boutons dépendant de la situation, etc, etc...
18/05/2022 à 17:28Xavier_09 Création d'une boucle pour importer des imagesBonjour, il y a un ' charactère en face de la 2ieme "Mypath" et par consequence cette ligne est commentaire (sert à rien), donc c'est mieux d'effacer cette 2ième ligne pour ne pas se tromper. Puis vous pouvez changer ce directory or il y a la possibilité de la choisir avec un msgbox supplémentaire...
18/05/2022 à 10:56CorinneRTester une date dans un intervalleVBA utilise le date americain, donc MM/DD/YYYY, donc le valeur du Textbox doit être traduit vers une date europien, donc split et reconstruire ! Puis les dates, c'est plus facile de chercher dans un array...
18/05/2022 à 10:25Tokou Supprimer une celluleVous avez créer un "deadlock", parce qu'excel reste dans un boucle infini d'effacer G7 au lieu de Range("G7").Select Selection.Clear utilisez with range("G7") if Len(.value)>0 then .clearcontents end with ou bien il faut utiliser "enableEvents" false et true...
18/05/2022 à 10:17DragZ Format date Et changement valeur celullesRe, un code plus efficace votre dernier remarque "VE" dans code journal = remplacer Tablo(i,9) par "VE" dans les 3 lignes Dict.add ......
18/05/2022 à 09:35DragZ Format date Et changement valeur celullesAvec des valeurs dates et currency , c'est mieux d'utiliser ".value2" Tablo = F1.Range("A2", "Z" & F1.Range("A" & Rows.Count).End(xlUp).Row) .Value 2...
17/05/2022 à 21:08Xavier_09 Création d'une boucle pour importer des images...
17/05/2022 à 20:41ledoc Recherche fichier sur hddAutre methode...
17/05/2022 à 16:24seddiki_adz Code affiche erreurLe même problème erreur, mais j'ai modifier le code Private Sub CBnTirage_Click() End Sub le code fonctione et le bouton ne fonctionne pas une fois, oui, mais 2 fois ??? je n'ai rien à faire avec ce code là !!! J'ai rénommé le mien comme "BSALV_Aleatoire" Ceci est un devoir pour à la maison ...
17/05/2022 à 16:17seddiki_adz Surveillance des examen...
17/05/2022 à 15:04ledoc Recherche fichier sur hddOkay, y-a-t-il des espaces dans ce path ? Je pense d'y voir quelques...
17/05/2022 à 15:01seddiki_adz Code affiche erreurResultat : - chaque professeur est 8 ou 9 fois sélectionné comme surveillant ou remplacant (donc assez equilibre) - chaque professeur est 6 à 8 fois sélectionné comme surveillant - chaque professeur est 0 à 3 fois sélectionné comme remplaçant...
17/05/2022 à 11:27seddiki_adz Code affiche erreurLe macro "aleatoire" dans module1 est l'autre code aléatoire, que vous avez demandé. Je n'ai pas regardé a votre code pour cet erreur, parce que je ne sais pas ou commencer. C'est où? Mon macro vous donne une réponse après 0.2 seconde, donc peut-etre vous n'apercevez pas cela. L'algoritme fait son m...
16/05/2022 à 23:30seddiki_adz Code affiche erreurC'est l'autre macro "aleatoire"...
16/05/2022 à 22:30ledoc Recherche fichier sur hddBonsoir, myPath, c'est quoi ...
16/05/2022 à 22:26seddiki_adz Code affiche erreur...
16/05/2022 à 20:25seddiki_adz Code affiche erreurExcel2016 ou excel2021-365 ...
16/05/2022 à 17:33Val53200 Extraction de données quotidienne avec historiqueUn petit peu différent...
16/05/2022 à 15:27EldunariDiagramm de Venn à 6 ensemble@ordonc, l'original vaut mieux que la copie, vous avez utiliser le meme idée que moi, mais moi, ajoute chaque fois une colonne à l'array et vous le faitez en une fois, okay, différence mineur, mais vous ne regardez pas le nom des feuilles ( VENN) et une fois que vous ecrivez cet array le nom de la n...
16/05/2022 à 11:23EldunariDiagramm de Venn à 6 ensembleUn tout petit adaption, de manière qu'il ne faut plus changer ce numéro...
16/05/2022 à 10:00bibouden Selectionner plusieurs réponse d'un menu déroulantAvec ce link vers "contextures" https://www.contextures.com/xldataval11.html#videodemo , on peut echanger votre liste deroulante par un combobox avec pour le moment 1 (mais après modif multiple) selections. Tout dépend de ce que vous voulez...
16/05/2022 à 01:22bibitoune Mettre voix sur tirage lotoPourtant, je pense que je fais de mon mieux ... (et avec de bonnes solutions, on me pardonne la manque de politesse)...
15/05/2022 à 22:50bibitoune Mettre voix sur tirage lotoUn anglais qui parle français. Application.Speech.Speak "vingt e un,, vingt deu, dis,, onse,, karant,, trante" on peut ajouter des voix male et female https://www.access-programmers.co.uk/forums/threads/vba-ms-access-text-to-speech-other-language.3137.....
15/05/2022 à 19:49cheickna Comment changer l'expéditeur d'un e-mail en VBA?C'est assez special, que vous pouvez utiliser des macros dans votre firme, normallement on interdit cela, précaution ! Puis Outlook n'aime pas ce "SEND", il y a un popup qui demande si c'est okay pour tans de minutes (or vous n'avez pas ce problème ???), qu'on peut contourner avec un SENDKEYS CTRL+E...