Passionné d'Excel

Inscrit le :19/10/2014
Dernière activité :07/09/2023 à 12:26
Version d'Excel :2019 FR
Lieu :Sète
Messages
5'700
Votes
1'100
Fichiers
6
Téléchargements
39'144
Fichiers ExcelSujetsMessagesStatistiquesVotes reçus

Messages postés par ThauThème - page 84

DateAuteur du sujetSujetExtrait du message
14/12/2016 à 23:57mipecTexte si cellule videRe, Dommage ! J'ai cassé hier ma boule de cristal... Quel poste ? Quelle date ? Quel mot ...
14/12/2016 à 23:36leboucher57 Tri de date dans une seule colonne avec un userformRe, Je ne compte pas les lignes de TV (qui représentent toutes les lignes), mais celles de TL , qui représentent celles où les dates correspondent ! Chaque fois que la condition est avérée on incrémente K de 1 ( K = K + 1 ). Comme on a initialisé K = 1 au début, le nombre de lignes qui vérifient la...
14/12/2016 à 23:30YOUNESS1972 Obligation de remplir les textbox pour validerSi ça marche et que ça te convient utilise ça bien sûr ! Tape quand même : 45/08/12 ou 23/5/201 ... Il est évident que ce ne sont pas des dates valides mais tu auras des surprises avec le code que tu proposes car tu n'es pas à l'abri d'une erreur de saisie...
14/12/2016 à 23:14WestpointElimination séléctive de lignes - problème de codeSi les données ont toujours les mêmes structures au début : 4 lettres suivies d'un tiret, suivi de trois chiffres ou 4 lettres suivies de trois chiffres le code ci-dessous devrait convenir ...
14/12/2016 à 22:23mipecTexte si cellule videIl n'est pas permis d'appliquer une condition dans une cellule qui aurait la valeur de cette propre cellule dans la condition. Ça génère une référence circulaire... Par exemple je peut écrire en B1 : =SI(A1=1;"1";"différent de 1") qui fera que si j'ai 1 en A1 j'aurais 1 en B1 et si j'ai une autre va...
14/12/2016 à 22:04YOUNESS1972 Obligation de remplir les textbox pour validerPas sûr à 100 % mais quand même bien efficace et relativement simple. D'abord on limite à 10 le nombre de caractères que peut contenir la TextBox à 10 maximum Puis, on limite les touches du clavier pour la TextBox aux seuls caractères {/, 1, 2, 3, 4, 5, 6, 7, 8 ou 9} Et enfin on vérifie que le texte...
14/12/2016 à 21:01leboucher57 Tri de date dans une seule colonne avec un userformVoilà le nouveau code qui fait tout. Il te faudra le placer dans le classeur source (celui qui contient les données avec les dates) et adapter le nom de l'onglet des données (moi je l'ai appelé Feuil1 , tu adapteras) : Le code Les fichiers qui vont bien pour tester ...
14/12/2016 à 20:10gabinos Modification macro pour couleur cellulesJ'ai réinitialiser ton tableau en remettant les couleurs d'origine et j'ai retapé toutes les séries qu'il contenait. Je n'obtiens aucun dépassement avec le code ci-dessous. Comme il se trouve est dans l'événement Change de l'onglet, il est inutile d'y faire référence. J'ai donc supprimé le With... E...
14/12/2016 à 17:17gabinos Modification macro pour couleur cellulesRe, On a tous commencé en tâtonnant et je suis loin d'être pro !... Ce que j'aimerais que tu me précises, se sont le conditions : 1ère - inférieur (ou égal) à... ou de tant à tant ou supérieur (ou égal) à ... 2ème - inférieur (ou égal) à ... ou de tant à tant ou supérieur (ou égal) à ... 3ème - infé...
14/12/2016 à 14:56gerald.lebret Loop et checkboxRe, Code corrigé ! J'ai déplacé le définition de LastRow à l'intérieur de la boucle If ctrl.Value = True Then .....
14/12/2016 à 14:51YOUNESS1972 Obligation de remplir les textbox pour validerEssaie comme ça ...
14/12/2016 à 14:43gabinos Modification macro pour couleur cellulesRe, Je ne comprends rien à tes conditions If . Les commentaires de code ne correspondent pas au code. Voici ton code avec les commentaires correspondants. Tu verras qu'il y a des aberrations. J'ai mis systématiquement des points devant les Range car, malgré ce que tu dis, ça a une importance.....
14/12/2016 à 14:02gerald.lebret Loop et checkboxRe, Essaie comme ça : C'est rare de voir une UserForm aussi bien structurée ! Bravo, ça permet un code simple.....
14/12/2016 à 12:16gerald.lebret Loop et checkboxRe, Oui désolé je n'avais pas vu qu'il y avait une UserForm . C'est plus clair maintenant... Toutefois je ne vois pas l'utilité de l'onglet Activité . Quel est-il ? Je regarde ça après le repas.....
14/12/2016 à 11:46gabinos Modification macro pour couleur cellulesJe n'ai pas pris le temps de bien regarder ton fichier mais je vois des points dans ta ligne de code. J'imagine qu'elle est précédée d'un : With Sheets("feuil2") et terminée par un End With . Dans ce cas ne manquerait-il pas un point devant Range("o34") ...
14/12/2016 à 11:35gerald.lebret Loop et checkboxRe, Gérald désolé mais je ne vois aucune Checkbox dans ton fichier. Je conçois que tu effaces les données confidentielles mais laisse au mois des données bidons pour qu'on puisse comprendre !... Soit plus clair dans tes explications, je ne sais même pas de quel onglet tu parles. Je ne peux rien pour...
14/12/2016 à 10:39RemBabar VBA et les FiltresRegarde FilterMode .....
14/12/2016 à 10:35gerald.lebret Loop et checkboxD'abord je ne comprends pas, malgré tes explications, ce qui clochait dans le code que je t'avais proposé. Ensuite, sans un fichier exemple, je ne vois pas comment t'aider davantage...
13/12/2016 à 13:45guytine Renomer feuille en meme temps que sa creationDommage que tu n'aies pas fourni ton code. On aurait pu ainsi te proposer un code adapté. Mais il n'y a rien de plus simple pour renommer un onglet. Il te suffit qu'il soit actif est d'écrire un code du style : Bien sûr il te faudra vérifier que la cellule pointée ne contienne aucun caractère interd...
13/12/2016 à 13:36gerald.lebret Loop et checkboxEssaie comme ça ...
13/12/2016 à 10:24leboucher57 Tri de date dans une seule colonne avec un userformUn petit exemple de ce qui peut se faire (facilement adaptable). Tu cliques sur le bouton D ate , tu rentres une date et dans l'onglet Feuill2 sont renvoyées toutes les lignes contenant cette date en colonne B . Un message indique combien de lignes il y a. Tu n'auras ensuite qu'à copier ces lignes e...
12/12/2016 à 22:31canto33 Combobox-additemRe, J'avais corrigé dans l'exemple de la boucle mais j'ai refait l'erreur dans le code entier : ZLEtudiant.AddItem lacellule Sous entendu, lacellule.Value.....
12/12/2016 à 22:10canto33 Combobox-additemVoyons d'abord ce qui cloche dans ton code : • première erreur : Plage = ... qui devrait être Set Plage = ... • Ensuite deux boucles For Each... Next et For i = 1 to 52... Next i C'est soit l'une soit l'autre ! ou Ton code modifié donnerait : ou l'autre boucle... mais, pour éviter lers cellules vide...
12/12/2016 à 14:56futurneo Formule de rechercheUne proposition par macro au cas où... (je te conseille quand même l'utilisation de la formule d'Amadéus) le code ...
12/12/2016 à 12:15a_loicPremière donnée à droiteRe, Je pense avoir isolé ce qui concernait la colonne 16 mais la proposition que je te fais implique qu'il y ait toujours une valeur en colonne 16 ou dans les autres sinon ça va planter... le code modifié ...
12/12/2016 à 10:36a_loicPremière donnée à droiteDifficile de pouvoir t'aider avec à peine un bout de code... À défaut du fichier, au moins le code intégral !.....
12/12/2016 à 10:28a23peter43Renvoyer la valeur d'une ligne/colonneRe, Essaie comme ça ...
12/12/2016 à 10:08a23peter43Renvoyer la valeur d'une ligne/colonneIl semblerait que tu inverses la ligne et la colonne. Si Y est la colonne et X la ligne, tu devrais écrire : À voir aussi Range("E:E") au lieu de Range("E") Puis, pourquoi renvoyer la colonne d'une recherche dans la colonne E ? Ça sera toujours la colonne E .....
04/12/2016 à 14:52manousheProblème IF/WHILE/FORJe n'ai ouvert ton fichier que pour voir que les noms des onglets différaient. J'ai refermé aussitôt... Quand tu agis sur plusieurs onglets mieux vaut spécifier que sélectionner . D'ailleurs, en règle générale, il faut toujours éviter les Select inutiles qui ne font que ralentir l'exécution du code...
04/12/2016 à 14:27KAZKAD Impossible de récupérer la valeur d'une celluleDésolé Kazkad mais je rejoins GMB dans son propos. Nous ne sommes pas des devins et les boules de cristal sont tellement fragiles... Créer un fichier anonyme est tellement rapide. Avec juste une poignée de données et le contexte de ton fichier original. C'est juste de la flemme pure de ta part car j...
04/12/2016 à 14:21TCFVerrouillage conditionnel de celluleRe, De mémoire : l'onglet déverrouillé, j'ai sélectionné toutes les cellules (en cliquant sur le rectangle à l'intersection des lignes et de colonnes en haut à gauche) j'ai utilisé la boîte de dialogue Format de Cellules , onglet Protection et j'ai décoché la case Verrouillée . j'ai copié le code pr...
02/12/2016 à 12:29KAZKAD Impossible de récupérer la valeur d'une cellulePas sûr d'avoir bien compris... Essaie comme ça ...
02/12/2016 à 11:10ggibierReport d'informationRe, Non désolé. J'suis nul en formules... Regarde ma signature.....
02/12/2016 à 11:04sysquaMasquer toutes les feuilles sauf 2 avant fermetureEssaie comme ça : [Édition] Grillé par Theze que je salue au passage.....
02/12/2016 à 10:36Marsala17Remplissage CelluleEn B1 ( Feuil1 ) la formule : =RECHERCHEV(A1;Feuil2!A1:B14;2;FAUX) Remplace "A1:B14" par la plage du tableau de l'onglet Feuil2 .....
02/12/2016 à 10:16ggibierReport d'informationSi la première ligne contient des étiquettes ("Nom de L'entreprise" et "Montant" par exemple), le code ci-dessous devrait convenir ...
02/12/2016 à 09:18cisco38Variable litbox publicLes variables publiques doivent être déclarées au début d'un module standard ... Pas d'ans le module de l' UserForm ...
02/12/2016 à 09:02TCFVerrouillage conditionnel de celluleEn pièce jointe ton fichier modifié.....
01/12/2016 à 17:17TCFVerrouillage conditionnel de celluleRe, Au départ aucune cellule verrouillée.....
01/12/2016 à 16:20TCFVerrouillage conditionnel de celluleEn pièce jointe ton fichier modifié avec le code ci-dessous ...
01/12/2016 à 16:05Débutant.com Un commentaire dans une ComboBox /USerFormEn pièce jointe ton fichier modifié. J'ai rajouté une Textbox qui se masque/affiche en fonction.....
30/11/2016 à 15:46Jizinho Recherche d'une date (ds 6 colonnes) et afficher la valeurBonjour Jizinho (ou Dan), bonjour le forum, C'est étrange que tu fasses l'effort de mettre des fichiers en pièces jointes mais qui ne sont que des captures d'écran. Pourquoi pas le fichier directement ? C'est comme si tu amenais la photo de ta roue crevée au garagiste pour qu'il la répare (oui je sa...
29/11/2016 à 16:26nananinanana Interdir textbox et combobox vide dans userformEn début de code du CommandButton de validadion de ta UserForm : Suivi du reste de ton code.....
17/11/2016 à 17:21Scorpdragon Rechercher une valeurEssaie comme ça ...
07/11/2016 à 18:28BOBO94 Transposer plusieurs lignes dans la meme colonneBeaucoup trop de cellules vide !... J'ai rajouter une condition pour réduire le nombre de cellules traitées. Le code ...
06/11/2016 à 13:42Tom4354 Code VBA de ma commande "modifier" erronéDeux problèmes dans ton code : Premier Range("A:A").End(xlDown).Row renvoie la ligne 4 (première ligne éditée de la colonne A) Il aurait fallu écrire Range("A" & Application.Rows.Count).End(xlUp).Row qui aurait renvoyé 13 Car une boucle d'une valeur à une autre valeur inférieure à la première, va di...
31/10/2016 à 10:51rahimpameloBoutton de liaisonIl te faut utiliser le chemin d'accès complet de ton fichier, suivi de son nom complet avec extension. Si, par exemple, tu veux ouvrir le fichier qui se nome Classeur1.xlsx et qui se trouve dans le dossier : C:\Users\Rahimpamelo\Documents , tu devras écrire : [Édition] Bonjour Bouben, nos po...
04/10/2016 à 13:38MorinoExécution macro en fonction de la valeur d'une celluleC'est clair mais je n'ai aucune idée de comment on pourrait faire ça.....
03/10/2016 à 22:03MorinoExécution macro en fonction de la valeur d'une celluleJe ne comprends pas ta question. Même quand un filtre est actif tu as la liste entière en A2 . Il te suffit de sélectionner le code désiré pour le voir s'afficher... Non ? Une remarque qui n'engage que moi : très chiant ta petite lampe qui clignote, ça prend la tête et ne donne pas envie de lire tes...
03/10/2016 à 21:58rahimpameloButton avec macroEn pièce jointe la v02.....