rovisilva

Bom dia, Estou com um probleminha, não consigo resolvê-lo. Já pesquisei aqui no fórum e no google, acabei não achando nada. É algo simples, espero que alguém possa me ajudar. Tenho duas planilhas. Vamos chamá-las de A e B. A planilha A tem dois CommandButtons, o cmd1 e o cmd2. Quero que o cmd1 chame o arquivo planilha B, abrindo no sheet1 e o cmd2 chame o arquivo planilha B, abrindo no sheet2. Até agora eu fiz o seguinte: Dim Xls As Object Dim WkSheet As Object Dim WkBook As Object Private Sub CommandButton1_Click() Set Xls = CreateObject("Excel.Application") Set WkBook = Xls.Workbooks.Open("B.xls#Sheet1") Set WkSheet = WkBook.ActiveSheet Xls.Visible = True End Sub Private Sub CommandButton2_Click() Set Xls = CreateObject("Excel.Application") Set WkBook = Xls.Workbooks.Open("B.xls#Sheet2") Set WkSheet = WkBook.ActiveSheet Xls.Visible = True End Sub Dessa forma, ele abre o worksheet B, mas não encontra o Sheet1 ou Sheet2. Se eu não colocar o "#SheetX", ele abre a planilha normalmente, mas não no sheet que eu quero. Alguém pode me ajudar?