Μετάβαση στο κύριο περιεχόμενο

Πώς να περιορίσετε μόνο τις τιμές επικόλλησης (αποτροπή μορφοποίησης) στο Excel;

Κανονικά, επικολλάμε αντιγραμμένα δεδομένα πατώντας ταυτόχρονα τα πλήκτρα Ctrl + V ταυτόχρονα. Και αυτό θα επικολλήσει τις αντιγραμμένες τιμές μαζί με όλη τη μορφοποίηση κελιού. Εάν πρέπει απλώς να επικολλήσετε τις τιμές μόνο και να περιορίσετε τη μορφοποίηση των κελιών, οι ακόλουθες μέθοδοι μπορούν να σας βοηθήσουν.

Περιορίστε την επικόλληση τιμών μόνο (αποτρέψτε τη μορφοποίηση) με τη λειτουργία τιμών επικόλλησης
Περιορίστε την επικόλληση τιμών μόνο (αποτρέψτε τη μορφοποίηση) με κώδικα VBA
Περιορίστε την επικόλληση τιμών μόνο με το Kutools για Excel


Περιορίστε την επικόλληση τιμών μόνο (αποτρέψτε τη μορφοποίηση) με τη λειτουργία τιμών επικόλλησης

Ένας εύκολος τρόπος περιορισμού στην επικόλληση μόνο τιμών είναι η επικόλληση των αντιγραμμένων δεδομένων ως τιμές μόνο στο Excel.

1. Μετά την αντιγραφή δεδομένων, κάντε δεξί κλικ στο κελί προορισμού στο οποίο θα επικολλήσετε τα δεδομένα.

2. Στη συνέχεια, κάντε κλικ στο Αξίες κάτω από το κουμπί Επιλογές επικόλλησης ενότητα στο μενού με δεξί κλικ. Δείτε το στιγμιότυπο οθόνης:

Μπορείτε να δείτε μόνο τις τιμές των αντιγραμμένων κελιών που επικολλούνται στα κελιά προορισμού.


Περιορίστε την επικόλληση τιμών μόνο (αποτρέψτε τη μορφοποίηση) με κώδικα VBA

Ο ακόλουθος κώδικας VBA σάς βοηθά να επικολλήσετε μόνο τιμές των κελιών που αντιγράψατε και να περιορίσετε όλες τις μορφές κελιών. Κάντε τα εξής.

1. Τύπος άλλος + F11 ταυτόχρονα για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.

2. Στο Microsoft Visual Basic για εφαρμογές παράθυρο, κάντε διπλό κλικ στο Αυτό το βιβλίο εργασίας στο Σχέδιο δεξί παράθυρο για να ανοίξετε το Αυτό το βιβλίο εργασίας παράθυρο κώδικα. Στη συνέχεια, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα VBA στο παράθυρο.

Κωδικός VBA: Περιορίστε την επικόλληση τιμών μόνο στο Excel

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    On Error Resume Next
    Target.PasteSpecial xlPasteValues
    Application.CutCopyMode = True
End Sub

3. Πάτα το άλλος + Q ταυτόχρονα για να κλείσετε το παράθυρο της Microsoft Visual Basic for Applications.

Τώρα, αντιγράψτε τα δεδομένα σας και μεταβείτε στο φύλλο εργασίας προορισμού. Μόνο ένα κλικ ή δεξί κλικ στο κελί προορισμού θα επικολλήσει τις τιμές των κελιών που αντιγράφηκαν χωρίς καμία μορφοποίηση αμέσως.


Περιορίστε την επικόλληση τιμών μόνο με το Kutools για Excel

Kutools για Excel 's Αντιγραφή σειρών Το βοηθητικό πρόγραμμα σάς βοηθά να επικολλάτε εύκολα μόνο τιμές ενός επιλεγμένου εύρους ή πολλαπλών επιλεγμένων περιοχών στο Excel. Κάντε τα εξής.

Πριν από την εφαρμογή Kutools για Excel, σας παρακαλούμε κατεβάστε και εγκαταστήστε το πρώτα.

1. Επιλέξτε ένα εύρος ή πολλές περιοχές με το πάτημα του Ctrl κλειδί και, στη συνέχεια, κάντε κλικ Kutools > Αντιγραφή σειρών

