Isso é meio bobo, mas fiquei preso por um tempo nessa declaração simples:

<code>    Dim range1 as Range
    Dim mysheet as String
    Dim myrange as String

    mysheet = "Sheet1"
    range = "A1:A10"

range1 = Worksheets(mysheet).Range(myrange)
</code>

Eu testei todas as soluções que encontrei na internet como por exemploisto, isto eisto, mas nada.

Todo o tempo que me dá erros: 1004 "Erro definido pelo aplicativo" ou "variável de objeto ou com não definido".

Eu tentei o seguinte:

<code>range1 = ThisWorkbook.Worksheets(mysheet).Range(myrange)

range1 = ActiveWorkbook.Worksheets(mysheet).Range(myrange)

range1 = Sheets(mysheet).Range(myrange) (and the combinations above)

range1 = Worksheets(mysheet).Range(Cells(1,1), Cells(1,10)) (and the combinations with This/Active workbook)
</code>

e

<code>with This/ActiveWorkbook
range1 = .Worksheets(mysheet).Range(myrange)
end with
</code>

Nenhum funcionou.

Essa é uma coisa REALMENTE boba, mas eu estive preso por um tempo agora: s

Alguém pode me ajudar?

Realmente obrigado antecipadamente.

Cumprimentos,