Como controlar a criação de marcadores de origem MS OLE para copiar / colar?

1

De alguma forma, minha configuração do MS Word 2016 (no Windows 10, nível atual) é definida para que toda vez que eu copiar o material selecionado e colá-lo em outro lugar, o material de origem se torne um objeto / indicador OLE. Eu posso remover manualmente o marcador, mas isso está se tornando tedioso ao extremo. Eu procurei por alguma maneira de controlar esse comportamento, mas não consegui encontrá-lo.

Minha pergunta é; Como faço para desativar a criação da definição do objeto OLE (origem) ao selecionar e copiar o material em um documento do MS Word?

    
por dvhirst 07.06.2017 / 06:57

1 resposta

0

Aqui está uma macro para excluir automaticamente os marcadores logo após serem criados. Ele não exclui outros favoritos, apenas os que começam com "OLE_LINK".

O melhor lugar para colocar isso é no arquivo normal.dot. Para encontrar isso, ative a guia Desenvolvedor na faixa de opções e clique no botão Visual Basic. Lá você pode encontrar um arquivo chamado "ThisDocument" dentro do cabeçalho "Normal". Dentro desse arquivo basta colocar o seguinte código e salvá-lo.

Sub EditCopy()
    Selection.Copy
    DoEvents
    Application.OnTime Now + TimeValue("00:00:01"), "DeleteOleBookmarks"
End Sub

Sub DeleteOleBookmarks()
    Dim bmIndex As Integer
    Dim bmType As String
    DoEvents
    For bmIndex = ActiveDocument.Bookmarks.Count To 1 Step -1
        bmType = UCase(Left(ActiveDocument.Bookmarks(bmIndex).Name, 8))
        If bmType = "OLE_LINK" Then
            ActiveDocument.Bookmarks(bmIndex).Delete
        End If
    Next bmIndex
End Sub

Este código foi copiado daqui:
link

    
por 05.05.2018 / 17:27