Note: The other languages of the website are Google-translated. Back to English

Πώς να περιορίσετε μόνο τις τιμές επικόλλησης (αποτροπή μορφοποίησης) στο 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-ημέρα) αυτού του βοηθητικού προγράμματος, κάντε κλικ για να το κατεβάσετεκαι μετά πηγαίνετε για να εφαρμόσετε τη λειτουργία σύμφωνα με τα παραπάνω βήματα.


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


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

Το Kutools για Excel λύνει τα περισσότερα από τα προβλήματά σας και αυξάνει την παραγωγικότητά σας κατά 80%

  • Επαναχρησιμοποίηση: Εισαγάγετε γρήγορα σύνθετοι τύποι, γραφήματα και οτιδήποτε έχετε χρησιμοποιήσει στο παρελθόν. Κρυπτογράφηση κυττάρων με κωδικό πρόσβασης Δημιουργία λίστας αλληλογραφίας και στείλτε email ...
  • Super Formula Bar (επεξεργαστείτε εύκολα πολλές γραμμές κειμένου και τύπου). Διάταξη ανάγνωσης (εύκολη ανάγνωση και επεξεργασία μεγάλου αριθμού κελιών). Επικόλληση σε φιλτραρισμένο εύρος...
  • Συγχώνευση κελιών / σειρών / στηλών χωρίς απώλεια δεδομένων · Περιεχόμενο διαχωρισμού κελιών Συνδυάστε διπλές σειρές / στήλες... Αποτροπή διπλών κυττάρων; Συγκρίνετε τα εύρη...
  • Επιλέξτε Διπλότυπο ή Μοναδικό Σειρές; Επιλέξτε Κενές σειρές (όλα τα κελιά είναι κενά). Σούπερ εύρεση και ασαφής εύρεση σε πολλά βιβλία εργασίας. Τυχαία επιλογή ...
  • Ακριβές αντίγραφο Πολλαπλά κελιά χωρίς αλλαγή της αναφοράς τύπου. Αυτόματη δημιουργία αναφορών σε πολλαπλά φύλλα? Εισαγωγή κουκκίδων, Πλαίσια ελέγχου και άλλα ...
  • Εξαγωγή κειμένου, Προσθήκη κειμένου, Κατάργηση κατά θέση, Αφαιρέστε το διάστημα; Δημιουργία και εκτύπωση υποσύνολων σελιδοποίησης. Μετατροπή περιεχομένου και σχολίων μεταξύ κελιών...
  • Σούπερ φίλτρο (αποθηκεύστε και εφαρμόστε σχήματα φίλτρων σε άλλα φύλλα). Προηγμένη ταξινόμηση ανά μήνα / εβδομάδα / ημέρα, συχνότητα και άλλα. Ειδικό φίλτρο με έντονη, πλάγια ...
  • Συνδυάστε βιβλία εργασίας και φύλλα εργασίας; Συγχώνευση πινάκων βάσει βασικών στηλών. Διαχωρίστε τα δεδομένα σε πολλά φύλλα; Μαζική μετατροπή xls, xlsx και PDF...
  • Περισσότερα από 300 ισχυρά χαρακτηριστικά. Υποστηρίζει Office / Excel 2007-2021 και 365. Υποστηρίζει όλες τις γλώσσες. Εύκολη ανάπτυξη στην επιχείρηση ή τον οργανισμό σας. Πλήρεις δυνατότητες δωρεάν δοκιμής 30 ημερών. Εγγύηση επιστροφής χρημάτων 60 ημερών.
kte καρτέλα 201905

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

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
κάτω μέρος γραφείου
Σχόλια (14)
Δεν υπάρχουν ακόμη βαθμολογίες. Γίνε ο πρώτος που θα αξιολογήσετε!
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Αυτό θα λειτουργούσε μόνο σε επίπεδο φύλλου εργασίας; Προσπαθώ να το περιορίσω μόνο σε ένα φύλλο εργασίας (όχι ολόκληρο το βιβλίο εργασίας), αλλά φαίνεται ότι υπάρχει πρόβλημα.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Αυτό λειτουργεί για μένα:

Ιδιωτικό δευτερεύον φύλλο εργασίας_SelectionChange(Στόχος ByVal ως εύρος)
On Error Συνέχιση Επόμενη
Target.PasteSpecial xlPasteValues
Application.CutCopyMode = True
Sub End
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Σε ευχαριστώ πάρα πολύ!! Λειτουργεί καλά και είναι τόσο χρήσιμο για το έργο στο οποίο εργάζομαι.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Αυτός ο κώδικας ήταν υπέροχος, αλλά επικόλλησε στοιχεία στο πρόχειρο του συστήματος που είχαν αντιγραφεί από άλλα προγράμματα. Το έβαλα σε μια δήλωση "Εάν" η οποία δεν κάνει τίποτα, εκτός εάν τα κελιά του Excel βρίσκονται στην πραγματικότητα σε λειτουργία Αποκοπής ή Αντιγραφής. κινούμενο περίγραμμα γύρω από τα κελιά.