2. Στο Αντιγραφή πολλαπλών σειρών πλαίσιο διαλόγου, επιλέξτε μόνο το Αξίες επιλογή του Επικόλληση ειδική ενότητα και, στη συνέχεια, κάντε κλικ στο OK κουμπί.

Note: Μπορείτε να ελέγξετε και τα δύο ή ένα από τα Συμπεριλαμβανομένου του ύψους σειράς και την Συμπεριλαμβανομένου του πλάτους της στήλης επιλογές όπως χρειάζεστε.

3. Στο επόμενο Αντιγραφή πολλαπλών σειρών πλαίσιο διαλόγου, επιλέξτε ένα κενό κελί για επικόλληση των αντιγραμμένων κελιών και, στη συνέχεια, κάντε κλικ στο OK κουμπί.

Στη συνέχεια επικολλούνται μόνο τιμές όλων των επιλεγμένων κελιών σε ένα εύρος ή πολλαπλές περιοχές.

  Εάν θέλετε να έχετε μια δωρεάν δοκιμή (30-ημερών) αυτού του βοηθητικού προγράμματος, κάντε κλικ για να το κατεβάσετεκαι μετά πηγαίνετε για να εφαρμόσετε τη λειτουργία σύμφωνα με τα παραπάνω βήματα.


Σχετικά άρθρα:

Τα καλύτερα εργαλεία παραγωγικότητας γραφείου

🤖 Kutools AI Aide: Επανάσταση στην ανάλυση δεδομένων με βάση: Ευφυής Εκτέλεση   |  Δημιουργία κώδικα  |  Δημιουργία προσαρμοσμένων τύπων  |  Αναλύστε δεδομένα και δημιουργήστε γραφήματα  |  Επίκληση Λειτουργιών Kutools...
Δημοφιλή χαρακτηριστικά: Εύρεση, επισήμανση ή αναγνώριση διπλότυπων   |  Διαγραφή κενών γραμμών   |  Συνδυάστε στήλες ή κελιά χωρίς απώλεια δεδομένων   |   Γύρος χωρίς φόρμουλα ...
Σούπερ Αναζήτηση: VLookup πολλαπλών κριτηρίων    VLookup πολλαπλών τιμών  |   VLookup σε πολλά φύλλα   |   Ασαφής αναζήτηση ....
Σύνθετη αναπτυσσόμενη λίστα: Γρήγορη δημιουργία αναπτυσσόμενης λίστας   |  Εξαρτημένη αναπτυσσόμενη λίστα   |  Πολλαπλή αναπτυσσόμενη λίστα ....
Διαχειριστής στήλης: Προσθέστε έναν συγκεκριμένο αριθμό στηλών  |  Μετακίνηση στηλών  |  Εναλλαγή κατάστασης ορατότητας κρυφών στηλών  |  Συγκρίνετε εύρη και στήλες ...
Επιλεγμένα Χαρακτηριστικά: Εστίαση πλέγματος   |  Προβολή σχεδίου   |   Μεγάλη Formula Bar    Διαχείριση βιβλίου εργασίας & φύλλου   |  Βιβλιοθήκη πόρων (Αυτόματο κείμενο)   |  Επιλογή ημερομηνίας   |  Συνδυάστε φύλλα εργασίας   |  Κρυπτογράφηση/Αποκρυπτογράφηση κελιών    Αποστολή email ανά λίστα   |  Σούπερ φίλτρο   |   Ειδικό φίλτρο (φίλτρο με έντονη γραφή/πλάγια γραφή/διαγραφή...) ...
Κορυφαία 15 σύνολα εργαλείων12 Κείμενο Εργαλεία (Προσθήκη κειμένου, Κατάργηση χαρακτήρων, ...)   |   50 + Διάγραμμα Τύποι (Gantt διάγραμμα, ...)   |   40+ Πρακτικό ΜΑΘΗΜΑΤΙΚΟΙ τυποι (Υπολογίστε την ηλικία με βάση τα γενέθλια, ...)   |   19 Εισαγωγή Εργαλεία (Εισαγωγή κωδικού QR, Εισαγωγή εικόνας από το μονοπάτι, ...)   |   12 Μετατροπή Εργαλεία (Αριθμοί σε λέξεις, Μετατροπή Συναλλάγματος, ...)   |   7 Συγχώνευση & διαχωρισμός Εργαλεία (Σύνθετες σειρές συνδυασμού, Διαίρεση κελιών, ...)   |   ... κι αλλα

Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου.  Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...

