Ao criar uma macro simples, agora é mais fácil descobrir a última linha editada no Microsoft Word. Agora você pode começar exatamente da mesma linha onde parou de escrever, após reabrir um documento fechado. O Microsoft Word 2010 permite que os usuários escrevam macros para integrar suas próprias funções a serem aplicadas ao documento.
Para começar a escrever essa função, inicie o Microsoft Word 2010 e abra um documento.

Agora navegue até a aba Desenvolvedor . (Caso não encontre a aba Desenvolvedor , vá ao menu Arquivo , clique em Opções e, no painel esquerdo, clique em Personalizar Faixa de Opções. No painel direito, ative a caixa de seleção Desenvolvedor . Clique em OK para ver a aba Desenvolvedor na faixa de opções).

Agora clique em Visual Basic.

A janela do Visual Basic será aberta. No painel esquerdo, clique em ThisDocument e o editor do Visual Basic será exibido. Agora, copie estas linhas de código e cole-as no editor VB.
Sub AutoOpen()
'
' GoToMyBookmarkText
'
'
Em caso de erro Continuar Próximo
Seleção.Encontrar.LimparFormatação
com Seleção.Encontrar.Texto
= “***************”
.Substituição.Texto = “”
.Avançar = Verdadeiro
.Envolver = wdFindContinuar.Formato
= Falso
.MatchCase
= Falso
.MatchWholeWord = Falso .MatchWildcards = Falso
.MatchSoundsLike = Falso
.MatchAllWordForms = Falso
Fim com
Seleção.Encontrar.Executar
ActiveWindow.SmallScroll Up:=15
Fim do Sub
Sub AutoClose()
'
' CreateMyBookmark
'
'
Selection.TypeText Texto:=”***************”
Fim do Sub

Depois de colar, saia do editor VB e salve o documento como um documento habilitado para macro ( vá ao menu Arquivo e clique em Salvar como).

Em Salvar como opções de tipo, clique em Documento habilitado para macro do Word (*.docm) e clique em Salvar .

Agora feche o documento do Word. Ao abrir o mesmo documento, você será automaticamente levado para a última linha editada e um asterisco (*) será exibido (o que, na verdade, indica que você estava editando esta linha anteriormente).

[ via TheFreeWindows ]