Το Application.CutCopyMode έχει τρεις λειτουργίες: False = Όχι σε λειτουργία Cut ή Copy. | xlCopy = Σε λειτουργία αντιγραφής. | xlCut = Σε λειτουργία αποκοπής.

«Εάν βρίσκεται σε λειτουργία Αποκοπής ή Αντιγραφής, Επικόλληση μόνο τιμών
«Εάν δεν βρίσκεται σε λειτουργία Αποκοπής ή Αντιγραφής, παραλείψτε και μην κάνετε τίποτα.

On Error Συνέχιση Επόμενη
Αν όχι Application.CutCopyMode = False Τότε
Target.PasteSpecial xlPasteValues
Application.CutCopyMode = True
End If

Αυτό ήταν λίγο ενοχλητικό για μένα να το καταλάβω. Ελπίζω να βοηθήσει κάποιον άλλο.
-Travis (Επαγγελματίας Πληροφορικής από το 1996)
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σου Travis, Ευχαριστώ πολύ για τη δημοσίευση.
Ποτέ δεν απαντώ σε δημοσιεύσεις, αλλά εκτιμώ που δημοσιεύετε αυτήν την απάντηση.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σου Travis, υπάρχει κώδικας για εργασία με το ctrl+v. Αυτός ο κώδικας επικολλάται αυτόματα κατά την επιλογή κελιού. Βρήκα τον κωδικό ενότητας κάτω από τον σύνδεσμο, αλλά δεν μπορούσα να βρω κώδικα για το βιβλίο εργασίας όπως αυτό. Ελπίζω ότι αυτό που ζήτησα είναι δυνατό.
https://www.extendoffice.com/documents/excel/2545-excel-set-paste-values-as-default.html
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Dean, είναι πολύ χρήσιμο! Ευχαριστώ!
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Αυτή η προσθήκη βοήθησε πολύ! Ευχαριστώ πολύ για την ανάρτηση!
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια, υπάρχει κώδικας για εργασία με ctrl+v. Αυτός ο κώδικας επικολλάται αυτόματα κατά την επιλογή κελιού. Βρήκα τον κωδικό ενότητας κάτω από τον σύνδεσμο, αλλά δεν μπορούσα να βρω κώδικα για το βιβλίο εργασίας όπως αυτό.
https://www.extendoffice.com/documents/excel/2545-excel-set-paste-values-as-default.html
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Είναι λυπηρό που κανείς δεν απαντά. Χρειάζομαι και εγώ αυτές τις πληροφορίες.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια! για το Kutools 'Copy Ranges', συνειδητοποίησα ότι υπάρχει όριο στον αριθμό των στηλών που μπορούν να αντιγραφούν κάθε φορά. Δουλεύω με 7,500 στήλες. Επιλέγω 7,500 στήλες ως εύρος, αλλά μπορεί να αντιγράψει και να επικολλήσει μόνο μέρος αυτού που είχα επιλέξει, όχι όλα. Σκοπεύω να αντιγράψω όλες αυτές τις στήλες με μια κίνηση και να επικολλήσω. Υπάρχει κάποιος τρόπος να το κάνω αυτό; για να επιταχυνθούν τα πράγματα. Οποιαδήποτε βοήθεια θα εκτιμηθεί ιδιαίτερα. Ευχαριστώ!
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σας,
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:

Ιδιωτικό δευτερεύον βιβλίο εργασίας_SheetSelectionChange(ByVal Sh ως αντικείμενο, ByVal Target As Range)
On Error Συνέχιση Επόμενη
Target.PasteSpecial xlPasteValues
Application.CutCopyMode = True
Sub End

(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 Πρόβλημα 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
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια, υπάρχει περίπτωση να προσθέσετε αυτήν τη δυνατότητα μόνο σε ορισμένα φύλλα;
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σας, υπάρχει ένα πρόβλημα εδώ, οι τιμές επικολλούνται αυτόματα όταν κάνετε κλικ στο κελί
Δεν υπάρχουν σχόλια δημοσιεύτηκε ακόμα

Ακολουθησε μας

Πνευματικά δικαιώματα © 2009 - www.extendoffice.com. | Ολα τα δικαιώματα διατηρούνται. Τροφοδοτείται από ExtendOffice. | Sitemap
Το Microsoft και το λογότυπο του Office είναι εμπορικά σήματα ή σήματα κατατεθέντα της Microsoft Corporation στις Ηνωμένες Πολιτείες ή / και σε άλλες χώρες.
Προστατεύεται από το Sectigo SSL