Membre fidèle

Inscrit le :03/02/2014
Dernière activité :17/02/2025 à 17:31
Version d'Excel :2016
Emploi :Technicien
Lieu :Ste-Elisabeth, qc
Messages
173
Votes
16
Fichiers
0
Téléchargements
0
SujetsMessagesStatistiquesVotes reçus

Messages postés par spage - page 2

DateAuteur du sujetSujetExtrait du message
07/10/2020 à 14:57Raphael CARRET Excel pour les nulsBon matin, La notion de deux guillemets consécutifs veut dire : RIEN ou vide. E1="""" veut dire E1 est égal à rien (donc qu'il est vide) G<>"""" veut dire : données de la colonne G est différente de rien (donc qui n'est pas vide) Pour enlever la couleur du Total général Tu pourrais essayer d'a...
06/10/2020 à 21:30ApprentiexcelCalcul de moyennes avec VBA (simple/débutant)Je crois que si tu modifie la macro suivante pour qu'elle corresponde à ton fichier, ça devrait répondre à ton besoin. Bonne journée...
06/10/2020 à 19:47theforgetxdProtection d'un tableau ExcelPeut-être une partie de la réponse à ta question à cet endroit. https://forum.excel-pratique.com/excel/verrouiller-la-cellule-si-non-vide-t7440.html BOnne journée...
06/10/2020 à 19:28Raphael CARRET Excel pour les nulsJe crois que cet exemple pourrais t'aider Voir le fichier joint Bonne journée...
06/10/2020 à 19:10faudouy Impossible de répéter des lignes à l'impressionEtrange, de mon côté ça fonctionne. As-tu essayé de défusionner la ligne d'entête, Peut-être aussi, la première ligne vide…. Bonne journée...
01/10/2020 à 21:06jeansib Fragmenter une liste Excel dans de nouvelles feuilles1- Essai de placer des données comme dans l'exemple, c'est-à-dire à partir de la ligne 3 dans la liste et de la ligne trois dans le modèle. 2- Plg.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=FBase.Range("CA3:CA4"), _ CopyToRange:=.Range("A3:C3"), Unique:=False devrait être Plg.AdvancedFilter...
30/09/2020 à 21:47jeansib Fragmenter une liste Excel dans de nouvelles feuillesVoici donc le fichier avec les trois macros...
30/09/2020 à 21:12jeansib Fragmenter une liste Excel dans de nouvelles feuillesEn relisant ton message, je me rends compte que tu va devoir trier tes données avant pour avoir tes numéros de commandes qui se suivent. Sub trier() Dim DerLig As Long With ActiveSheet DerLig = DerLig = Range("A" & Rows.Count).End(xlUp).Row Range("A3:C" & DerLig).Select ActiveWorkbook.Worksheets("Li...
30/09/2020 à 20:51jeansib Fragmenter une liste Excel dans de nouvelles feuillesDans le fichier ci-joint, tu devrais trouver ton compte en modifiant un peu la macro "un fichier par onglet". 1- Peaufine l'onglet modèle, c'est à partir de ce dernier que te données seront scindées. 2- Ensuite active le bouton : scinder 3- Modifie les noms et le chemin de tes fichiers à créer. Bonn...
25/09/2020 à 03:04spage Appel d'Une macro d'un deuxième fichier renomméMErci...
24/09/2020 à 20:42spage Appel d'Une macro d'un deuxième fichier renomméMerci, De toute beauté, J'analyse l'utilisation du CStr et surtout des ' et des ''. Encore merci, c'est exactement le résultat pour lequel j'ai trop essayé de trucs...
24/09/2020 à 15:27spage Appel d'Une macro d'un deuxième fichier renomméBon matin ric, ça fonctionne parfaitement avec le fichier envoyé. Milles merci. Mon erreur c'est que pour minimiser l'espace, j'ai enlevé les autres onglets. Il y a donc plusieurs onglets à traiter, d'où le "Next Sh" : dépassé le premier, ça ne fonctionne plus. est-ce que tu pourrais jeter un œil si...
23/09/2020 à 16:01Kouadio Conversion de dateDonc en appliquant la méthode mentionné plus haut, ça devrait résoudre ton problème. Dans l'onglet données, choisi : à partir du texte et le code 65001 : texte unicode Bonne journée...
23/09/2020 à 15:45spage Appel d'Une macro d'un deuxième fichier renomméDans le fichier 17-09-2020.xlsb, module1, vous allez voir toutes les tentatives que j'ai faites… mes connaisances s'arrêtent là..:)...
23/09/2020 à 15:40spage Appel d'Une macro d'un deuxième fichier renomméJ'ai quelques difficultés avec une ligne de codes ou deux J'ai un premier fichier dont je copie les données dans un 2e... jusque là, tout va bien. Je doit être enregistré sous ce 2e fichier avec un nom qui est constitué du contenu de cellules de ce dernier mais que je dois effacer avant de l'enregis...
18/09/2020 à 19:00hugyy59Liste Déroulante et ConditionsDésolé, ce n'est pas dans mes cordes :)...
18/09/2020 à 14:34hugyy59Liste Déroulante et ConditionsDésolé pour le délai, je n'étais pas disponible pendant quelques jours. dans le fichier ci-joint tu auras l'information qui, je le souhaite, répondra à tes questions Étape 1 : Lister les critères de ta liste 2 correspondant à chacun des critères de ta liste 1 Étape 2 : Nommer les plages de chacun de...
16/09/2020 à 20:46Caroline Formule "si contient alors" entre 2 bases de donnéesJe crois qu'il va juste falloir que tu intervertisses la logique de ta question, dépendamment du nombre de rubriques dans ta Base 2, ce pourrait être plus ou moins praticable. si(ma cellule B2 contient la valeur no 1 de la Base 2, alors ramène moi B1; si (ma cellule B2 contient la valeur no 2 de la...
16/09/2020 à 19:27Kouadio Conversion de dateDonc, est-ce que ta date est en format : août 31, 2020 ou en format août 31, 2020 ??...
16/09/2020 à 19:24hugyy59Liste Déroulante et ConditionsPour débuter, est-ce que le besoin que j'avais décelé est le bon? Avoir une deuxième liste dont les choix s'ajuste lorsque tu changes la premìère liste...
15/09/2020 à 18:32Kouadio Conversion de dateSi ton format apparaît vraiment comme dans ton exemple, tu n'as qu'à enregistrer le fichier sous en CSV et de le rouvrir avec la fonction "À partir du texte" en choisissant le code : 65001 : Unicode (UTF-8). Cette opération te donnera au moins la date en texte sans code bizarre : ensuite tu applique...
15/09/2020 à 18:14hugyy59Liste Déroulante et ConditionsSi ton besoin est : que selon le choix de la liste colonne EF la liste de la colonne IJ offre des choix différent, tu devras utiliser une fonction INDIRECT. 1- tu détermines chacun des choix pour chacun des items de ta liste et tu nommes la plage comme le choix : Paladin…..etc Ex.: Paladin 1, 2, 6....
14/09/2020 à 21:00vanessadrudderExclure Week-end / Jour FériéComme le disait XMENpl, il faudra ajouter une plage contenant vos dates de fériés que vous pourrez nommer : FÉRIÉS. Plage : FÉRIÉS Liste des fériés 2020-12-24 2020-12-25 2020-08-25 Et votre formule deviendra : = SERIE.JOUR.OUVRE([@[GO FOR PRODUCTION]];ARRONDI.SUP([@[TOTAL DEL...
14/09/2020 à 20:19vanessadrudderExclure Week-end / Jour FériéDésolé, je crois que ce sera mieux avec le nom de tes champs de tableau. =SERIE.JOUR.OUVRE([@[GO FOR PRODUCTION]];ARRONDI.SUP([@[TOTAL DELAI EN JOUR]];0);9)...
14/09/2020 à 19:58vanessadrudderExclure Week-end / Jour FériéJe crois que tu peux ajouter un arrondi supérieur à ton nombre de jours. =SERIE.JOUR.OUVRE(B3;ARRONDI.SUP(A3;0);9)...
18/08/2020 à 21:28nicodak Application de % à 3 valeurs et règles d'arrondiTu devrais essayer de mettre une formule soustraction dans ta troisième cellule. ça semble fonctionner. Bonne fin de soirée...
18/08/2020 à 19:46LagrandeGérer plusieurs feuille de calculUn exemple en excel serait apprécié, ça aidera pour résoudre ton soucis. De plus, la totale serait que tu donnes un exemple dans le fichier du résultat souhaité. Merci de nous aider à t'aider. Au plaisir...
06/08/2020 à 20:43amis Code pour trierPour les majuscules automatiques, place la macro suivante dans ta feuille. à chaque entrée de nouvelles données, elles seront à majuscules, tu n'as qu'à modifier la plage. Pour le tri automatique, est-ce que tu souhaites que ta nouvelle lignes se place à la bonne place une fois que tu as terminé d'i...
06/08/2020 à 20:18amis Code pour trierJe crois qu'en ajoutant la partie du bas tu devrais trouver ton compte. Private Sub Workbook_Open() Dim Cell As Range Dim Ws As Worksheet Set Ws = Worksheets("basededonnéespatient") For Each Cell In Ws.Range("b2:b" & Ws.Range("b2").End(xlDown).Row) DateAnniversaire = CDate(Day(Ws.Cells(Cell.Row, "i"...
12/06/2020 à 19:27devi163 formuleSi j'ai bien compris, voici tes trois formules. J'ai seulement déplacé les formules à la colonne K. Bonne journée...
23/04/2020 à 14:55spage Répartition selon le nb de cellules videsBon matin eriiic. Excellent quel beau boulot, c'est exactement ce dont j'avais besoin. MERCI Ça fonctionne à merveille. J'analyse le tout et j'aurai peut-être une question ou deux J'ai des collègues qui vous remercie également… que d'heures vous venez de nous épargner. Encore Merci. Bonne journée...
22/04/2020 à 22:18spage Répartition selon le nb de cellules videsConfinés que nous sommes. En ces temps de fou, j'ai une reddition de compte à faire pour laquelle je dois distribuer des montants et les répartir selon le nombre de cellule vide avant le prochain montant. Ex. : J'ai joint un fichier. Montant Formules 100 100 100 200 200 200 300 300 150 150 400 400 J...
06/04/2020 à 19:17lyselmek Trouver des cellules avec une recherche de caractèresLa réponse de TUlipe_4 est beaucoup plus efficace. Je n'avais pas vu la réponse avant d'envoyer mon fichier. Bonne journée...
06/04/2020 à 19:09lyselmek Trouver des cellules avec une recherche de caractèresVoici quelques petits ajouts qui pourraient te donner des pistes de solutions. Ce sont des formules, sûrement qu'il serait plus simple de le faire en macro. Je laisse les experts VBA résoudre la partie macro. Il y des colonnes à ajouter avec des formules. Colonne B : valider que la ligne contient le...
06/04/2020 à 17:09lyselmek Trouver des cellules avec une recherche de caractèresJe ne suis pas certains de comprendre le besoin. Est-ce que tu pourrais donner un exemple concret à partir de ton fichier, du "résultat" attendu. colonne J mot clé à rechercher Pays correspondant "mot x" "résultat souhaité à partir des données lignes 2 à 12" Merci...
17/01/2020 à 15:02spage Bypass de Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, CancelMerci encore i20100...
17/01/2020 à 15:01spage Bypass de Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, CancelBon matin à tous, J'ai trouvé tout seul comme un grand… pendant la nuit… j'ai eu une vision. Je n'avais qu'à désactiver les macros et permettre l'accès au développeur section Projet. Bonne journée...
16/01/2020 à 15:10spage Bypass de Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, CancelMerci, ça fonctionne très bien, Cependant je me retrouve avec le problème de ne pas être capable d'enregistrer mon fichier vierge puisque la macro ENRsous comporte des validations sur le contenu des cellules avant de se rendre à application.enableEvent = False. Une piste de solution….?...
15/01/2020 à 20:55spage Bypass de Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, CancelJ'ai une petite problématique de "macro perpétuelle". J'aurais besoin d'un coup de main. 1- Je souhaite que les demandeurs ne puissent pas enregistrer le fichier sans passer par une macro de validation. …. ça fonctionne bien avec Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As B...
12/12/2019 à 18:13DIGIEXTRAIRE 1 element d'une chaine avec separateurDésolé, J'avais oublié de joindre le fichier. Bonne journée...
12/12/2019 à 17:54DIGIEXTRAIRE 1 element d'une chaine avec separateurSi tes données ont toujours le même nombre de Digits entre les traits d'union Tu peux le faire avec un STXT() =stxt(cellule;caractère de début;nombre de caractères) Sinon avec une série de STXT(cherche("-"))...
10/12/2019 à 17:59spage Somme.si.ens - deux critères à plusieurs valeursLa formule fonctionne à merveille et, de plus, elles fonctionnent avec l'ensemble des critères souhaités ayant plus d'une valeur. Petites contraintes facilement contournables 1- Elle ne fonctionne pas avec des calculateurs (Ex.: "<="&cell) 2- Elle ne fonctionne pas avec des valeurs. (Ex.: la dire...
06/12/2019 à 17:54spage Somme.si.ens - deux critères à plusieurs valeursMerci Steelson, C'est parfait. Je décortique le tout et le met en application dans mon fichier. Merci Xorsankukai pour le temps passé à résoudre. Bonne fin de journée ensoleillée… du moins par ici...
06/12/2019 à 16:41spage Somme.si.ens - deux critères à plusieurs valeursJ'ai un petit questionnement sur la faisabilité de ma demande. J'essaie de concocter une formule Somme.si.ens() avec deux critères contenant plusieurs valeurs. Je réussi bien avec un critère à plusieurs valeurs, même avec une plage, mais n'arrive pas à intégrer dans la formule un deuxième critère av...
22/11/2019 à 17:37Micka_Plays Numero de ligne automatique dans un tableauEn VBA, Tu pourrais ajouter la commande suivante Sub ajoutLigne() Dim nvlLig As Long nvlLig = Range("A" & Rows.Count).End(xlUp).Row + 1 Rows(nvlLig).Insert ActiveSheet.ListObjects("Tableau1").Resize Range("A1:C" & nvlLig) Cells(nvlLig, "A").Select ActiveCell.FormulaR1C1 = "=R[-1]C+1" End Sub...
13/11/2019 à 14:29ruskov77Calcul / comparaison trasporteur selon le poids et le departementBon matin, Oups, mon erreur, 1- J'ai ajusté les formules pour avoir la bonne colonne, Il y a maintenant (+1) 2- La référence pour le calcul de "FA 49" n'était pas la bonne. ….. pour valider les calculs de FA 49, tu devras remplir toutes les zones de chaque département. 3- à cet effet, j'ai ajouté un...
12/11/2019 à 21:53ruskov77Calcul / comparaison trasporteur selon le poids et le departementCi-joint le fichier avec des formules qui devraient fonctionner. 1- à l'onglet "BD DÉpartement", tu dois créer une base de données par département avec le # de zone de chacune des compagnies. ……………… tu devras compléter la partie FA 49 2- Il y a une liste déroulante pour tes départements à C5 (onglet...
04/11/2019 à 17:06spage Ouverture d'un onglet variable dans un fichier spécifiqueBon matin Sequoyah, Merci beaucoup ça fonctionne à merveille. Belle Nouvelle pour un Lundi matin. Ici il neige un brin. Une vba qui fonctionne ça réchauffe...
01/11/2019 à 18:38spage Ouverture d'un onglet variable dans un fichier spécifiqueVoici ma petite problématique, Je dois ouvrir un fichier variable et y coller des données dans un onglet dont le nom variable est dans le fichier de départ. Je bloque à la partie sélection de l'onglet dans le fichier. Est-ce que quelqu'un pourrait me donner une petite piste sur le comment : Il sembl...
24/09/2019 à 19:59spage Copier cellules selon la valeur d'une cellule et y ramener des donnéesFinalement, J'ai opté pour une formule Vous la trouverez dans le fichier joint et j'ai diminuer mes cas à 6, ce qui m'a permis d'extensionner la formule. Cependant, Petite correction à la formule de la cellule J2 =SI(ET(I2=3;F2<>F1);INDEX(P:P;EQUIV(RECHERCHEV(G2;O:O;1;FAUX);O:O;0));SI(ET(I2=3...