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

Sut i gyfyngu i werthoedd pastio yn unig (atal fformatio) yn Excel?

Fel rheol, rydyn ni'n pastio data wedi'i gopïo gyda dim ond pwyso'r bysellau Ctrl + V ar yr un pryd. A bydd hynny'n gludo'r gwerthoedd a gopïwyd ynghyd â'r holl fformatio celloedd. Os oes angen i chi gludo'r gwerthoedd yn unig a chyfyngu ar fformatio'r celloedd, gall y dulliau canlynol eich helpu.

Cyfyngu i gludo gwerthoedd yn unig (atal fformatio) gyda nodwedd gwerthoedd past
Cyfyngu i gludo gwerthoedd yn unig (atal fformatio) gyda chod VBA
Cyfyngu i gludo gwerthoedd yn unig gyda Kutools ar gyfer Excel


Cyfyngu i gludo gwerthoedd yn unig (atal fformatio) gyda nodwedd gwerthoedd past

Ffordd hawdd o gyfyngu i werthoedd pastio yn unig yw pasio'r data a gopïwyd fel gwerthoedd yn Excel yn unig.

1. Ar ôl copïo data, cliciwch ar y dde i'r gell gyrchfan y byddwch chi'n gludo'r data iddi.

2. Yna cliciwch y Gwerthoedd botwm o dan y Gludo Opsiynau adran yn y ddewislen clicio ar y dde. Gweler y screenshot:

Gallwch weld dim ond gwerthoedd celloedd wedi'u copïo sy'n cael eu pastio i'r celloedd cyrchfan.


Cyfyngu i gludo gwerthoedd yn unig (atal fformatio) gyda chod VBA

Mae'r cod VBA canlynol yn eich helpu i gludo gwerthoedd celloedd wedi'u copïo yn unig, a chyfyngu ar yr holl fformatio celloedd. Gwnewch fel a ganlyn.

1. Gwasgwch Alt + F11 allweddi ar yr un pryd i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Yn y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, cliciwch ddwywaith ar y Llyfr Gwaith hwn yn y Prosiect cwarel iawn i agor y Llyfr Gwaith hwn ffenestr cod. Yna copïwch a gludwch y cod VBA isod i'r ffenestr.

Cod VBA: Cyfyngu i gludo gwerthoedd yn Excel yn unig

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. Gwasgwch y Alt + Q allweddi ar yr un pryd i gau ffenestr Microsoft Visual Basic for Applications.

Nawr, copïwch eich data, ac ewch i'r daflen waith cyrchfan. Dim ond un clic neu glicio ar y gell gyrchfan fydd yn pastio gwerthoedd celloedd wedi'u copïo heb unrhyw fformatio ar unwaith.


Cyfyngu i gludo gwerthoedd yn unig gyda Kutools ar gyfer Excel

Kutools for Excel 's Copi Meysydd mae cyfleustodau yn eich helpu i gludo dim ond gwerthoedd amrediad dethol neu ystodau dethol lluosog yn Excel. Gwnewch fel a ganlyn.

Cyn gwneud cais Kutools ar gyfer Excel, os gwelwch yn dda ei lawrlwytho a'i osod yn gyntaf.

1. Dewiswch ystod neu ystodau lluosog gyda dal y Ctrl allwedd, yna cliciwch Kutools > Copi Meysydd

2. Yn y Copi Meysydd Lluosog blwch deialog, dim ond dewis y Gwerthoedd opsiwn yn y Gludo arbennig adran, ac yna cliciwch yr adran OK botwm.

Nodyn: Gallwch wirio'r ddau neu un o'r Gan gynnwys uchder rhes ardderchog a'r Gan gynnwys lled colofn opsiynau yn ôl yr angen.

3. Yn y nesaf Copi Meysydd Lluosog blwch deialog, dewiswch gell wag ar gyfer pasio'r celloedd a gopïwyd, ac yna cliciwch ar y OK botwm.

Yna dim ond gwerthoedd yr holl gelloedd a ddewiswyd mewn ystod neu ystodau lluosog sy'n cael eu pastio.

  Os ydych chi am gael treial am ddim (30 diwrnod) o'r cyfleustodau hwn, cliciwch i'w lawrlwytho, ac yna ewch i gymhwyso'r llawdriniaeth yn ôl y camau uchod.


Erthyglau cysylltiedig:


Yr Offer Cynhyrchedd Swyddfa Gorau

Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%

  • Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Mwy na 300 o nodweddion pwerus. Yn cefnogi Swyddfa / Excel 2007-2019 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.
tab kte 201905

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
gwaelod officetab
sylwadau (14)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
A fyddai hyn yn gweithio ar lefel Taflen Waith yn unig? Rwy'n ceisio cyfyngu hyn ar un daflen waith yn unig (nid llyfr gwaith cyfan), ond mae'n ymddangos bod problem.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae hyn yn gweithio i mi:

