Atalho no Word ou Excel para Colar Especial?

Question

Se eu quiser colar sem formatação, preciso ir até o botão "Colar" na faixa de opções e clicar em "Colar especial" e depois em "texto sem formatação".

Existe um atalho como Ctrl + V que automaticamente fará isso para mim?

    

Answer 1

Eu não acho que exista, mas a boa notícia é que você pode criar uma macro.

Grave a macro, faça a colagem como quiser, atribua-a a um atalho de teclado ou coloque o seguinte em uma nova macro (supondo que você queira colar sem formatar):

Para o MS Word 2010:

    Selection.PasteAndFormat (wdFormatPlainText)

Para o MS Excel 2010:

ActiveSheet.PasteSpecial Format:="Unicode Text", Link:=False, _
    DisplayAsIcon:=False, NoHTMLFormatting:=True

Novamente, depois de salvar a macro, você precisará atribuí-la a um atalho de teclado (por exemplo, ctrl + m).

Adição: MS Word 2002:

Sub PastePlaintext()
    Selection.PasteSpecial Link:=False, DataType:=wdPasteText
End Sub

    

Answer 2

No Word 2007 para 2013 no Windows, você pode usar Ctrl + Alt + V .

No Word 2011 para Mac, você pode usar Controle + Comando + V .

Ambos exibirão a caixa de diálogo "Colar especial". Não existe um atalho diretamente para "Unformatted Text", mas como você pode usar as setas para ir para "Unformatted Text" e Enter para confirmar, este é provavelmente o caminho mais rápido sem uma macro.

    

Answer 3

Acabei de descobrir que, no Word 2013 e no Excel 2013, há uma maneira rápida de acessar, a partir do teclado, todas as opções " Colar especial ". Nos exemplos a seguir, é mostrado apenas como colar como texto (sem colar os formatos).

Word 2013:

Depois de ter copiado algo, vá para onde deseja colá-lo (sem colar o formato). CTRL + V (também irá colar temporariamente o formato) então CTRL (pressione e solte a tecla de controle) então T (o último T significa "manter apenas o texto").

Excel 2013:

Depois de ter copiado algo, vá para onde deseja colá-lo (sem colar o formato). CTRL + V (colará temporariamente o formato também) então CTRL (pressione e solte a tecla de controle) então V (o último V significa "colar valores").

É importante que a tecla segundo CTRL seja liberada antes de digitar a última letra.

Este método requer apenas 4 acessos ao teclado, sem macros e sem uso do mouse em uma janela de diálogo.

    

Answer 4

Se você quiser definir "Manter somente texto" como padrão, faça o seguinte:

1. A pasta padrão:

2. Cliquenalistasuspensanapartesuperioreescolha"Mais comandos":

3. CliqueemAvançado:

4. Altere os padrões (para manter apenas o texto):

5. Arepetiçãodosmesmospadrõesdecolageméapenasparatexto:

Espero que isso ajude!

    

Answer 5

No Word 2010, você pode clicar com o botão direito do mouse e, nas opções de colagem, selecionar "Manter somente texto" - não tão bom quanto um atalho de teclado, mas nada mal.

    

Answer 6

Para o Word, alterar as configurações padrão (como mostrado acima) parece ser uma boa opção se as configurações corresponderem ao que você deseja. No entanto, para o Excel, sugiro usar um clique com o botão direito do mouse.

Há alguns problemas significativos com a adição de uma macro.

1) Ele será perdido em novos documentos, a menos que você modifique o modelo padrão.

2) Se você modificar o modelo padrão e precisar compartilhar sua pasta de trabalho, a pessoa que estiver recebendo o arquivo receberá um aviso de segurança ... o que provavelmente irá assustá-lo.

As outras opções de teclado exigem muitos pressionamentos de tecla. Além disso, se você estiver colando de uma página da Web, o Excel e o Word levarão muito tempo para converter o HTML.

Um clique com o botão direito mostrará as opções de colagem, onde você pode selecionar a opção de texto simples.

Eu gostaria que houvesse um atalho de teclado embutido, mas o botão direito parece ser a melhor alternativa para mim.

    

Answer 7

Para uma solução independente de aplicativos, considere PureText .

Nenhum instalador é necessário, é gratuito e, quando executado, mapeará uma nova combinação de teclas para colar sem formatação.

Pessoalmente eu uso Win + V .

    

Answer 8

