p

Membre dévoué

Inscrit le :14/01/2010
Dernière activité :11/12/2024 à 14:21
Version d'Excel :2010 FR
Messages
830
Votes
200
Fichiers
0
Téléchargements
0
SujetsMessagesStatistiquesVotes reçus

Messages postés par pijaku

DateAuteur du sujetSujetExtrait du message
03/12/2024 à 14:29Zizou057 Erreur code VBA / Envoi Mail+attache)Essaye ceci ...
27/08/2024 à 13:36Catroun Bouton "Annuler" d'une InputBoxPour être "safe" sans gestion d'erreur ...
27/08/2024 à 11:46Catroun Bouton "Annuler" d'une InputBoxPeut-être comme ceci ...
01/08/2024 à 15:54Cyrano Problème de boucleRaison de plus pour préciser la feuille.....
01/08/2024 à 13:56Cyrano Problème de boucleAttention également, car, si on lance la procédure depuis la feuil2 ta macro ne fonctionnera pas. En effet, l'instruction fonctionne sur la feuille active lors du lancement de ta macro. Donc, il te faut indiquer le nom de la feuille pour vraiment récupérer la bonne ligne ...
01/08/2024 à 11:45Cyrano Problème de boucleIl faut incrémenter premierelignevide à chaque fois que le test If est positif ...
01/08/2024 à 09:22vodoraixFaire clignoter une celluleLorsque, sur un forum, on te passe un bout de code, avant de l'intégrer à ton fichier, il te faut le comprendre. Sinon, cela n'a aucun intérêt, tu ne pourras pas maintenir ton fichier. J'ai eu la flemme de recopier tout ton code, mais voici ce que tu aurais dû faire : Tu n'as plus qu'à remplacer les...
31/07/2024 à 10:31vodoraixFaire clignoter une celluleDans la sub Worksheet_BeforeDoubleClick, ajouter ceci (pour I3 ET I8) ...
15/05/2024 à 15:32GladysfntExporter trois feuilles dans un nouveau fichier ExcelTu as un espace à la fin du nom de la feuille... "Portrait de territoire "...
25/04/2024 à 16:08JackyUtilisation de "ActiveSheet.Shapes"Zonenom est déclaré en début de procédure : dim zonenom as Integer zonenom doit être déclarée en dehors de toutes procédures, dans l'entête (tout en haut avant tout autre code) d'un Module "standard" (pas un module de feuille, ni d'userform). Déclare là en Public : Ensuite, as-tu essayé d'UnLoad l'u...
25/04/2024 à 15:19JackyUtilisation de "ActiveSheet.Shapes"Pas encore. Mais on avance. Sissi! zonenom est déclarée ou? Comment? La Sub que je souhaites également c'est celle du clic sur la Shape. Là tu me donnes le code d'activation de l'UserForm...
25/04/2024 à 14:47olivierporcinet ComboBox - problème de codeDans ta Private Sub ComboBox1_Change(), remplace : par : et : par ...
25/04/2024 à 14:39JackyUtilisation de "ActiveSheet.Shapes"Je n'ai pas besoin de ton fichier, mais juste du code complet se déclenchant au clic sur ta Shape. Y compris ce qu'il y a avant et après "nom = WorkSheets("arbre").Shxxx". De Sub Machin() à End Sub...
25/04/2024 à 13:42JackyUtilisation de "ActiveSheet.Shapes"Il n'y a, à priori, aucune raison ici d'utiliser ActiveSheet. Remplace donc tes ActiveSheet par Worksheets("arbre"). ou, encore mieux, dans un bloc With : Si, la variable zonenom est vide, il y a une raison liée au code. Donne nous donc l'intégralité du code déclenché lors du clic sur une Shape. De...
18/04/2024 à 13:38galopin01 Application.WindowStateLe ruban ne se masque pas sur la feuille Doss : Normal, tu ne masques que l'ascenseur vertical avec ce code : Essaie avec ceci : à noter que ce code masque le ruban pour toutes les feuilles et l'affiche pour la feuille "Doss"&#93...
18/04/2024 à 11:05galopin01 Application.WindowStateCette macro ne fonctionne pas comme attendu : Quel est le comportement attendu? La fenêtre se rétrécit bien et se remet à l'état maximized selon l'onglet sur lequel tu cliques...
28/02/2024 à 14:58madatana Impossible de lire la propriete Match de la classe WorksheetFunctionUne date, en VBA, est un nombre. Remplace ta déclaration comme ceci : et ensuite : Ainsi ta WorksheetFunction Match fonctionnera...
17/02/2023 à 14:14camille27 Userfome ComboBoxBonjour, Pour cela utilise la propriété ListIndex de ta Combobox ...
13/01/2023 à 16:33patricktoulonCollection de textbox formatés avec masque de saisieMention spéciale déterrage de topic... @iliyes : n'y a t il pas le même code avec partage de millier...
02/09/2022 à 12:17lemidi34Formule dans TextboxIl y a plusieurs événements qui pourraient faire ceci. Un exemple avec _Exit. A tester...
07/04/2022 à 17:20Dev007 VBA Comment exécuter une partie du code pour testNon pas de possibilité dans l'éditeur. Ce que tu peux faire c'est copier/coller le code que tu veux tester dans une Sub. Une autre solution est d'utiliser des Goto. Seulement n'oublie pas de les enlever après tes tests ...
07/04/2022 à 13:57Dev007 VBA Comment exécuter une partie du code pour testL'idéal est d'anticiper cela en créant initialement des petites fonctions et/ou Sub : ça c'est dans l'idéal. Dans ton cas, tu peux mettre en commentaire les parties à ne pas exécuter en plaçant une apostrophe en début de ligne ...
01/04/2022 à 08:36VagueraLancer une macro lorsque l'on clique sur un lien hypertexte (formule)Si la possibilité d'un "missclick" t'effraie, remplace l'événement SelectionChange() par un autre... Au choix BeforeDoubleClick (double clic sur la cellule), BeforeRightClick (clic droit).....
31/03/2022 à 11:20h2so4Défi du jour #3Désolé du retard... Je n'ai reçu aucune notification et était très pris. Je transmet en MP ma soluce à 1,141. Sinon, ma solution trichée à 1,124 est la suivante : - procédure d'une ligne, - 1 MsgBox, - 0 virgule Je respecte donc le sujet nan...
25/03/2022 à 14:36Tinko00 Export PDF vers un dossierChez moi, ça fonctionne nickel! Vérifier : le chemin et le nom du document, après la ligne Chemin = "C:\Users\Bureau\Base de données métaux\" ajouter un MsgBox : Pas si, lors du lancement de cette macro, la bonne feuille est active...
25/03/2022 à 12:19Tinko00 Export PDF vers un dossierIl vous suffit de remplacer, dans votre macro : par ...
25/03/2022 à 10:42Jacky Taille d'une fenêtre ou d'un écranIl va sans dire que, dans le cas ou la fenêtre Excel est réduite, l'Userform n'apparaîtra jamais en plein écran avec ces codes. De plus, selon les différentes résolutions, les contrôles posés sur cet UserForm peuvent avoir quelques soucis... Entre un portable de 15" et un écran de 22", vous imaginez...
24/03/2022 à 14:35fronck 1ere ligne non videDim ml2 As Range, debT As Integer et pas l'inverse. Mais tu aurais pu essayer de toi-même...
23/03/2022 à 12:45fronck 1ere ligne non vide1- Adaptez un minimum les codes donnés (cf. Dan...) 2- Vous n'avez même pas modifié le "s" à la fin d'élève dans le code de Loureed... 3- pour mon code vous avez pris le soin de changer les noms des fonctions, mais vous n'avez pas mis leurs codes.....
23/03/2022 à 10:28fronck 1ere ligne non videPour déterminer la première ligne (ou la dernière) d'une plage, je combine CountA et la méthode find, comme ceci ...
22/03/2022 à 17:46Excel38Création de dossier VBALa "bonne" façon de procéder, dans ton cas, est d'utiliser l'api faite pour... Un exemple : Que le répertoire, sous-répertoire, etc... existe, il le créera,... ou pas! Le nécessaire sera fait.....
22/03/2022 à 17:41fronck 1ere ligne non videS'il y a une possibilité que "Match" retourne une erreur (rien en colonne A), il faudrait envisager, peut-être, un double Range("A1").End(xlDown).Row , ou autre fonction grâce à find... Ne pas oublier qu'une éventuelle modification du format peut altérer ce genre de recherche (du moins, il me semble...
22/03/2022 à 17:32h2so4Défi du jour #3Coucou All, Ben moi, avec mon système de "triche", j'obtiens une macro obtenant le score de 1,097... Mais bon, je triche hein ! Félicitations pour la formule -*+ @ X Cellus! De la haute voltige...
22/03/2022 à 11:22ofleisheuerProtection FichierUne autre solution est d'empêcher l'ouverture de la database selon l'utilisateur. Cet exemple masque toutes les feuilles, sauf la Feuil1, si l'utilisateur n'est pas autorisé...
21/03/2022 à 08:39Evelyne09 Insérer un hyperlien dans un mail en VBALa mise en page se fera en html. Exemple ...
18/03/2022 à 16:31h2so4Défi du jour #3...
18/03/2022 à 16:25Evelyne09 Insérer un hyperlien dans un mail en VBAPour cela, il te faut envoyer un mail en "html". Donc, utiliser .HTMLBody au lieu de .Body. Ensuite, entourer, dans ta variable xMailBody, la partie "lien" de balises <a href> </a>. Par exemple ...
18/03/2022 à 16:15DUPONTMarion0464Etat d'avancementJ'avoue ne pas trop comprendre. Si ton classeur est partagé, regarde du côté du suivi des modifications : https://support.microsoft.com/fr-fr/office/suivre-les-modifications-dans-un-workbook-partag%C3%A9-22.....
18/03/2022 à 15:28Saucisson_47 Mettre en gras les mots en majuscule@Eric : +1 On peut aussi faire l'économie d'une boucle sur les caractères, boucle qui risque d'être chronophage en fonction des contenus des cellules ...
18/03/2022 à 15:02jmber1972 Problème ComboBox1On peut également se passer du Gestionnaire de noms : Je viens de tester, chez moi, avec ton fichier, ça passe crème...
18/03/2022 à 14:28jmber1972 Problème ComboBox1En fait, une ligne suffit, nul besoin d'une boucle. Reste à trouver la syntaxe correcte. ListFillRange ne fonctionne pas. Voyons plutôt la propriété List des ComboBox . Ici, "recherche" est le nom donné à une plage de cellules (en l'occurrence la dernière colonne de ton tableau ( ListObject )). Plag...
18/03/2022 à 13:57excelleur Userform textbox change patiente le temps que le mot entier soit saisitPrenons un UserForm, dans lequel on dessine 2 TextBox : TextBox1 et TextBox2. Le code de cet UserForm : Le résultat, visible dans la fenêtre exécution (Affichage/fenêtre Exécution) : Tu vois donc que tu peux disposer de 3 procédures événementielles pour gérer ce que tu veux. S'il s'agit de tester le...
18/03/2022 à 08:53h2so4Défi du jour #3Des ";" ? En VBA ? Sans passer par la feuille ? Très fort. Perso, en flirtant avec les règles, j'en suis à : 1,124... Mais je triche.....
17/03/2022 à 14:03h2so4Défi du jour #3Si tout le monde met une MsgBox, que l'on ait 1,XXX, ou 0,YYY ne changera rien. Reportons nous donc au dernier rappel des consignes, et, plaçons tous un beau MsgBox... Tout comme toi curulis57, suis impatient de voir les solutions à 1,128 ou 1,132... Et après les résultats définitifs, un petit débri...
16/03/2022 à 10:31h2so4Défi du jour #3Bon... L'absence de MsgBox indique, dans le fichier, "contraintes non respectées". Si l'on peut faire avec 0 MsgBox, le score de Mc Charon peut facilement passer de 1,128 à 0,157 et j'aurais une solution à 0,177. Alors, ma question est : peut-on se passer de MsgBox (cela me semble aller à l'encontre...
16/03/2022 à 08:46h2so4Défi du jour #3Je me suis penché sur la macro Demander_a qui ne compile pas (c'est moi qui l'ai donné). Ce qui pose souci, dans celle-ci, c'est le If Then. Il suffit, pour que ça compile, de le remplacer par un IIf : Le jeu continue ou les scores affichés sont définitifs...
15/03/2022 à 18:15h2so4Défi du jour #3Pour améliorer ton score, il te faut le moins possible de : - MsgBox (1 suffit), - virgule. Si tu obtiens un score de 5 virgule des poussières, c'est que tu dois avoir trop de virgules... Reprend les codes d'H2SO4, et tu verras qu'il y en a 1 ou 2 à améliorer.....
15/03/2022 à 15:37h2so4Défi du jour #3Oui, c'est une boulette. Mais, perso, j'ai appris quelque chose dans ce fichier. Maintenant, le défi pourrait : - se terminer plus tôt, - consisterait à "exploser" le score en faisant "péter" ici même nos propres résultats, sur la base des propositions déjà données... J'en suis à 2,14 . 1,148...
15/03/2022 à 15:24h2so4Défi du jour #3Ben oui. Parce que, du coup, parmi les quelques propositions du fichier de H2SO4, il y a encore mieux à trouver... Même si c'est plus facile avec les propositions.....
15/03/2022 à 14:59h2so4Défi du jour #3Dans ton fichier, il y a toutes les solutions.....