Vba : modèle de range

Bonjour, je cherche la bonne formule pour passer d'une méthode comme :

For k = 5 To dateend
.Columns(k).EntireColumn.Hidden = True
Next k

vers une range directement sachant bien entendu que dateend est aussi dynamique, sinon c'est pas drole.

car la méthode ci-dessus est extrêmement lente... mais extrêmement ^^

cordialement !:)



--

je pense donc je suis !

2 réponses

  1. bonjour

    peut être comme ça?

    Dim plage As Range
    Set plage = Range(Cells(1, datedeb), Cells(1, dateend))
    plage.EntireColumn.Hidden = True

    bonne suite
    0
    1. erreur défini par l'application ou par l'objet. :/
      0
    2. je le fais à partir d'une USF, si ca peux aider et le filtre est à mettre en place sur la feuille "Prog."
      0
  2. il manque certainement la référence à la feuille

    Dim plage As Range
    Set plage = sheets("mafeuille").Range(Cells(1, datedeb), Cells(1, dateend))
    plage.EntireColumn.Hidden = True
    0