Existe um jeito fácil. Apenas pressione Alt + E , então S e V . Você obterá a caixa de diálogo muito mais fácil, o que certamente economizará muito tempo.

    

Answer 9

A função já existe, ela simplesmente não tem um atalho fora da caixa, mas você pode dar uma.

No Word 2007-2013 (talvez anterior, não lembre), você pode vincular o atalho de teclado de sua escolha aos comandos. No Word 2013, isso está em

• Arquivo > Opções > Personalizar faixa de opções > em seguida, clique no botão "Personalizar ..." na parte inferior esquerda rotulada com "Atalhos do teclado:".
• Em Categorias, selecione "Todos os Comandos";
• em Comandos, selecione "PasteTextOnly".
• Clique na caixa de texto "Pressione nova tecla de atalho" e pressione a combinação de teclas que você deseja usar para fazer esse comando.
• Para vincular o atalho ao comando (lembrar / salvar o novo atalho), clique no botão "Atribuir".

Se o combo de teclas estiver em uso, abaixo da caixa "current keys", ele diz "Currently assigned to: xyz", onde xyz é o comando que já usa este atalho. Então você pode decidir se quer ou não ficar com sua primeira escolha (o atalho agora invocará PasteTextOnly e não chamará mais xyz) ou tentar criar outro combo de teclas.

    

Answer 10

No Word 2007-2013, você deve pressionar ALT + CTRL + G, pressionar T e clicar em Enter key

    

Answer 11

No Excel, simplesmente pressione F2 na célula que você deseja colar e pressione CTRL + V.

    

Answer 12

right click where you want to paste the plain text press the T key

o texto não formatado é colado.

BTW: Se você colar texto formatado acidentalmente, selecione tudo e pressione Ctrl + Espaço para redefinir para o formato 'normal'

    

Answer 13

Para colar objetos e texto no Excel, com uma opção para desfazer, use

' Custom data type for undoing
    Type SaveRange
        Val As Variant
        Addr As String
    End Type

' Stores info about current selection
    Public OldWorkbook As Workbook
    Public OldSheet As Worksheet
    Public OldSelection() As SaveRange
'----------------------------------------------------------
Sub PasteValues()

' Set shortcut to Cntl+Shift+V, for example
' Works for Outlook and Chrome AND Excel

' Abort if a range isn't selected
    If TypeName(Selection) <> "Range" Then Exit Sub

' The next block of statements
' save the current values for undoing
    ReDim OldSelection(Selection.Count)
    Set OldWorkbook = ActiveWorkbook
    Set OldSheet = ActiveSheet
    i = 0
    For Each cell In Selection
        i = i + 1
        OldSelection(i).Addr = cell.Address
        OldSelection(i).Val = cell.Formula
    Next cell

' Start paste function
    On Error GoTo ValuesFail
    ' Works for Excel and Outlook, but not Chrome
    Selection.PasteSpecial Paste:=xlValues
    ' Specify the Undo Sub
    Application.OnUndo "Undo the macro", "UndoMacro"
    Exit Sub
ValuesFail:
    On Error GoTo TextFail
    ' Works for Outlook and Chrome, but not Excel
    ActiveSheet.PasteSpecial Format:="Text"
    ' Specify the Undo Sub
    Application.OnUndo "Undo the macro", "UndoMacro"
    Exit Sub
TextFail:
    On Error GoTo PasteFail
    ActiveSheet.Paste
    ' Specify the Undo Sub
    Application.OnUndo "Undo the macro", "UndoMacro"
    Exit Sub
PasteFail:
    MsgBox "Complete Failure"
End Sub
'----------------------------------------------------------
Sub UndoMacro()
' Reinstates data in the selected range

' Tell user if a problem occurs
    On Error GoTo Problem

    Application.ScreenUpdating = False

' Make sure the correct workbook and sheet are active
    OldWorkbook.Activate
    OldSheet.Activate

' Restore the saved information
    For i = 1 To UBound(OldSelection)
        Range(OldSelection(i).Addr).Formula = OldSelection(i).Val
    Next i
    Exit Sub

' Error handler
Problem:
    MsgBox "Can't undo macro"
End Sub
'----------------------------------------------------------
Sub RevertFile()
' From http://www.excelforum.com/showthread.php?t=491103

    wkname = ActiveWorkbook.Path & "\" & ActiveWorkbook.Name
    ActiveWorkbook.Close Savechanges:=False
    Workbooks.Open Filename:=wkname

End Sub

De link