Contenu récent par R3n0W

  1. R3n0W

    XL 2016 If Not xRgSel Is Nothing Then --> Ne marche pas

    Effectivement, vous avez raison. J'ai creusé un peu par rapport à ça et j'ai fini par trouver. Lorsque j'ai remplacé Worksheet_Change par Workbook_SheetChange et que j'ai eu l'erreur c'est parce que mes variables n'étaient pas complètes, je ne déclarais que Target et il en manquait une ...
  2. R3n0W

    XL 2016 If Not xRgSel Is Nothing Then --> Ne marche pas

    J'ai déjà créé des macros dans ThisWorkbook, mais des trucs simples comme BeforeSave par exemple, là je fais avec ce que j'ai trouvé sur internet, les forums comme celui-ci ou sur le site Microsoft. Pour déclencher une action à la modification d'une cellule d'une plage, ils utilisent la fonction...
  3. R3n0W

    XL 2016 If Not xRgSel Is Nothing Then --> Ne marche pas

    J'entends, il est vrai que ça reste clair lorsque ça reste la même personne qui alloue les noms. J'ai pris la remarque en compte et ai rajouté le Préfixe Ws_ aux noms de mes Worksheets. Moi ce que je trouve dommage, mais c'est peut être que je ne sais pas le faire, c'est qu'on ne puisse pas...
  4. R3n0W

    XL 2016 If Not xRgSel Is Nothing Then --> Ne marche pas

    Bonjour ChTi160 ! Code modifié. Malheureusement pas d'amélioration à l'horizon lorsque je modifie une cellule de la plage : xRg = T_PLANACTIONS.ListColumns("Pour Action").DataBodyRange Bonne journée également,
  5. R3n0W

    XL 2016 If Not xRgSel Is Nothing Then --> Ne marche pas

    Bonjour Dranreb, "PlanAction" est effectivement un nom d'objet Worksheet, tout comme "Para". Je trouve que ça allège la déclaration des variables sans perdre en clarté. Du coup je suis assez curieux de votre astuce sur les ListObjects mais j'avoue ne pas avoir bien saisi l'explication. Un petit...
  6. R3n0W

    XL 2016 If Not xRgSel Is Nothing Then --> Ne marche pas

    Bonjour J'essaye de faire une macro en utilisant les modèles déjà dispo par ci par là et dont tout le monde semble plutôt satisfaits, mais lorsque j'essaie de reproduire la chose bien sûr cela ne marche pas... Pourtant la syntaxe ma parait juste et là je cale. Je me suis mis une petite MsgBox...
  7. R3n0W

    XL 2016 Problèmes de Range, tentative de boucle entre 2 fichiers

    Aller, je vous donne la réponse, je suis sûr que cela pourra servir. J'ai pas l'impression que beaucoup de personnes sachent utiliser les propriété des ListObjects comme ça, vu que je n'ai rien vu de similaire sur ce forum ou d'autres. Sub Import_Fichier_relève_ListObjects() ' Dim Mois As...
  8. R3n0W

    XL 2016 Problèmes de Range, tentative de boucle entre 2 fichiers

    Je ne comprends pas où ça pèche : Dim Wbk_Index As Workbook Set Wbk_Index = Workbooks("2023_Index Compteurs Annuel - Copie.xlsm") Dim Ws_Index As Worksheet Set Ws_Index = Wbk_Index.Worksheets("Relevés Compteurs") Dim NumComptIndex As Range Set NumComptIndex =...
  9. R3n0W

    XL 2016 Problèmes de Range, tentative de boucle entre 2 fichiers

    Avec Plaisir, voici donc les fichiers anonymisés : Dans l'absolu j'adorerai pouvoir utiliser les Range faisant référence aux colonnes des tableaux directement. Je trouve cette possibilité EXCEL-lente.
  10. R3n0W

    XL 2016 Problèmes de Range, tentative de boucle entre 2 fichiers

    Bonjour Après mes 3 premiers jours de codage je suis encore novice en VBA mais je me soigne :) Je souhaite exécuter une macro me permettant, depuis un fichier maitre avec tous mes compteurs, de consulter dans un fichier de relève avec seulement quelques compteurs la correspondance entre ces 2...