Contenu récent par cbea

  1. cbea

    Macro recherche multi critère et affichage

    Re : Macro recherche multi critère et affichage Bonsoir à tous, tu trouveras dans le code des commentaires t'indiquant les modifications apportées (Modif du 05/08). Bonne soirée.
  2. cbea

    Macro recherche multi critère et affichage

    Re : Macro recherche multi critère et affichage Bonjour à tous, voici une solution. Bonne journée.
  3. cbea

    VBA Sélectionner controles pairs ou impairs

    Re : VBA Sélectionner controles pairs ou impairs Bonsoir aeque, le forum, voici une solution : For X = 1 To 32 If X Mod 2 = 0 Then ' Pair Me.Controls("TextBox" & X).Value = DateAdd("d", 7, Now()) Else ' Impair...
  4. cbea

    Macro recherche multi critère et affichage

    Re : Macro recherche multi critère et affichage Bonjour closemug, le forum, pourriez-vous mettre à disposition votre fichier pour que l'on puisse vous aider ? Merci
  5. cbea

    Recopier une formule en auto via VBA

    Re : Recopier une formule en auto via VBA Bonjour, je viens de faire des tests sur le fichier et tout fonctionne correctement. Lors du clic sur le bouton "Insérer Ligne", une ligne est ajoutée après la dernière ligne connue en colonne A avec copie des formats et formules dans les colonnes...
  6. cbea

    Recopier une formule en auto via VBA

    Re : Recopier une formule en auto via VBA Bonjour, voici une solution pour la mise en forme de la ligne insérée. Dans la feuille, j'ai rajouté un bouton "Insérer Ligne" qui déclenche la mise en forme de la ligne insérée par rapport à la précédente et ajoute les formules. Tout le code est...
  7. cbea

    [résolu]Erreur 438 sur la copie de cellules

    Re : Erreur 438 sur la copie de cellules Bonsoir, voici une solution : Worksheets("feuill1").Range("A5:H5").Copy Destination:=Worksheets("feuill2").Range("A5") Application.CutCopyMode = False PS : s'assurer que les noms des feuilles soient bien écrits (feuill1 et feuill2).
  8. cbea

    Recherche dans userform

    Re : Recherche dans userform Bonsoir, si cela correspond à mes compétences, pourquoi pas mais nous sommes sur un forum où d'autres personnes peuvent également apporter leurs contributions. Pour indiquer que cela est résolu, vous pouvez éditer le titre de la discussion en mettant entre...
  9. cbea

    Recherche dans userform

    Re : Recherche dans userform La raison de l'erreur venait du fait qu'il n'y avait pas de filtres actifs dans la feuille "Base". Voici le code à mettre en place : Sub Menu() ' Si un filtre existe dans la feuille Base, afficher toutes les données If Worksheets("Base").FilterMode =...
  10. cbea

    Recherche dans userform

    Re : Recherche dans userform Voici l'instruction : Worksheets("Base").ShowAllData
  11. cbea

    Recherche dans userform

    Re : Recherche dans userform Bonjour fredoud et le forum, Voici une solution.
  12. cbea

    Excel et VBA

    Re : Excel et VBA Je viens de voir ce que vous recherchiez et l'exemple que je vous ai fourni va être fastidieux à mettre en place dans votre nouveau fichier. Je vous ai fait une nouvelle version en mettant une seule colonne "Type d'encombrement" liée une liste de validation de données...
  13. cbea

    MACRO pour afficher ET masquer des groupes de colonnes progressivement

    Re : MACRO pour afficher ET masquer des groupes de colonnes progressivement Voici une autre solution.
  14. cbea

    Excel 2007, macro pour pdf

    Re : Excel 2007, macro pour pdf il faut que tu utilises un contrôle ActiveX de type Liste de données comme je l'ai mis dans mon fichier puisque la liste que tu utilises correspond à une validation de données et qui ne permet pas la multi-sélection. Si tu veux, tu peux copier le contrôle de mon...
  15. cbea

    MACRO pour afficher ET masquer des groupes de colonnes progressivement

    Re : MACRO pour afficher ET masquer des groupes de colonnes progressivement Bonjour, voici un exemple de solution. Le code est à mettre dans le bouton : Dim lgColDebFix As Long Dim lgColNbMasque As Long Dim lgCol As Long Dim lgColAMasquer As Long, lgColAMasquerMax As Long...