Wenn ich ohne Formatierung einfügen möchte, muss ich auf die Schaltfläche “Einfügen” im Menüband gehen und auf “Spezial einfügen” und dann auf “unformatierter Text” klicken.
Gibt es eine Tastenkombination wie Strg+V, die das automatisch für mich erledigt?
Bei Word 2007 bis 2013 unter Windows können Sie Strg+Alt+V verwenden.
In Word 2011 für Mac können Sie Strg+Befehl+V verwenden.
Beide rufen den Dialog “Spezial einfügen” auf. Es gibt kein direktes Tastenkürzel für “Unformatierter Text”, aber da Sie mit den Pfeiltasten zu “Unformatierter Text” gehen und mit Enter bestätigen können, ist dies wahrscheinlich der schnellste Weg ohne Makro.
Ich habe gerade herausgefunden, dass es in Word 2013 und Excel 2013 eine schnelle Möglichkeit gibt, über die Tastatur auf alle “Einfügen Spezial”-Optionen zuzugreifen. In den folgenden Beispielen wird nur gezeigt, wie man als Text einfügt (ohne Einfügen der Formate).
Nachdem Sie etwas kopiert haben, gehen Sie dorthin, wo Sie es einfügen wollen (ohne das Format einzufügen).STRG+V (es wird vorübergehend auch das Format einfügen), dann STRG (drücken und loslassen der Steuerungstaste), dann T (das letzte T bedeutet “nur Text einfügen”).
Nachdem Sie etwas kopiert haben, gehen Sie dorthin, wo Sie es einfügen möchten (ohne das Format einzufügen).STRG+V (es wird vorübergehend auch das Format einfügen), dann STRG (drücken und loslassen der Steuerungstaste), dann V (das letzte V bedeutet “Werte einfügen”).
Es ist wichtig, dass die zweite STRG-Taste losgelassen wird, bevor der letzte Buchstabe eingegeben wird.
Diese Methode erfordert nur 4 Tastendrücke, keine Makros und keine Verwendung der Maus in einem Dialogfenster.
Ich glaube nicht, dass es eine gibt, aber die gute Nachricht ist, dass Sie eine erstellen können, indem Sie ein Makro erstellen.
Entweder zeichnen Sie das Makro auf, wobei Sie das Einfügen so machen, wie Sie es wollen, und weisen es dann einem Tastaturkürzel zu, oder Sie fügen das Folgende in ein neues Makro ein (vorausgesetzt, Sie wollen ohne Formatierung einfügen):
Für MS Word 2010:
Selection.PasteAndFormat (wdFormatPlainText)
Für MS Excel 2010:
ActiveSheet.PasteSpecial Format:="Unicode Text", Link:=False, _
DisplayAsIcon:=False, NoHTMLFormatting:=True
Auch hier müssen Sie das Makro nach dem Speichern einem Tastaturkürzel zuweisen (z. B. ctrl + m).
Zusatz: MS Word 2002:
Sub PastePlaintext()
Selection.PasteSpecial Link:=False, DataType:=wdPasteText
End Sub
Wenn Sie “Nur Text beibehalten” als Standard einstellen möchten, können Sie Folgendes tun:
Die Standardpaste:
Klicken Sie oben auf das Dropdown-Menü und wählen Sie “Weitere Befehle”:
Klicken Sie auf “Erweitert”:
Ändern Sie die Standardeinstellungen (auf “Keep Text Only”):
Wiederholen Sie die gleichen Einfügevorgaben auf Nur Text:
Hoffentlich hilft das!
Wenn Sie eine anwendungsunabhängige Lösung wünschen, sollten Sie PureText in Betracht ziehen.
Es ist kein Installationsprogramm erforderlich, es ist kostenlos und wenn es läuft, wird eine neue Tastenkombination für das Einfügen ohne Formatierung zugeordnet.
Persönlich verwende ich Win+V.
Für Word scheint das Ändern der Standardeinstellungen (wie oben gezeigt) eine gute Option zu sein, wenn die Einstellungen Ihren Wünschen entsprechen. Für Excel würde ich jedoch vorschlagen, stattdessen einen Rechtsklick zu verwenden.
Es gibt ein paar wesentliche Probleme beim Hinzufügen eines Makros.
1) Es geht in neuen Dokumenten verloren, wenn Sie die Standardvorlage nicht ändern.
2) Wenn Sie die Standardvorlage ändern und Ihre Arbeitsmappe weitergeben müssen, erhält die Person, die die Datei erhält, eine Sicherheitswarnung…., die sie wahrscheinlich erschrecken wird.
Die anderen Tastaturoptionen erfordern eine Menge Tastendrücke. Wenn Sie außerdem von einer Webseite einfügen, brauchen Excel und Word sehr lange, um das HTML zu konvertieren.
Ein Rechtsklick zeigt die Einfügeoptionen an, wo Sie die Option “Nur Text” auswählen können.
Ich wünschte, es gäbe ein eingebautes Tastaturkürzel, aber ein Rechtsklick scheint mir die beste Alternative zu sein.
Die Funktion existiert bereits, sie hat nur noch kein Tastenkürzel, aber Sie können ihr eines geben.
In Word 2007-2013 (vielleicht auch früher, weiß nicht mehr) können Sie das Tastaturkürzel Ihrer Wahl an Befehle binden. In Word 2013 ist dies unter
Wenn die Tastenkombination in Gebrauch ist, steht unter dem Feld “Aktuelle Tasten” “Derzeit zugewiesen an: xyz”, wobei xyz der Befehl ist, der diesen Shortcut bereits verwendet. Dann können Sie entscheiden, ob Sie bei Ihrer ersten Wahl bleiben wollen (die Tastenkombination ruft jetzt nur noch PasteTextOnly auf und nicht mehr xyz) oder ob Sie versuchen wollen, eine andere Tastenkombination zu finden.
Es gibt tatsächlich einen einfachen Weg. Drücken Sie einfach Alt+E, dann S und V. Sie erhalten das Dialogfeld viel einfacher, das spart Ihnen sicherlich viel Zeit.
In Excel drücken Sie einfach F2 auf der Zelle, in die Sie einfügen möchten, und drücken dann STRG+V.
In Word 2007-2013 müssen Sie ALT + STRG + G drücken, dann T und die Taste Enter drücken
Klicken Sie mit der rechten Maustaste auf die Stelle, an der Sie den unformatierten Text einfügen möchten, und drücken Sie die Taste T.
Der unformatierte Text wird eingefügt.
BTW: Wenn Sie versehentlich formatierten Text einfügen, markieren Sie den gesamten Text und drücken Sie Strg + Leertaste, um ihn auf das “normale” Format zurückzusetzen
Um sowohl Objekte als auch Text in Excel einzufügen, mit einer Option zum Rückgängigmachen, verwenden Sie
' 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