Περιγραφή


Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
Comments (14)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hello, there are a problem here, values are automatically paste when you click on the cell
This comment was minimized by the moderator on the site
Hi, any chance to add this feature only in some sheets?
This comment was minimized by the moderator on the site
Hallo,
ich habe eine Excel-Datei (100 Tabellenregister) für die ich eine Formel gesucht habe, die es erlaubt, beim Kopieren nur Werte einfügen, möglich zu machen.

Ausschneiden+Drag&Drop habe ich bereits per Makro ausgeschaltet. Ich habe jetzt im Netz folgenden Code gefunden, den ich in
"Diese Arbeitsmappe" geschrieben habe:

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
On Error Resume Next
Target.PasteSpecial xlPasteValues
Application.CutCopyMode = True
End Sub

(Der Code verursacht, dass ich nach kopieren, den Inhalt sofort als Wert in eine angeklickte Zelle kopiert bekomme)
Das funktioniert sehr gut, jedoch habe ich noch ein Problem dabei:

Wenn ich Werte aus einer Zelle kopiere, kann ich diese auch in geschützte
Zellen kopieren und das soll nicht sein. In vielen geschützten Zellen stehen Formeln die nicht überschrieben werden sollen.

Kann mir jemand helfen, wie ich den Code erweitern oder ändern kann, dass er es nur erlaubt in nicht geschützte Zellen zu kopieren?

Gruß Heiko
This comment was minimized by the moderator on the site
Hi! for Kutools 'Copy Ranges', I realized there is limit on number of columns that can be copy at a time. I am working with 7,500 columns. I select 7,500 columns as the range, but it can only copy and paste partial of what I had selected, not all. I am planning to copy all these columns in one go and paste. Is there any way I can do that ? just to speed things up. Any help would highly be appreciated. Thanks!
This comment was minimized by the moderator on the site
Hi, is there code for working with ctrl+v. This code paste automatically when selecting cell. I found module code below link but couldn't find code for workbook like this.
https://www.extendoffice.com/documents/excel/2545-excel-set-paste-values-as-default.html
This comment was minimized by the moderator on the site
It's sad no one answers. I need this information too.
This comment was minimized by the moderator on the site
This code was great, but it was pasting items in the system clipboard that were copied from other programs. I put it in an 'If' statement which does nothing, unless Excel cells are actually in Cut or Copy mode. i.e. moving border around the cell(s).

Application.CutCopyMode has three modes: False = Not in Cut or Copy mode. | xlCopy = In Copy mode. | xlCut = In Cut mode.

'If in Cut or Copy mode, Paste Values Only
'If Not in Cut or Copy mode, skip and do nothing.

On Error Resume Next
If Not Application.CutCopyMode = False Then
Target.PasteSpecial xlPasteValues
Application.CutCopyMode = True
End If

This was a bit of a bugger for me to figure out. Hope it helps someone else.
-Travis (IT Professional since 1996)
This comment was minimized by the moderator on the site
This addition was a great help! Thank you so much for posting!
This comment was minimized by the moderator on the site
Hi Travis, Thank you very much for posting this.
I never respond to posts but i appreciate you posting this answer.
This comment was minimized by the moderator on the site
Hi Travis, is there code for working with ctrl+v. This code paste automatically when selecting cell. I found module code below link but couldn't find code for workbook like this. I hope what I have requested is possible.
https://www.extendoffice.com/documents/excel/2545-excel-set-paste-values-as-default.html
This comment was minimized by the moderator on the site
Dean, it is very useful! Thanks!
This comment was minimized by the moderator on the site
Thank you so much!! It works well and its so useful for the project that I am working on.
This comment was minimized by the moderator on the site
This works for me:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
Target.PasteSpecial xlPasteValues
Application.CutCopyMode = True
End Sub
This comment was minimized by the moderator on the site
Would this work on Worksheet level only? I am trying to restrict this only on one worksheet (not entire workbook), but it seems there is a problem.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations