Associar uma coluna de tabela a uma variável para Ordenar linhas

[LRMud]

Bom Dia
Queria ordenar uma tabela de 3 colounas, através de duas combobox num formulário, em que o utilizador escolhe as opções que deseja, para ordenar por 2 colunas.
Quando tento associar uma variável á coluna escolhida pelo utilizador, dá um erro "Referência inválida ou não qualificada".
Como poderei fazer que funcione? Obrigado

Private Sub Btn_Imprimir_Click()    
    Dim v_Sorting1 As String
    Dim v_Sorting2 As String

    If Form_Imprimir.ComboBox1.Value = "Tipo" Then v_Sorting1 = ".ListColumns(1)"
    If Form_Imprimir.ComboBox1.Value = "Equipamento" Then Set v_Sorting1 = .ListColumns(2)
    If Form_Imprimir.ComboBox1.Value = "Data Fabrico" Then v_Sorting1 = ".ListColumns(3)"

    If Form_Imprimir.ComboBox2.Value = "Tipo" Then v_Sorting2 = ".ListColumns(1)"
    If Form_Imprimir.ComboBox2.Value = "Equipamento" Then v_Sorting2 = ".ListColumns(2)"
    If Form_Imprimir.ComboBox2.Value = "Data Fabrico" Then Set v_Sorting2 = .ListColumns(3)

    Folha3.Sort.SortFields.Clear
    With Folha3.ListObjects(1)
        .Range.Sort Key1:=v_Sorting1, Key2:=v_Sorting2, Header:=xlYes, Order1:=xlAscending, Order1:=xlAscending
    End With
End Sub