Se você acabou de abri o arquivo, então não precisa dessa linha:
Windows("planilha1.xls").Activate
Pois assim que abre, este será o arquivo ativo, Desse modo, se quer se referir a uma Célula desse arquivo, basta fazer assim:
ActiveWorkbook.Range("A2").Value = "José"
Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)
Atenciosamente
Wagner Morel
Postado : 08/05/2017 7:34 pm