Is-daflen Waith Breifat_SelectionChange(FalVal Target As Range)
Ar Ail-ddechrau Gwall Nesaf
Target.PasteSpecial xlPasteValues
Application.CutCopyMode = Gwir
Is-End
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch yn fawr iawn!! Mae'n gweithio'n dda ac mae mor ddefnyddiol ar gyfer y prosiect rydw i'n gweithio arno.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Roedd y cod hwn yn wych, ond roedd yn gludo eitemau yng nghlipfwrdd y system a gafodd eu copïo o raglenni eraill. Fe'i rhoddais mewn datganiad 'Os' nad yw'n gwneud dim, oni bai bod celloedd Excel mewn modd Torri neu Gopïo mewn gwirionedd. hy symud border o amgylch y gell(iau).

Mae gan Application.CutCopyMode dri modd: Gau = Ddim yn y modd Torri neu Gopïo. | xlCopy = Yn y modd Copïo. | xlCut = Yn y modd Torri.

'Os yn y modd Torri neu Gopïo, Gludo Gwerthoedd yn Unig
'Os Ddim yn y modd Torri neu Gopïo, sgipiwch a gwneud dim.

Ar Ail-ddechrau Gwall Nesaf
If Not Application.CutCopyMode = Gau Yna
Target.PasteSpecial xlPasteValues
Application.CutCopyMode = Gwir
Gorffennwch Os

Roedd hyn yn dipyn o bugger i mi chyfrif i maes. Gobeithio ei fod yn helpu rhywun arall.
-Travis (TG Proffesiynol ers 1996)
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo Travis, Diolch yn fawr iawn am bostio hwn.
Nid wyf byth yn ymateb i bostiadau ond rwy'n gwerthfawrogi eich bod yn postio'r ateb hwn.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo Travis, a oes cod ar gyfer gweithio gyda ctrl+v. Mae'r cod hwn yn gludo'n awtomatig wrth ddewis cell. Deuthum o hyd i god modiwl o dan y ddolen ond ni allwn ddod o hyd i god ar gyfer llyfr gwaith fel hwn. Rwy'n gobeithio bod yr hyn yr wyf wedi gofyn amdano yn bosibl.
https://www.extendoffice.com/documents/excel/2545-excel-set-paste-values-as-default.html
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Dean, mae'n ddefnyddiol iawn! Diolch!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Roedd yr ychwanegiad hwn yn help mawr! Diolch yn fawr am bostio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, a oes cod ar gyfer gweithio gyda ctrl+v. Mae'r cod hwn yn gludo'n awtomatig wrth ddewis cell. Deuthum o hyd i god modiwl o dan y ddolen ond ni allwn ddod o hyd i god ar gyfer llyfr gwaith fel hwn.
https://www.extendoffice.com/documents/excel/2545-excel-set-paste-values-as-default.html
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae'n drist nad oes neb yn ateb. Dwi angen y wybodaeth yma hefyd.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo! ar gyfer Kutools 'Copy Ranges', sylweddolais fod cyfyngiad ar nifer y colofnau y gellir eu copïo ar y tro. Rwy'n gweithio gyda 7,500 o golofnau. Rwy'n dewis 7,500 o golofnau fel yr ystod, ond dim ond rhan o'r hyn yr oeddwn wedi'i ddewis y gall ei gopïo a'i gludo, nid pob un. Rwy'n bwriadu copïo'r holl golofnau hyn mewn un tro. A oes unrhyw ffordd y gallaf wneud hynny? dim ond i gyflymu pethau. Byddai unrhyw gymorth yn cael ei werthfawrogi'n fawr. Diolch!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo,
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+Llusgo&Drop habe ich bereits per Makro ausgeschaltet. Ich habe jetzt im Netz folgenden Code gefunden, den ich in
"Diese Arbeitsmappe" geschrieben habe:

Is Gweithlyfr Preifat_TaflenSelectionChange(ByVal Sh Fel Gwrthrych, ByVal Target As Range)
Ar Ail-ddechrau Gwall Nesaf
Target.PasteSpecial xlPasteValues
Application.CutCopyMode = Gwir
Is-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 Problem dabei:

Wenn ich Werte aus einer Zelle kopiere, kann ich diese auch in geschützte
Zellen kopieren und das soll nicht sein. Yn 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
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, unrhyw gyfle i ychwanegu'r nodwedd hon mewn rhai dalennau yn unig?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, mae yna broblem yma, mae gwerthoedd yn cael eu gludo'n awtomatig pan fyddwch chi'n clicio ar y gell
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir