Passionné d'Excel

Inscrit le :16/05/2018
Dernière activité :24/04/2026 à 11:51
Version d'Excel :Win11+2003 à 2016
Messages
5'659
Votes
1'176
Fichiers
1
Téléchargements
43'716
Fichiers ExcelSujetsMessagesStatistiquesVotes reçus

Messages postés par Xmenpl - page 64

DateAuteur du sujetSujetExtrait du message
17/02/2020 à 16:27GuitounsSaisie automatique FournisseursCà commence mal …. quand je vois un onglet qui s'appel février je me dis "Encore une usine à gaz" qui va utiliser 12 onglets par ans et la galère pour faire des statistiques ensuite. Le plus simple est de faire un formulaire "userform" et de faire toutes les saisies dans le même onglet. Ensuite très...
17/02/2020 à 16:02Mokia Incrémentation CodeSans fichier exemple difficile de se rendre compte des possibilités pour la création ou l'utilisation de variables existantes ou non...
17/02/2020 à 15:57Anthonydu31Tri décale mes donnéesSans doute une mauvaise selection avant de lancer le tri ? Tu ne dois pas sélectionner qu'une colonne mais ton tableau entier avant d'utiliser l'option de tri...
17/02/2020 à 15:52Narcisse MVOULA MsgBox s'affiche deux foisCertes c'est ce que tu veux ; cela ne veux pas dire que c'est une bonne idée vu ta 2 ème condition...
17/02/2020 à 15:27Narcisse MVOULA MsgBox s'affiche deux foisComprends pas très bien ton code. Si ta combobox référence est vide alors message et en plus tu vide la textbox quantitié ? çà sert à quoi ? Si une combobox ou une textbox est vide alors tu sors de la macro tout simplement. ( Exit sub ) Par ailleurs je vois pas non plus à quoi sert le " Cmd_Valider...
17/02/2020 à 15:21mouchela73Lier une cellule sur 2 feuilletsEffectivement bien difficile de comprendre ; mais sur des photos çà va pas arranger la compréhension. je vois pas le rapport entre B4 qui est un montant en €uros alors qu'il est indiqué dans la cellule précédente Ration Et B1 qui est le nom d'un onglet. C'est quoi la magie pour passer de l'un à l'au...
14/02/2020 à 16:17fabmicCellule de rechercheUn genre comme cela ...
14/02/2020 à 14:55philippou_84Copier plusieurs feuilles et les modulesTu étais prêt à faire une fonction pour copier trois onglet, donc je ne vois pas la différence ? Tu fais une fonction pour enregistrer une copie ; puis dans la foulée la macro qui supprime : Toutes les feuilles sauf Sheets(Array("Chantier", "Brassage", "Synoptique"). Ainsi peu importe que le mois su...
14/02/2020 à 14:49DavidABSelasFonction si avec plusieurs recherche vTon exmple n'est pas très convainquant. tu ecris manuel "Facture soldée" en colonne B ; ce n'est pas le résultat d'une recherche d'ailleurs dans ton exemple aucun facture n'a de date de règlement donc rien de soldé. Ps est-ce bien utile de se prendre la tête avec 3 onglets alors qu'une simple indica...
14/02/2020 à 14:37philippou_84Copier plusieurs feuilles et les modulesJe comprends pas très bien la finalité copié pour envoyer dans un nouveau fichier ? ou copie pour envoyer vers un fichier existant ? ( et dans ce cas le fichier existant a-t-il déjà des macros ) ? Si c'est uniquement pour faire un nouveau fichier ; le plus simple à coder et de partir du principe inv...
14/02/2020 à 13:54Cobzy Publipostage d'étiquettes sur plusieurs pages ss doublons & ss Nov fichierJ'ai bien peur que tu n'ais déjà apporté la réponse. l'aperçu n'est pas la fusion réelle. Tu peux essayer d'enregistrer une macro qui va : Lancer la fusion et enregistrer le résultat dans "c:\windows\temp\resultatfus.doc" Tu pourras alors adapter la suite de ton code vba afin qu'il utilise toujours...
14/02/2020 à 13:25KTMExport au format pdfJ'étais justement en train de me demander le contenu de C9 ? et si l'indication .pdf s'y trouve ou non ? sinon fichier = "PPI ARV" & "-" & Sheets("Menu").Range("C9") & ".pdf"...
14/02/2020 à 10:54philippou_84 Création dossier et sous dossier avec test...
13/02/2020 à 11:53philippou_84 Création dossier et sous dossier avec testOui d'après l'écriture il va créer dossier 1 dossier 2 dossier 3 puisque tu forces le texte avec les guillemets NouveauDossierAvecSousDossiers = ThisWorkbook.Path & "\dossier1\dossier2\dossier3" NouveauDossierAvecSousDossiers = ThisWorkbook.Path & "\" & dossier1 & "\" & dossier2 & "\" & dossier3...
13/02/2020 à 11:33Nana49 Somme selon certains critèresJ'ai donné un nom de plage à ton inventaire ( "inventaireliste" ) pour simplifier la formule. Bonjour Pédro c'est justement ma solution 5 recherches avec condition non vide...
13/02/2020 à 11:05chichinouxCode postal = nom departementAvec les conseils d'Eriic pour la corse. Oops oublié condition pour département outre-mer ...
13/02/2020 à 10:36adrienR Aide sur tableau, formulaire VBAExacte du moment que c'est un ajout de textbox "Fournitures" alors ce sera un ajout de colonne dans ta feuille Excel. Et dans le code ajoute la ligne en décalant de +1 pour le numéro de colonne. Exemple : Worksheets("POS").Cells(no_ligneMODIF, 17).Value = TextBox10_Furniture10 pour la prochaine ce s...
13/02/2020 à 08:27philippou_84 Création dossier et sous dossier avec testEn complément de la réponse de i20100 et vu ton titre " Dossier et sous dossier " Alors attention il me semble que la fonction mkdir ne permet pas la création d'un dossier et du sous dossier en même temps. Si il n'y a qu'un dossier a créer alors ok sinon https://excel-malin.com/codes-sources-vba/cre...
13/02/2020 à 08:22jo6466Comment changer la couleur de fond d'une cellule?Tu selectionnes les cellules en question puis tu vas dans "Mise en forme conditionnelle" options ajouter une règle. 1ère régle valeur de la cellule <0 puis tu choisis la couleur 2ème régle valeur de la cellule >=0 idem pour l'autre couleur...
13/02/2020 à 08:19adrienR Aide sur tableau, formulaire VBAOui c'est sans doute possible ; mais ce n'est pas ma spécialité tu ferais mieux de créer un autre sujet pour cette question ou de faire une recherche sur les userform gestion des photos...
12/02/2020 à 16:10adrienR Aide sur tableau, formulaire VBAVoilà avec un bouton réinitialiser recherche pour vider le userform...
12/02/2020 à 15:31hkim Masquer onglets COMBOBOX ACTIVe XJ'ai pas bien compris le sens du workbook open Si la feuille ActiveX est selectionnée alors selectionner la feuille Data puis slectionner la feuille ActiveX çà sert à quoi ? oops je m'auto-corrige je viens de comprendre que c'est pour relancer le code qui alimente la combobox au cas ou la feuille Ac...
12/02/2020 à 15:11adrienR Aide sur tableau, formulaire VBABen pour faire une nouvelle recherche tu reclic sur la combobox pour changer le nom et les données vont être rechargées en même temps. inutile de ressortir du mode interrogation...
12/02/2020 à 14:08adrienR Aide sur tableau, formulaire VBAEn fait c'est tout bête C'est la textbox Posname qui ne peut pas être dans les données modifiable puisqu'elle fait partie de la liste contenu dans la combobox du mode intérrogation. En mode interrogation modification il fallait donc que j'enlève cette ligne des modifications possible. Autrement dit...
12/02/2020 à 13:18adrienR Aide sur tableau, formulaire VBAEffectivement Comprend pas pourquoi il ne change pas la valeur quand on valide ? il remet l'ancienne valeur ! Vais regarder mais j'ai du mal à comprendre pourquoi il remplace pas la donnée ...
12/02/2020 à 12:00Pompavelo Concaténation et cellules videsOops double condition pour B2 faut une condition aussi pour vérifier B1 différent de "" =CONCATENER(SI(B1<>"";B1;"");SI(B2<>"";SI(B1<>"";A1&B2;B2);"");SI(B3<>"";A1&B3;"");SI(B4<>"";A1&B4;"");SI(B5<>"";A1&B5;"");SI(B6<>"";A1&B6;"");SI(B7<>"";A1&B7;"");S...
12/02/2020 à 11:55philippou_84Enregistrer sous XLSMEssaies ainsi ...
12/02/2020 à 11:47adrienR Aide sur tableau, formulaire VBAOops désolé c'était juste : unload.me à remplace par unload me...
11/02/2020 à 16:15philippou_84Enregistrer sous XLSMIl s'arrête sur une ligne précise ? Essaies sans les parenthèses. ? Je viens de tester sur mon bureau alors çà donnerai çà pour toi : Il te manquait seulement Thisworbook.path dans ton premier post . Désolé. (sauf si dans les cellules C7 C16 il y a des caractères qu'on n'a pas le droit d'utiliser da...
11/02/2020 à 16:03philippou_84Enregistrer sous XLSMHa j'avais pas compris que ta ligne ne fonctionnait pas. mkdir c'est avec des parenthèse et Tu auras aussi besoin du chemin complet pour créer le répertoire. MkDir(Thisworbook.path & "\" & Range("C7").Value & " - " & Range("C16").Value & " - " & Range("C19").Value &"\")...
11/02/2020 à 15:57Pompavelo Concaténation et cellules vides=CONCATENER(SI(B1<>"";B1;"");SI(B2<>"";A1&B2;"");SI(B3<>"";A1&B3;"");SI(B4<>"";A1&B4;"");SI(B5<>"";A1&B5;"");SI(B6<>"";A1&B6;"");SI(B7<>"";A1&B7;"");SI(B8<>"";A1&B8;""))...
11/02/2020 à 15:27philippou_84Enregistrer sous XLSMLol j'avais juste régardé la ligne chemin et le manque de "\" à la fin...
11/02/2020 à 15:26MaupsInformation sur formule Excel pour Stat lotoPersonnellement j'attends d'avoir gagné au loto avant de pondre une formule de stat...
11/02/2020 à 15:15adrienR Aide sur tableau, formulaire VBAUn petit test à améliorer pour que tu vois le principe de formulation des lignes de code en saisie et en mode interrogation. Ps j'ai viré les deux onglets pays et régions. Un seul onglet Param ( paramètre ) dans lequel on met les variables est bien suffisant. Ps évites de changer les noms des objets...
11/02/2020 à 15:11philippou_84Enregistrer sous XLSMSi ton répertoire existe, il n'y a pas de raison que cela ne fonctionne pas. La macro enregistre dans un répertoire existant ( elle ne créer pas de nouveau répertoire. ) Chemin = ThisWorkbook.Path & "\" & Range("C7").Value & " - " & Range("C16").Value & " - " & Range("C19").Value ton chemin doit fin...
10/02/2020 à 13:25philippou_84Enregistrer sous XLSMSi tu enregistres au même endroit que ton fichier excel … c'est encore plus simple. Ainsi plus besoin de boite de dialogue. Si l'enregistrement est dans un sous répertoire aprés ton fichier excel alors tu peux aussi adapter ton chemin par exemple comme ceci. Chemin=Thisworkbook.path &"\répertoireexp...
10/02/2020 à 10:34philippou_84Enregistrer sous XLSMPuisque tu connais déjà le nom de fichier que tu vas enregistrer ; ( fichier = "Fiche suivi chantier lot " & Range("C7") & " - " & Range("C6") & ".xlsm") Pourquoi ouvrir une boite de dialogue ? Tu ne peux pas indiquer le répertoire d'enregistrement ...
10/02/2020 à 09:19adrienR Aide sur tableau, formulaire VBATon code dans userform_initialize n'est pas correct : Private Sub UserForm_Initialize() 'Liste des 231 pays de la feuille "Country" For i = 1 To 231 ComboBox_Pays.AddItem Sheets( "Pays" ).Cells(i, 1) Next End Sub ton onglet s'appel : country et pas pays donc soit tu changes le code soit tu changes l...
07/02/2020 à 16:47matsu Décaler planning en fonction de dateLe code vba est sur la feuille...
07/02/2020 à 16:20philippou_84 Colorer des cases suivant listeIl suffit de faire 8 mises en format conditionnelle en feuille 2 Si valeur cellule=1 --> jaune Si valeur cellule=2 ---< Beu …...
07/02/2020 à 16:14KiteLuc Problème avec un mot réservéEst dans le Titre de la colonne excel il n'y a pas un espace qui ce balade avant ou après ...
07/02/2020 à 15:54KiteLuc Problème avec un mot réservéQuand tu écris "Year" Ce n'est pas pour indiquer que colonne excel s'appel "Act_2020" ? j'espère ...
07/02/2020 à 15:17siga2fadial Additionner des heuresPour la somme hebdomadaire ? Format cellule Personnalisé : [hh]:mm avec les deux H entre Crochets. = 37:15 Quand une somme d'heures dépasse 24 excel compte 1 jour mais comme tu demandes un affichage hh:mm alors tu ne vois pas apparaître ce jour. Tu dois donc lui dire de conserver les calculs...
07/02/2020 à 15:03ellipsoLimiter zone action d'un bouton de commandeIl faut dans un premier temps retirer la protection des cellules qui seront à remplir. (format cellule protection ) Ensuite on protège la feuille. ( onglet révision ) Et dans ton code on ajoute les lignes qui retirent et qui remettent la protection sur la feuille et sur les cellules que l'on vient d...
07/02/2020 à 14:03ClemGodgivenInsertion Feuilles Excel d'un dossier dans Ficher ExcelSi tu regardes la chartres du forum tu y verras que sans fichier exemple tu n'auras que peu de réponses. Dans l'absolu on peut répondre oui à ta question. Le comment sans info précises c'est autres chose. exemple : Les fichers de data sont stockés ainsi....... ok mais où dans le même répertoire ? su...
07/02/2020 à 13:29leshizz971Intégration fichier texteCe serait plus clair avec un exemple du fichier excel et du ficher texte avec le résultat attendu...
07/02/2020 à 12:03RoniboCondition ifEffectivement le tout premier client si tu veux qu'il commence à partir de A4 tu vas devoir ajouter une condition pour Derlig If Range("A" & Rows.Count).End(xlUp).Row + 1=2 then Derlig=4 Else Derlig=.Range("A" & Rows.Count).End(xlUp).Row + 1 end if...
07/02/2020 à 11:46guigui60Mon Userform beug quand je le lance par un BathEssaies d'enregistrer une copie de ton fichier Xlsm dans l'ancien format xls 97 -2003. Ensuite test en modifiant ton Bat @echo Off START excel.exe /r "C:\BDD\Nomdufichier.xls" EXIT...
05/02/2020 à 16:28RoniboCondition ifSi je comprend bien tu cherches à tester si : le nom et prénom est déjà dans ta base ---> alors on sort. Le nom et prénom n'y est pas alors ---> on ajoute à la base de données. Dans un premier temps j'ajouterai une message box pour indiquer si il a trouvé. Ensuite il n'y a pas besoin de contin...
05/02/2020 à 16:14DUVALCreation compteur simple dans ExcelUn fichier exemple avec le résultat espéré serait plus compréhensible : "en colonne C , je souhaite avoir le cumul en J1 j'aurai en C1 : 10 , le jour 2 en C2 : je veux avoir le cumul soit 15" Pourquoi 15 En C2 Si le jour 2 tu écrases la données 10 en B1 alors çà devrait écrasé le cumul 10 en C1 pour...