Verknüpfung in Word oder Excel zum Einfügen?
Antworten:
Ich glaube nicht, dass es das gibt, aber die gute Nachricht ist, dass Sie eine erstellen können, indem Sie ein Makro erstellen.
Zeichnen Sie das Makro entweder auf, indem Sie es wie gewünscht einfügen und dann einer Tastenkombination zuweisen, oder fügen Sie Folgendes in ein neues Makro ein (vorausgesetzt, Sie möchten es 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
Nachdem Sie das Makro gespeichert haben, müssen Sie es erneut einer Tastenkombination zuweisen (z. B. Strg + m).
Ergänzung: MS Word 2002:
Sub PastePlaintext()
Selection.PasteSpecial Link:=False, DataType:=wdPasteText
End Sub
Auf Wort von 2007 bis 2013 auf Windows können Sie verwenden Ctrl+ Alt+ V.
Auf Word - 2011 für Mac können Sie verwenden Control+ Command+ V.
In beiden Fällen wird das Dialogfeld "Inhalte einfügen" angezeigt. Es gibt keine direkte Verknüpfung für "Unformatierter Text", aber da Sie Pfeile verwenden können, um zu "Unformatierter Text" Enterzu wechseln und zu bestätigen, 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 " Inhalte einfügen " -Optionen zuzugreifen . In den folgenden Beispielen wird nur gezeigt, wie Sie Text einfügen (ohne die Formate einzufügen).
Word 2013:
Nachdem Sie etwas kopiert haben, gehen Sie dorthin, wo Sie es einfügen möchten (ohne das Format einzufügen). CTRL+ V(das Format wird auch vorübergehend eingefügt), dann CTRL(die Steuertaste drücken und loslassen), dann T(das letzte T bedeutet "nur Text behalten").
Excel 2013:
Nachdem Sie etwas kopiert haben, gehen Sie dorthin, wo Sie es einfügen möchten (ohne das Format einzufügen). CTRL+ V(das Format wird auch vorübergehend eingefügt), dann CTRL(die Steuertaste drücken und loslassen) und dann V(das letzte V bedeutet "Werte einfügen").
Es ist wichtig, dass die zweite CTRL Taste losgelassen wird, bevor der letzte Buchstabe eingegeben wird.
Diese Methode erfordert nur 4 Tastaturtreffer, keine Makros und keine Verwendung der Maus in einem Dialogfenster.
Wenn Sie "Nur Text behalten" als Standard festlegen möchten, können Sie Folgendes tun:
Die Standardpaste:
Klicken Sie oben auf die Dropdown-Liste und wählen Sie "Weitere Befehle":
Klicken Sie auf Erweitert:
Ändern Sie die Standardeinstellungen (um nur Text beizubehalten):
Wenn Sie das gleiche Einfügen wiederholen, wird standardmäßig nur Text eingefügt:
Hoffe das hilft!
Für Word scheint es eine gute Option zu sein, die Standardeinstellungen (wie oben gezeigt) zu ändern, wenn die Einstellungen Ihren Wünschen entsprechen. Für Excel würde ich jedoch empfehlen, stattdessen einen Rechtsklick zu verwenden.
Beim Hinzufügen eines Makros treten einige schwerwiegende Probleme auf.
1) Es geht in neuen Dokumenten verloren, sofern Sie die Standardvorlage nicht ändern.
2) Wenn Sie die Standardvorlage ändern und Ihre Arbeitsmappe freigeben müssen, erhält die Person, die die Datei erhält, eine Sicherheitswarnung.
Die anderen Tastaturoptionen erfordern viele Tastenanschläge. Wenn Sie von einer Webseite einfügen, dauert es außerdem lange, bis Excel und Word den HTML-Code konvertiert haben.
Durch Klicken mit der rechten Maustaste werden die Einfügeoptionen angezeigt, in denen Sie die Nur-Text-Option auswählen können.
Ich wünschte, es wäre eine Tastenkombination eingebaut, aber Rechtsklick scheint mir die beste Alternative zu sein.
Die Funktion ist bereits vorhanden, es ist lediglich keine Verknüpfung im Lieferumfang enthalten, Sie können sie jedoch zuweisen.
In Word 2007-2013 (möglicherweise früher, ich erinnere mich nicht) können Sie die Tastenkombination Ihrer Wahl an Befehle binden. In Word 2013 ist dies in
- Datei> Optionen> Menüband anpassen> Klicken Sie dann links unten auf die Schaltfläche "Anpassen ...", die mit "Tastaturkürzel:" beschriftet ist.
- Wählen Sie unter "Kategorien" die Option "Alle Befehle" aus.
- Wählen Sie in den Befehlen "PasteTextOnly" aus.
- Klicken Sie in das Textfeld "Neue Tastenkombination drücken" und drücken Sie dann die Tastenkombination, die Sie für diesen Befehl verwenden möchten.
- Um die Verknüpfung an den Befehl zu binden (neue Verknüpfung merken / speichern), klicken Sie auf die Schaltfläche "Zuweisen".
Wenn die Tastenkombination verwendet wird, wird unter dem Feld "Aktuelle Tasten" "Derzeit zugewiesen an: xyz" angezeigt, wobei xyz der Befehl ist, der diese Verknüpfung bereits verwendet. Dann können Sie entscheiden, ob Sie mit Ihrer ersten Wahl bleiben möchten oder nicht (die Verknüpfung ruft jetzt PasteTextOnly auf und nicht mehr xyz) oder versuchen, eine andere Tastenkombination zu finden.
Es gibt eigentlich einen einfachen Weg. Drücken Sie einfach Alt+ E, dann Sund V. Sie werden das Dialogfeld viel einfacher bekommen, das wird Ihnen sicherlich viel Zeit sparen.
In Word 2007-2013 müssen Sie ALT + STRG + G drücken, dann T drücken und die Eingabetaste drücken
Drücken Sie in Excel einfach F2 in der Zelle, in die Sie einfügen möchten, und drücken Sie dann STRG + V.
Klicken Sie mit der rechten Maustaste auf die Stelle, an der Sie den Text einfügen möchten, und drücken Sie die T-Taste
unformatierter Text wird eingefügt.
Übrigens: Wenn Sie versehentlich formatierten Text einfügen, markieren Sie alles und drücken Sie Strg + Leertaste, um zum normalen Format zurückzukehren
Verwenden Sie diese Option, um sowohl Objekte als auch Text in Excel einzufügen und rückgängig zu machen
' 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