Notifications
Clear all

Comando para clicar "Ok" em msgbox

4 Posts
1 Usuários
0 Reactions
1,396 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Olá a todos,

Fiz uma macro que abre um arquivo localizado no sharepoint, um gerenciador de documentos webbased. Essa macro abre vários arquivos e seu objetivo é consolidar as informações desses arquivos em uma planilha só.

Exemplo do inicio da macro:
ActiveWorkbook.FollowHyperlink Address:=" http://teams.global.hsbc/it/isis/SWH/Document Library Project Delivery/1/PDM Worksheets/Daniel_Hui.xls"
Sheets("Effort Estimates").Select
If ActiveSheet.AutoFilterMode = True Then ActiveSheet.AutoFilterMode = False 'Remove Filter

A macro está funcionando perfeitamente, porém toda vez que o excel tenta abrir cada arquivo aparece uma msgbox (em anexo).

Minha pergunta é a seguinte, há algum comando para fazer com que a propria macro clique em "ok"?

Obrigado desde já.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/08/2011 9:29 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Roger

Já experimentou utilizar o comando (no inicio do processamento da macro)

Application.DisplayAlerts = False

Normalmente os avisos do sistema (não todos) são "ignorados" (excel envia a resposta padrão)

Ao final do processamento

Application.DisplayAlerts = true

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/08/2011 9:45 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Reinaldo, obrigado pela ajuda!

Porém já estou utilizando este comando, mas nessa msgbox não funciona.

Roger

Já experimentou utilizar o comando (no inicio do processamento da macro)

Application.DisplayAlerts = False

Normalmente os avisos do sistema (não todos) são "ignorados" (excel envia a resposta padrão)

Ao final do processamento

Application.DisplayAlerts = true

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/08/2011 10:23 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Em uma pesquisa básica, pelo que entendi, esta opção não é controlada pelo Excel, e sim por um parâmetro que você pode usar no open Sharepoint para não mostrar mensagens.

De uma olhada no link abaixo, acreddito estar ai sua resposta:
Using Microsoft Windows SharePoint Services with the Microsoft Office System
http://msdn.microsoft.com/en-us/library ... 11%29.aspx

Veja na parte :
You can control the behavior of the UpdateChanges method by specifying different constants:
Você pode controlar o comportamento do UpdateChanges método, especificando diferentes constantes:

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/08/2011 6:02 pm