Définir un range avec des variables

Bonjour,

Je suis novice en macro Excel et j'aurai besoin de votre aide s'il vous plaît.

J'ai créé des variables pour déterminer la ligne à laquelle je veux commencer et la dernière cellule à utiliser.

'déclarer variable nbre pour la 1ère ligne de données ligne de titres
    Dim NbLtitre As Long
'déclarer variable nbre de lignes total
    Dim NbLmax As Long
'déclarer variable nbre de colonnes total
    Dim NbCmax As Long
    Dim NbCmaxlettre As String

    Dim Cell1 As String
    Dim Cell2 As String
    Dim myRange As Range

    NbLtitre = ActiveCell.Row
    ActiveCell.SpecialCells(xlLastCell).Select
    NbLmax = ActiveCell.Row
    NbCmax = ActiveCell.Column
    NbCmaxlettre = ConvertToLetter(NbCmax)
    Cell1 = "B" & NbLtitre
    Cell2 = NbCmaxlettre & NbLmax
    Cells(1, 1).Value = Cell1
    Cells(1, 2).Value = Cell2

En A1 j'ai bien mon résultat B14

En B2 j'ai aussi mon résultat V70

J'ai besoin d'utiliser de façon variable Cell1 et Cell2 dans un range pour filtrer automatiquement.

Quand j'utilise

ActiveSheet.Range(INDIRECT("A1:B1")).Select.AutoFilter Field:=2, Criteria1:= _
        "Toto"

Je n'arrive pas à filtrer car le range n'est pas pris en compte.

Si j'essaie de donner une valeur à myRange (Set myRange = INDIRECT(Cell1&:&Cell2)) , je n'arrive pas non plus à récupérer la plage "Cell1:Cell2"

Quelqu'un peut-il me donner l'instruction pour que myRange corresponde à la plage Cell1:Cell2 et que je puisse utiliser myRange ensuite pour filtrer.

Merci beaucoup

bonjour

essaie ceci

ActiveSheet.Range(cell1 & ":" & cell2).Select.AutoFilter Field:=2, Criteria1:= _
        "Toto"

Cela fonctionne.

Merci beaucoup :)