ajuda com macro

Question

presiso fazer um script para executar EX tenho um documento fabio.doc ele sempre é alterado e quero fazer um script que quando eu execute o script ele pegue o arquivo fabio.doc C:/fabio.doc e coloque a fonte desse arquivo com tamanho 10 alguem sabe como fazer isso ?????

Answer 1

Olá,

 

você pode usar um código mais ou menos como este a seguir. Ele pode ser acionado dentro do próprio documento, ou então ser alterado para que seja chamado a partir de uma aplicação externa (que chama o Word por meio de automação).

Option Explicit

Private WithEvents wdApp As Word.Application

Private Sub Document_Open()

On Error GoTo ErrHandler

Set wdApp = ThisDocument.Application

ExitHere:
Exit Sub

ErrHandler:
MsgBox Err.Description & vbCrLf & Err.Number & vbCrLf & Err.Source, vbCritical, "Document_Open"
Resume ExitHere
End Sub

Private Sub wdApp_DocumentBeforeSave(ByVal Doc As Document, SaveAsUI As Boolean, Cancel As Boolean)
Dim prg As Paragraph

On Error GoTo ErrHandler

For Each prg In ThisDocument.Paragraphs
  prg.Range.Font.Size = 10
Next prg

ExitHere:
Exit Sub

ErrHandler:
MsgBox Err.Description & vbCrLf & Err.Number & vbCrLf & Err.Source, vbCritical, "wdApp_DocumentBeforeSave"
Resume ExitHere
End Sub

 

---

Luiz Cláudio Cosenza Vieira da Rocha - http://msmvps.com/blogs/officedev - IT Lab www.itlab.com.br

Answer 2

isso ai cara valeuuu, porem tipo salvo esse codigo onde cara iso que nao entendo EX crio um arquivo .bat alguma coisa do tipo ??????

Answer 3

Esse código foi escrito para ser usado dentro do Word. Você pode criá-lo em outros lugares, como numa aplicação .NET, ajustando apenas a sintaxe conforme a linguagem de programação da ferramenta que você escolher.

 

Se você quer ficar monitorando uma pasta, pode criar um serviço para o Windows com o Visual Studio.NET, que é uma solução mais complexa. Outra alternativa, mais simples, é criar o código num documento do Word, deixar este documento na pasta que quer monitorar, adaptar a rotina para verificar a data de atualização de todos os demais documentos da pasta e usar o agendador do Windows para abrir o arquivo periodicamente.

---

Luiz Cláudio Cosenza Vieira da Rocha - http://msmvps.com/blogs/officedev - IT Lab www.itlab.com.br