Contenu récent par Franc58

  1. F

    Autres Remplacer une zone de texte par un nom du gestionnaire de noms

    Bonjour, sylvanu t'a donné la réponse mais tu sembles ne pas avoir compris. Voici une autre façon de faire: tu sélectionnes ta plage A1:A7, dans la petite fenêtre où apparaît le nom de cellule tu tapes NomJour et tu valides. NomJour apparaît désormais dans le gestionnaire de noms.
  2. F

    Microsoft 365 Désactivation/activation Application.CommandBars("ply").Enabled

    Salut, je pense que tu devrais l'insérer à cet endroit du code: Else ThisWorkbook.Saved = True Application.CommandBars("ply").Enabled = True
  3. F

    Microsoft 365 Supprimer des colonnes discontinues

    Je n'avais pas pensé aux libellés, c'est chose faite. J'ai dû défusionner A3 et A4, sinon ça pose problème.
  4. F

    Microsoft 365 Supprimer des colonnes discontinues

    Salut, si tu dois faire cette manipulation régulièrement et que c'est toujours les mêmes colonnes, cette macro fait le job. Sub SupprimerColonnes() Dim ws As Worksheet Dim tbl As ListObject Dim arr As Variant Dim i As Long Set ws = ThisWorkbook.Sheets("Feuil1")...
  5. F

    Microsoft 365 Code transfert

    Salut, une autre suggestion: Private Sub UserForm_Initialize() Dim wb As Workbook Dim ws As Worksheet Dim rng As Range Dim todayRow As Long Dim i As Long Me.TextBox1.Value = Format(Date, "dd/mm/yyyy") Application.ScreenUpdating = False ' Ouverture...
  6. F

    XL 2021 Appliquer plusieurs filtres numériques "entre" sur une colonne excel

    Salut, une autre suggestion, en J2 tu mets la formule =OU(ET(E2>=6000; E2<=6999);ET(E2>=83000; E2<=83999);ET(E2>=4000; E2<=4999)) et tu tires vers le bas. Tu auras une colonne avec comme résultat vrai ou faux. Tu n'as plus qu'à filtrer sur VRAI et voilà.
  7. F

    Microsoft 365 Besoin d'un simulateur de conditionnement

    Heu non, il est censé afficher un userform à l'ouverture du classeur, c'est ce qui se passe chez moi.
  8. F

    Microsoft 365 Besoin d'un simulateur de conditionnement

    Salut, exemple en pj.
  9. F

    XL 2019 Aide pour un module d'archivage de feuille en pdf dans répertoire

    Salut, j'ai un peu modifié ta macro. Pour ta variable Fichier il faut ajouter l'extension .pdf. L'utilisation de MsgBox n'est pas correcte. Vois ci-dessous. Sub Archivage() Application.ScreenUpdating = False 'Definition des variables de la feuille Dim Prod1 As Date Dim Prod2 As...
  10. F

    XL 2010 supprimer les lignes en doubles dans un tableau

    Bonjour, tu sélectionnes ton tableau avec les entêtes, tu vas dans Données > Supprimer les doublons et ensuite tu coches les colonnes que tu veux vérifier et tu valides. Pour reformater tes numéros de téléphone,dans la colonne adjacente tu copies la formule =SUBSTITUE(C2;" ";"") et tu tires vers...
  11. F

    XL 2021 Devoir excel

    Ceci est un forum d'entraide, à mes yeux ça implique un minimum d'efforts de votre part. Là vous demandez de faire le boulot à votre place ? Je ne voudrais pas être le patron qui vous engage sur vos compétences supposées d'Excel.
  12. F

    Microsoft 365 Aide formule Excel

    Salut, à tester: =SI.Multiple(I3<J3;"-";J3="-";30;J3>=1;(J3-I3)*H3)
  13. F

    XL 2021 UserForm Problèmes de saisies

    Bonjour, en l'état ton code fait ceci: dès que tu tapes un caractère dans TextBox2, celui-ci est transmis à D23 et le formulaire se ferme sans même te laisser la possibilité d'encoder quoi que ce soit de plus. Pour sauvegarder tes données des textbox, tu dois mettre le code dans l'évènement...
  14. F

    Microsoft 365 Déclanchement d'une alarme sonore lorsqu'une cellule est compléter

    Salut, voici une suggestion. Voir code dans le _Change de la feuille et j'ai ajouté un module "ModuleSon". Tu peux y changer la fréquence et durée du bip sonore.
  15. F

    XL 2019 figer une cellule

    Bonjour, tu peux utiliser la validation de données. Dans l'onglet Options > Autoriser, tu choisis "Nombre entier" et dans "Données" tu choisis "Supérieur ou égale à". Ensuite, dans "Minimum" tu encodes 6 par exemple. Dans l'onglet Alerte d'erreur > Style tu choisis "Stop" et tu peux préciser un...