| Date | Auteur du sujet | Sujet | Extrait du message |
|---|
| 03/04/2019 à 11:44 | vpcmarket | Aide pour macro suppression ligne dont valeur ne commence pas par | Montre déjà ce que tu as pu faire, en précisant ce qui ne va pas . A+... |
| 03/04/2019 à 11:41 | daxilane | Incrémentation onglet | Un essai pour le premier groupe de feuille: à adapter pour le deuxième groupe de feuille avec TList1 = Array("FAC", "FAU", "FAD", "PAC", "PAU", "PAD", "EAC", "EAU", "EAD") A+... |
| 03/04/2019 à 11:26 | daxilane | Incrémentation onglet | 2400 feuilles dans le même classeur ? Pas sûr que ce soit facile à gérer... |
| 03/04/2019 à 11:04 | lolospeed | Fonction RANG exclure les valeurs null | Extrait de l'aide Excel accessible facilement: Bonne suite... |
| 02/04/2019 à 23:34 | lolospeed | Fonction RANG exclure les valeurs null | Essayer de remplacer =RANG(H6;$H$3:$H$85) par =SI(H6>0;RANG(H6;$H$3:$H$85);"") à tirer vers le bas A+... |
| 02/04/2019 à 21:04 | marine_jj | Cherche si contient suite de chiffre dans cellule | Je suppose que j'ai trouvé. Par exemple, en feuille Espece cellule F9 on trouve la formule : =SI(ESTERREUR(CHERCHE("*1,*";Feuil2!J9));"1";"0") tu t'attends à ce que la formule renvoie 0 parce La cellule Feuil2!J9 contient 131. Mais ..... ce qu'on cherche n'est pas un nombre se terminant par 1, mais... |
| 02/04/2019 à 19:02 | Ningun54 | Afficher des alertes pour suivi | Pas précisé, mais Private Sub Workbook_Open() ne peut être que dans Thisworkbook ... |
| 02/04/2019 à 18:03 | marine_jj | Cherche si contient suite de chiffre dans cellule | Bonjour; Un extrait de classeur permettrait de concrétiser réflexions et tests . A+... |
| 02/04/2019 à 17:57 | Ningun54 | Afficher des alertes pour suivi | En principe ce n'est pas possible puisque l'on teste les cellule de la feuille en cours dans la boucle . Sauf le rajout And Range("M" & DL) <> "" qui sera fait sur la feuille courante Excel puisque non rattaché à la feuille de la boucle par . Dans le classeur joint la colonne M est vide...sur... |
| 02/04/2019 à 15:23 | KOBD | Aide pour macro VBA | Sur le principe, ça ressemble étrangement à la macro6! Juste modifier And .Cells(j, 11).Value = .Cells(jj, 11).Value puisqu'on veut les valeurs identiques au signe près. et modifier le message affiché. Par contre les informations écrites par la macro6 d'origine risquent d'être écrasées par ce nouvea... |
| 02/04/2019 à 15:12 | Ningun54 | Afficher des alertes pour suivi | Sur cette dernière question: tester cette solution : A+... |
| 02/04/2019 à 14:47 | reinruof77 | Leger probleme sur Macro | Heu... finalement non; ma correction est absurde. Est ce qu'il n'y aurait pas qu'une donnée en AT1 dans cette colonne AT ... |
| 02/04/2019 à 14:05 | KOBD | Aide pour macro VBA | Après avoir copier la macro dans le classeur ( et modifier le nom de la feuille), le résultat obtenu correspond à celui attendu ??? Soit je n'ai rien compris, soit il manque des précisions ..... |
| 02/04/2019 à 13:57 | forum12 | Macro Extraction | Il me semble qu'on pourrait directement mettre des formules dans le classeur plutôt qu'une macro. ouvrir le classeur Extraction et les 3 autres classeurs. Dans le classeur Extraction : taper = puis sélectionner la cellule voulue dans un des autres classeurs, puis valider . même opération pour les de... |
| 02/04/2019 à 12:04 | reinruof77 | Leger probleme sur Macro | Ah oui! Un défaut de rattachement à une feuille (Rows.count). La ligne à modifier: Justement !, l'utilisation de variables permet de boucler sur tous les classeurs à traiter sans avoir besoin de saisir leur nom à l'ouverture et à la fermeture. A+... |
| 01/04/2019 à 19:41 | Remy00 | Combobox variable en cascade | Vous avez su alimenter la Combobox1 dans Private Sub Userform_Initialize(). A quelques détails près, c'est la même chose : Ce code , adapté, est à placer dans Private Sub ComboBox1_Click() puisque c'est à la sélection (clic) dans la combobox1 que devra se déclencher le remplissage de combobox2. A+... |
| 01/04/2019 à 19:11 | larryco | Bouton option renvoi message sur celllule si click et TextBox renseignées | Je ne vois pas ce qui diffère entre la demande et le résultat du code. Je vais tenter de vous aider sur ce point, mais il faudra plus de précision que ça! A+... |
| 01/04/2019 à 14:51 | clemm | Lancer VBA sans Bouton | La cellule O9 est modifiée manuellement ou par formule ? Si c'est par formule Worksheet_Change ne fonctionne pas . Si manuellement joignez le code en défaut . A+... |
| 01/04/2019 à 14:04 | ericw | Fonction kill file qui ne fonctionne pas | Pour enregistrer sous et rester sur le classeur origine, utiliser SaveCopyAs au lieu de SaveAs... |
| 01/04/2019 à 12:32 | ericw | Fonction kill file qui ne fonctionne pas | Heu ... a priori si ... Dans la Sub save_excel() : [code]' Cr?er une instance Windows Script pour retrouver le chemin du bureau Set WshShell = CreateObject("WScript.Shell") sRep = WshShell.SpecialFolders("Desktop") ' <= initialisation du répertoire de sauvegarde : Bureau Set WshShell = No... |
| 01/04/2019 à 12:20 | reinruof77 | Leger probleme sur Macro | Si j'ai bien compris , la plage à copier serait A2:ATx ; x étant la dernière ligne "occupée" de la colonne AT. Une instruction plus simple: Pour éviter de "jongler" avec les Windows("xxxxx.xlsm").Activate Il est préférable de déclarer des variables pour identifier les Classeurs et la feuille souhait... |
| 01/04/2019 à 08:46 | Chouchou42 | Problèmes de courbe graphique | Essayer : clic droit sur la courbe à mettre en nuage de point, choisir type de graphique, puis nuage de point. (pour XL 2003; est ce valable pour 2013 ?) EDIT : Bonjour evolm... |
| 01/04/2019 à 08:36 | amerigo | Incrémentation de la valeur d'une cellule en fonction d'une condition | Une solution "trame" à base de deux boucles, l'une balayant la Feuil1 et la seconde, imbriquée, balayant la Feuil2. Attention, cette macro va incrémenter la cellule en Feuil2 à chaque lancement, il faudrait peut-être prévoir un indicateur pour signaler que le traitement à déjà été fait ? Si il y a b... |
| 31/03/2019 à 13:45 | Nowhereman | Input box avec choix | La modification de la valeur d'une cellule par formule ne déclenche pas l'évènement Worksheet_Change . Dans l'exemple fourni, on pourrait utilise l'évènement Worksheet_Calculate . Mais cet évènement se déclenchera à chaque modification qui mettra à jour une formule dans la feuille. A voir A+... |
| 30/03/2019 à 16:05 | karimovich | Macro - Consolidation des données | A défaut de macro, une formule à écrire en C2 Feuil2: =SOMME.SI(Feuil1!$A$2:$A$21;Feuil2!$A2;Feuil1!C$2:C$21) à tirer vers le bas et la droite (colonne D). Pour la colonne E, pas compris ce qui est attendu. A+... |
| 30/03/2019 à 15:00 | DEMBELENOSS | Nombre en lettre | Un exemple dans cette discussion : https://forum.excel-pratique.com/viewtopic.php?f=10&t=28766... |
| 30/03/2019 à 14:53 | Invité | Random et Seed | L'aide Excel sur la fonction Rnd() devrait être en français. Sinon : https://www.excel-pratique.com/fr/fonctions-vba/rnd... |
| 30/03/2019 à 14:44 | larryco | Bouton option renvoi message sur celllule si click et TextBox renseignées | Ben ... heu ... à coté pour plusieurs raisons: L'écriture dans la feuille ne doit pas se faire au moment du clic sur l'optionbutton (OptionButton1_Click), mais lors du clic sur le bouton Validation ( CommandButton1_Click) comme les autres données saisies. Puisqu'il n'y a qu'un seul optionbutton, pas... |
| 29/03/2019 à 19:08 | larryco | Bouton option renvoi message sur celllule si click et TextBox renseignées | La ligne de code : est à mettre, comme dit précédemment, dans la procédure Private Sub CommandButton1_Click() Dans cette procédure vous trouverez du code dont une boucle For Each... Next. La ligne de code est à copier juste après le Next. Cette boucle For Each ...écrit la saisie des textbox dans la... |
| 29/03/2019 à 14:56 | Le Drosophile | Utilisation de Check boxes dans UserForm - Relancer le traitement | Presque le même principe que ric , une autre solution ... |
| 29/03/2019 à 12:13 | Ludush | Sélection de plusieurs feuilles déclarés | Dans Sheets(Array(cptcc, actcc)).Select , Sheets "attend" des noms de feuille, pas les feuilles elles-mêmes (cptcc et actcc étant des objets feuilles). Dans le array utiliser cptcc.Name et actcc .Name, et ça devrait fonctionner. A+... |
| 29/03/2019 à 11:11 | Saphir | Inversion de raisonnement | La macro est à copier dans un module standard... |
| 29/03/2019 à 10:14 | Saphir | Inversion de raisonnement | Une solution macro à peaufiner: A+... |
| 28/03/2019 à 19:38 | larryco | Bouton option renvoi message sur celllule si click et TextBox renseignées | Effectivement , puisqu'on n'a que deux valeurs à traiter on peut utiliser 1 seul optionbutton. les modifications suivantes prennent en compte un seul optionbutton . cliqué= ENT, non cliqué = SOR Le code modifié pour vérification des doublons Les modifs pour l'écriture dans Private Sub CommandButton1... |
| 28/03/2019 à 17:49 | MrVBA | Macro sur 380 000 lignes extremement lente | Et par une macro Tableau et dictionary ca devrait être rapide! Peu familiarisé avec somme.si.ens, si j'ai bien compris ça revient à sommer en J les valeur de H correspondant à Bi dans la colonne B? Avec quelques données pour essais ... A+... |
| 28/03/2019 à 15:12 | pserres | USER FORM / Recherche et Engistrer > Problème | Le plus simple est sans doute de mettre une combobox pour faire apparaitre les "BAT" et suivre l'exemple en l'adaptant de ton classeur dans Private Sub ComboBox1_Change()... |
| 28/03/2019 à 14:52 | pserres | USER FORM / Recherche et Engistrer > Problème | Dans : tu indiques bien sur quelle feuille tu va chercher la dernière ligne. Pour l'écriture, c'est pareil, il faut préciser la feuille où on va écrire. pour éviter d'avoir à l'écrire à chaque ligne et alléger le code, on peut écrire (sans oublier le . avant range) : A+... |
| 28/03/2019 à 14:40 | bellil djillali | Trouver tous les combinaisons possible de la somme | Comme dit précédemment, il vaut mieux ouvrir une nouvelle discussion. Il y a peu de chance que quelqu'un viennent voir à la troisième page d'une discussion s'il y a de nouveaux soucis. Bonne suite... |
| 28/03/2019 à 14:36 | AxelleGreen | Comment récupérer tous les indices dans un Array? | Heu... !! mille excuses !! j'étais resté sur le code de AxelleGreen qui balaye la colonne A et pour chaque A veut tester le tableau... |
| 28/03/2019 à 13:07 | AxelleGreen | Comment récupérer tous les indices dans un Array? | Une solution sans boucle (pour un petit tableau) : avec une boucle: @ i20100 Attention, avec ce code For i = LBound(TabDate) To UBound(TabDate) If Range("A" & i) = TabDate(i) Then Range("E" & i) = "VRAI" Else: Range("E" & i) = "FAUX" Next i Si en A la date correspond à la première ou deuxième date d... |
| 28/03/2019 à 12:25 | bellil djillali | Trouver tous les combinaisons possible de la somme | Vous cherchez le code ou vous cherchez à réalisez le code? Nouveau souci = nouvelle discussion. Il faudra apporter plus de précision que des contraintes en vrac et préciser si la meilleure solution est la plus petite , la plus grande .... Bonne suite... |
| 28/03/2019 à 10:03 | larryco | Bouton option renvoi message sur celllule si click et TextBox renseignées | En supposant que les boutons rajoutés sont des optionbutton Dans Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) récupérer si entrée ou sortie après rajouter le test : Pour l'écriture dans la feuille, dans Private Sub CommandButton1_Click() On sait déterminer si Entrée ou Sortie , o... |
| 27/03/2019 à 18:27 | ghouviz | Formule Excel: oui/non si tous les postes presents? | Pas tout compris. Les cellules C9,C18 et C31 sont vides. NB.VIDE(C5:C33) compte les cellules vide de la plage. Donc au minimum 3 (celles ci dessus) NB.VIDE(C5:C33) est supérieur à 3 si des cellules autres que C9,C18 et C31 sont vides. Si tu veux supprimer quelques lignes de cette plage, si au final... |
| 27/03/2019 à 17:12 | Osaka | Recherche par textbox et affichage résultat dans listbox sous condition | @ Osaka En fin de Sub UserForm_Initialize() ajouter et dans Sub charger_liste() , supprimer à vérifier si sur une grosse base on gagne du temps? A+... |
| 27/03/2019 à 16:41 | Osaka | Recherche par textbox et affichage résultat dans listbox sous condition | Ok, je termine, je teste et retour... |
| 27/03/2019 à 16:15 | Osaka | Recherche par textbox et affichage résultat dans listbox sous condition | Il n'est pas question d'effacer mais seulement d'essayer d'accélérer le traitement. Est ce qu'on ne cherche que si colonne V ="9999" ? si oui il y aurait une façon d'accélérer le traitement. Ce serait un peu plus long au démarrage (quelques secondes) mais toutes les autres recherches seraient plus r... |
| 27/03/2019 à 15:16 | Osaka | Recherche par textbox et affichage résultat dans listbox sous condition | Donc c'est normal que ça affiche toute la base ! Concernant charge liste, qui à priori est appelée souvent, plutôt que d' alimenter un tableau qui alimentera la listbox à chaque appel, le tableau pourrait être initialiser une fois dans la Sub UserForm_Initialize() et dans la Sub charger_liste() ne l... |
| 27/03/2019 à 14:21 | Osaka | Recherche par textbox et affichage résultat dans listbox sous condition | Dans Sub TB_RECHERCHE_Change() on trouve dès le début: Si on ne saisit rien dans la TextBox TB_RECHERCHE , alors Len(Me.TB_RECHERCHE) = 0, donc on lance chargerliste qui va remplir la listbox avec toute la base ! Si on ne veut plus de cette fonctionalité, supprimer ces 3 lignes sans oublier le End I... |
| 27/03/2019 à 14:00 | sylviez91 | Gestion de délai Excel | Alors à quoi servent Si date actuelle <= 90 j DL = A prévoir et Si date actuelle <91 j DL= OK ????... |
| 27/03/2019 à 13:57 | oiseaubleu | Sélection Change avec liste déroulante | Transférer le code contenu dans Private Sub Worksheet_SelectionChange(ByVal Target As Range) dans Private Sub Worksheet_Change(ByVal Target As Range) le code se déclenchera après modification. A+ Edit : ou modifier simplement le nom Private Sub Worksheet_SelectionChange(ByVal Target As Range) en Pri... |