ATUALIZAR PLANILHA EXCEL

STELLEOL 16/05/2013 09:27:24
#423574
Bom dia amigos , tenho um aplicativo que vai buscar informações numa planilha do excel, como posso fazer essa planilha ficar atualizando sem ela estar ativa ( o programa abre ela automaticamente e fica aberta mas não ativa pro usuario), tentei usar o seguinte codigo mas sem sucesso;
Workbooks([Ô]Coluna.xls[Ô]).Worksheets([Ô]dados[Ô]).Refresh
Workbooks([Ô]Coluna.xls[Ô]).RefreshAll

Att
Osmar
Obrigado
RO.DRIGOSG 19/12/2013 17:22:45
#432339
Não sei se é exatamente isso que você quer, mas tenta ai:

  
Public Function ActivePlan(ByVal pstrNamePlan As String) As Integer

On Error GoTo TraTaErro

If pstrNamePlan <> [Ô][Ô] Then
objExcel.Worksheets(pstrNamePlan).Activate
Else
objExcel.Worksheets(1).Activate
End If

Exit Function

TraTaErro:
MsgBox [Ô]Erro nº [Ô] & Err.Number & [Ô] - [Ô] & Err.Description, vbExclamation, [Ô]Atenção[Ô]

End Function
Faça seu login para responder