Arquivo da categoria: Macro

Macro para criar cópias de segurança automaticamente ao sair do Word

‘ Macro para sempre manter uma cópia de segurança‘ Colocar este código em normal / módulo1 Function FazerCopiaS()‘‘ Macro1 Macro‘ Macro gravada 15/10/2011 por Cliente‘    Set fs = CreateObject(“Scripting.FileSystemObject”)        CaminhoDocumento = fs.buildpath(ActiveDocument.Path, ActiveDocument.Name)    CaminhoCopiaS = fs.buildpath(“D:\SuaPasta\Minhas Cópias de Segurança”, … Continuar lendo

Publicado em Macro, VBA, Word | Deixe um comentário

Macro VBA para colar especial no Word

‘ Macro para colar somente texto.‘ Por que o gravador de macro do winword não registra esta ação com precisão. Sub PasteUnfText()    On Error GoTo oops    Selection.PasteSpecial _    DataType:=wdPasteText, _    Placement:=wdInLine    Endoops:BeepEnd Sub Fonte: http://www.gmayor.com/word_vba_examples.htm

Publicado em Macro, VBA, Word | Deixe um comentário

Exemplo de Macro em VBA para apagar linha indesejada Word

‘ Apaga todas as linhas que contiverem a palavra definida pela variável ‘txtLinha’ Sub LimparCatalogo()‘‘ LimparCatalogo Macro‘ Macro gravada 18/6/2011 por Cliente‘ txtLinha = “@gmail.com” Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = txtLinha .Replacement.Text = “” .Forward = True .Wrap = … Continuar lendo

Publicado em Macro, VBA, Word | Deixe um comentário

AutoHotKey

Baixei o AutoHotKey quando procurava um programa para mapear o teclado como Joystick. Inicialmente parecia interessante poder jogar Games em flash a partir do joystick. O mais interessante é que o AutoHotKey acabou se mostrando um ótimo programa para criar … Continuar lendo

Publicado em AutoHotKey, Games, Jogos, Joystick, Macro, Scripts | Deixe um comentário