Acessar Planilha na Rede

[thiagolgf]

Srs., boa tarde!

Tenho duas planilhas, A e B. Sendo que a planilha A está na minha máquina (local) e nela quero criar uma macro que vai acessar a planilha B, que está na rede da empresa, e a varrerá em busca de alguns valores e quando os encontrar, os copiará para a planilha A.

Como faço para acessar, através de VBA, partindo de uma planilha local, uma outra planilha que encontra-se na rede?

Thiagolgf

Editado Setembro 20, 2012 por thiagolgf

[thiagolgf]

Consegui encontrar a resposta, pois se dependesse dos usuários deste site, estaria esperando até agora...

Segue o código...

...

Dim xl As New Excel.Application

Dim xlw As Excel.Workbook

'Abrir o arquivo do Excel

Set xlw = xl.Workbooks.Open("\\fscorp\GerenciaSistemasIV\Indicadores\teste.xlsx")

' definir qual a planilha de trabalho

xlw.Sheets("Plan1").Select

'Exibe o conteúdo da célula na posição 2,3

MsgBox xlw.Application.Cells(1, 1).Value

' Fechar a planilha sem salvar alterações

' Para salvar mude False para True

xlw.Close False

' Liberamos a memória

Set xlw = Nothing

Set xl = Nothing

...

Thiagolgf

[kassio07]

Consegui encontrar a resposta, pois se dependesse dos usuários deste site, estaria esperando até agora...

Segue o código...

...

Dim xl As New Excel.Application

Dim xlw As Excel.Workbook

'Abrir o arquivo do Excel

Set xlw = xl.Workbooks.Open("\\fscorp\GerenciaSistemasIV\Indicadores\teste.xlsx")

' definir qual a planilha de trabalho

xlw.Sheets("Plan1").Select

'Exibe o conteúdo da célula na posição 2,3

MsgBox xlw.Application.Cells(1, 1).Value

' Fechar a planilha sem salvar alterações

' Para salvar mude False para True

xlw.Close False

' Liberamos a memória

Set xlw = Nothing

Set xl = Nothing

...

Thiagolgf

O cara tem que ter calma, se posto a duvida e no mesmo dia já achou a resposta, sei que foi por sua conta,mas você tem que levar em consideração que talvez as pessoas não sabiam a resposta...