| Date | Auteur du sujet | Sujet | Extrait du message |
|---|
| 03/01/2019 à 12:33 | Etudes46 | Lier valeur d'une cellule avec un texte | Bonjour Etudes46 , M12 , je propose la formule de M12 avec 2 petites modifs : motif : c'est pas d'bol, hein ? prendre la peine d'enlever le « s » de « objets » quand il est au singulier, mais laisser 2× « je vend » sans « s » alors qu'au présent, il le faut pas seulement pour « tu vends », mais auss... |
| 03/01/2019 à 12:01 | Nismo | Verifier que la valeur textbox n'existe pas déjà | Ben euh, j'vois pas bien en quoi il est allégé. dhany... |
| 03/01/2019 à 11:34 | Nismo | MsgBox valeur textbox n'existe pas déjà | @ Nismo j'ai vu ton fichier, mais il est vraiment trop brouillon, et tout est mélangé ! * un module de classe vide et inutile * 14 modules, dont 3 sont vides : Module3 ; Module4 ; Module5 ➯ compter 11 modules, mais vu leur contenu, c'est encore trop ! * ton module ThisWorkbook est vide , mais tu as... |
| 03/01/2019 à 09:21 | Astaukin | Mfc d'une date supérieure à 3 ans | Bonjour Astaukin , le forum, bon, alors ta Mfc est périmée, tu peux la jeter. dhany... |
| 03/01/2019 à 08:47 | Dakup | Liste de produits intelligents | Un TCD ? aïe ! c'est encore plus mystérieux ! à tout hasard, je précise pour Dakup : TCD = T ableau C roisé D ynamique mais bon, c'est bien vrai que l'énoncé manque de clarté ! dhany... |
| 03/01/2019 à 08:25 | al87 | Ouvrir Onglet Année en cours | @ al87 pour cacher toutes les feuilles " Retraites " sauf celle de l'année en cours , je te propose ce nouveau code VBA : attention : ne pas oublier qu'il est impossible de cacher toutes les feuilles du classeur ! une doit forcément rester visible ! donc il faut faire, dans cet ordre : 1) rendre vis... |
| 03/01/2019 à 07:27 | al87 | Ouvrir Onglet Année en cours | Bonjour al87 , nan, sans blague ? c'est vrai, ça ? dans mon code VBA, il y a : An = Year(Date) * Date retourne la date système du PC, donc si elle est à jour sur ton ordi, c'est le 3 janvier 2019 * Year(Date) retourne l' année de la date système : 2019 * ainsi, la variable An contient 2019 * donc en... |
| 03/01/2019 à 06:59 | sf29 | Conserver "figer les volets" dans un fichier après fermeture d'Excel | Bonjour sf29 , Chris , tu trouveras probablement une sub Workbook_Open() qui s'amuse à libérer les volets pour te faire une farce ! c'est pourtant pas encore le 1er avril ! bonne année 20 19 ! dhany... |
| 03/01/2019 à 06:19 | mirka64 | OCell range | Bonjour mirka , Isabelle , à tout hasard, je précise que tu trouveras le " Gestionnaire de noms " sur l'onglet " Formules ", groupe " Noms définis ". dhany... |
| 03/01/2019 à 05:53 | JAMESDEAN13480 | Formule pour calcul automatique ? | Bonjour JamesDean , le forum, pour le fun : =SI(C20<48000;0;SI(C20<=60000;C20*1,5%;(C20-60000)*3%+900)) bonne année 20 19 ! dhany... |
| 03/01/2019 à 05:30 | morneauc | Erreur exécution dans une commande VBA | Bonjour morneauc , Jean-Eric , à tout hasard, juste une piste : dhany... |
| 03/01/2019 à 04:40 | Fred56 | Code VB pour copier coller "Valeurs" | Bonjour Fred , Jean-Eric , je te retourne ton fichier modifié : Ctrl e ➯ travail effectué Alt F11 pour voir le code VBA, puis revenir sur Excel si besoin, tu peux demander une adaptation. merci de me dire si ça te convient. dhany... |
| 03/01/2019 à 03:33 | Alex777f | VBA bibliotheque introuvable | Bonjour Alex , le forum, pour récupérer ta bibliothèque introuvable, essaye en allant au service des objets trouvés. (non, même s'il s'agit bien d'une bibliothèque d'objets, y'a pas d'service Windows à activer ! ) peut-être qu'au lieu de « Pre n iousValue » ça doit être « Pre m iousValue » ? (inutil... |
| 03/01/2019 à 03:03 | KAZ57 | Couleur cellule impossible | Bonjour KAZ57 , bonne année 20 19 ! dhany... |
| 03/01/2019 à 02:37 | Nismo | MsgBox valeur textbox n'existe pas déjà | @ Nismo lis d'abord mon post précédent, puis celui-ci. j'ai réécrit ainsi ton code VBA (avec mise entre balises de code, et indentation ! ) : si dans ton code initial tu as oublié ComboBox4.Value = "" , alors enlève le test inclus dans la boucle For : oui, j'ai bien utilisé une 2 ème mise entre bali... |
| 03/01/2019 à 02:13 | Nismo | MsgBox valeur textbox n'existe pas déjà | Bonjour Nismo , c'est très bien d'utiliser la balise code, mais tu dois placer ton code VBA entre les 2 balises, pas après ! * la 1ère balise est une balise ouvrante ; signification : « le texte placé à la suite doit être présenté comme du code VBA » * la 2ème balise est une balise fermante ; signif... |
| 03/01/2019 à 01:06 | Kanoun | Une date qui s'affiche en arrière plan et qui n'est attribuer a aucune cell | Bonjour Kanoun , merci pour ton retour d'infos ! c'est une bonne nouvelle que tu aies pu résoudre toi-même le problème. aussi, tu peux passer le sujet en résolu : clique sur près de (coin haut droit du post) ➯ ; ça permet aussi de clôturer le fil de la discussion (toi seul peut le faire, car c'est t... |
| 03/01/2019 à 00:40 | KTM | Transfert de données dans une table | @ KTM merci pour ton retour ! pour passer le sujet en résolu, clique sur près de (coin haut droit du post) ➯ ; ça permet aussi de clôturer le fil de la discussion (toi seul peut le faire, car c'est toi qui a créé ce sujet) . dhany... |
| 03/01/2019 à 00:10 | Boyoo974 | Sélectionner une ligne | Merci pour ton retour, et pour avoir passé le sujet en résolu ! bonne continuation, et bonne année 2019 ! dhany... |
| 02/01/2019 à 23:56 | al87 | Ouvrir Onglet Année en cours | @ al87 pour ne pas devoir modifier la macro chaque nouvelle année, utilise ce code VBA : dhany... |
| 02/01/2019 à 12:22 | elsouba | Macro pour coller des lignes | Merci pour ton retour d'infos, et peut-être à bientôt ! dhany... |
| 02/01/2019 à 12:04 | Sirvozze | Compteur VBA MergedCells | Bonjour Sirozze , t'aurais pas attrappé une cirrhose du foie en ayant trop bu lors du réveillon ? pa'c'que tes demi-personnes , ça craint ! tu les coupes en deux dans un remake de « Massacre à la tronçonneuse » ? des demi-journées de travail, je veux bien ; mais des demi-personnes ! j'te souhaite qu... |
| 02/01/2019 à 11:52 | MohHEN | Indirect et intersection | Bonjour MohHEN , quand tu utilises par exemple =INDIRECT($C38) : la cellule C38 doit contenir la référence d'une autre cellule ; or d'après c'que tu as écrit, c'est pas l'cas puisque C38 contient le texte " Produit 86 " ; même remarque pour D37 ; comme ça contient le texte " Total ", c'est pas une r... |
| 02/01/2019 à 11:28 | Nismo | Verifier que la valeur textbox n'existe pas déjà | Pour t'aider davantage, il faudrait ton classeur ( sans données confidentielles) ; pour cela, tu peux utiliser le bouton « Ajouter des fichiers » qui est situé juste sous la fenêtre d'édition de ton post. dhany... |
| 02/01/2019 à 11:18 | Nismo | Verifier que la valeur textbox n'existe pas déjà | Ben là, j'pige pas, car le 2 qui remplace le 1 signifie xlPart au lieu de xlWhole ; donc ça trouve " SSK " même s'il fait partie d'un texte plus long, comme " SARL SSK ". dhany... |
| 02/01/2019 à 11:08 | Nismo | Verifier que la valeur textbox n'existe pas déjà | Alors essaye avec : .Find(chn, , -4163, 2 , 1) dhany... |
| 02/01/2019 à 11:05 | Kanoun | Une date qui s'affiche en arrière plan et qui n'est attribuer a aucune cell | Bonjour Kanoun , pour pouvoir t'aider, il faudrait ton classeur ( sans données confidentielles) ; pour cela, tu peux utiliser le bouton « Ajouter des fichiers » qui est situé juste sous la fenêtre d'édition de ton post. dhany... |
| 02/01/2019 à 10:59 | Nismo | Verifier que la valeur textbox n'existe pas déjà | Bonjour Nismo , bonne année 2019 ! je te propose ce code VBA : note qu'avec le Replace$() , ça enlève tous les espaces, même ceux qui sont au milieu du texte ; si tu as besoin d'enlever seulement d'éventuels espaces à gauche et à droite, met à la place : chn = Trim$(TxtRaison.Text) ; si y'a jamais d... |
| 02/01/2019 à 10:57 | julienlavigne | Copier cellules non vides uniquement | Merci pour ton retour ! bonne continuation ! dhany... |
| 02/01/2019 à 10:28 | julienlavigne | Copier cellules non vides uniquement | Bonjour Julien , bonne année 20 19 ! je te retourne ton fichier modifié : * à l'ouverture du fichier, tu es sur la 2ème feuille, et tu peux voir qu'elle est inchangée. * va sur la 1ère feuille ; fais Ctrl e (ou clique sur ton bouton) ➯ tes lignes ont été effacées, puis copiées sur la 2ème feuille, a... |
| 02/01/2019 à 10:24 | julienlavigne | Copier cellules non vides uniquement | Ca vient ! c'est pour très bientôt ... |
| 02/01/2019 à 08:42 | LEFEBVRE T | Archivage résultats en fonction du Mois et semaine | Bonjour Thierry , bonne année 20 19 à toi aussi ! A+ après tes essais. dhany... |
| 02/01/2019 à 08:28 | Yvouille | Incompatibilité de type'' sur un ordi, pas sur l'autre | Ajout : avec le même fichier : oui ; mais peut-être pas avec le même paramétrage Excel pour le séparateur décimal. dhany... |
| 02/01/2019 à 08:25 | Yvouille | Incompatibilité de type'' sur un ordi, pas sur l'autre | Bonjour Yvouille , paritec , bonne année 20 19 à tous les deux ! d'après moi, c'est à cause du séparateur décimal ; essaye : Compteur = Compteur + Val(Replace$(Sheets("Full Stock").Range("P" & j), ".", ",")) dhany... |
| 02/01/2019 à 08:14 | al87 | Ouvrir Onglet Année en cours | Merci pour ton retour, et pour avoir passé le sujet en résolu ! bonne continuation ! dhany... |
| 02/01/2019 à 08:02 | al87 | Ouvrir Onglet Année en cours | Dhany... |
| 02/01/2019 à 08:00 | al87 | Ouvrir Onglet Année en cours | Bonjour al87 , Worksheets("Retraites " & Year(Date)).Select bonne année 20 19 ! dhany... |
| 02/01/2019 à 03:34 | elsouba | Macro pour coller des lignes | Suite de l'explication de la sub Worksheet_Change() : à ce stade : la cellule modifiée est forcément une cellule de la colonne D , ligne 9 à n1 inclus lig contient le n° de la ligne de la cellule modifiée, donc si c'est 9 , c'est D 9 qui est modifié v contient la valeur de la cellule modifiée : " ou... |
| 02/01/2019 à 00:48 | Boyoo974 | Sélectionner une ligne | Bonjour Boyoo , M12 , je te propose ce fichier Excel : * à l'ouverture du fichier, tu peux voir que la feuille " FAIT " est entièrement vide * va sur la 1 ère feuille " A FAIRE " ; sélectionne n'importe quelle cellule de la ligne à déplacer ; exemple : si tu veux déplacer la ligne 6 , sélectionne pa... |
| 01/01/2019 à 23:20 | jul997 | VBA | Bonsoir jul997 , ddetp88 , je te retourne ton fichier modifié : * à l'ouverture du fichier, tu es sur la 2ème feuille " BDD " ( B ase D e D onnées) * fais un Aperçu avant impression : déjà prêt à être imprimé (ça tient sur une seule page) * va sur la 1ère feuille, et fais plusieurs essais Alt F11 po... |
| 01/01/2019 à 12:25 | elsouba | Macro pour coller des lignes | Après exécution de Workbook_Open() , l'ensemble des valeurs des listes déroulantes sont vierges, et seules les 9 premières lignes sont affichées . Private Sub Worksheet_Change(ByVal Target As Range) : voici enfin la sub Worksheet_Change() Dim lig&, k&, p1$, p2$, p3$ : lig et k : de type Long... |
| 01/01/2019 à 11:43 | julie13 | Somme avec conditions | Merci pour ton retour ! bonne année 2019 à toi aussi ! dhany... |
| 01/01/2019 à 11:25 | elsouba | Macro pour coller des lignes | Début du code de Feuil1 (feuille "Questionnaire") : Option Explicit : pour forcer la déclaration des variables Dim NbOui As Byte, NbNon As Byte, v As String * 3 : au niveau Module, déclaration de 3 variables pour NbOui et NbNon : type Byte = octet ; pour v : chaîne de caractères de longueur fixe, de... |
| 01/01/2019 à 10:38 | elsouba | Macro pour coller des lignes | Avant de voir la sub Worksheet_Change() , il faut d'abord voir celle-ci : tu sais déjà qu'elle est exécutée à l'ouverture du classeur. Application.ScreenUpdating = 0 : évite la mise à jour de l'écran ➯ exécution plus rapide Dim lm&, plg$ : idem que Dim lm As Long, plg As String lm = Rows.Count ... |
| 01/01/2019 à 10:17 | CAP24 | Bouton de commande | Merci pour ton retour, et pour avoir passé le sujet en résolu ! bonne année à toi aussi ! dhany... |
| 01/01/2019 à 09:42 | elsouba | Macro pour coller des lignes | Bonjour elsouba , ton code initial était celui-ci : ça affiche les lignes 9 à 613 ; puis ça affiche certaines lignes selon la valeur "oui" ou "non" des différentes cellules testées ; or tout ce travail est fait à chaque fois qu'une cellule de la feuille est modifiée, quelle que soit cette cellule, d... |
| 01/01/2019 à 09:08 | Olive58120 | Calcul des écarts au quotidien | Bonjour Olive , ah, alors c'est très facile : les 2 premiers sont toujours Jolly Jumper (monté par Lucky Luke) et Tornado (monté par un cavalier masqué) ; ils sont toujours ex-æquo, loin devant Rantanplan (oui, je sais, il était pas prévu au programme, mais il a cru qu'la course était pour lui aussi... |
| 01/01/2019 à 07:12 | Atoto | Fonction si imbriqué | Bonjour Atoto , le forum, un essai : dhany... |
| 01/01/2019 à 05:22 | Emil | Supprimer puis recréer un feuillet | Bonjour Emil , Klin89 , ??? au lieu de supprimer la feuille " ID " puis la recréer, ceci est plus simple : Worksheets("ID").Cells.Clear posologie : à appeler toutes les heures, sans modération dhany... |
| 01/01/2019 à 05:03 | pskyl | Aide formule SI(OU | Petite erreur dans les formules ci-dessus ➯ correction : dhany... |