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

Làm thế nào để đặt giá trị dán làm dán mặc định khi sử dụng Ctrl + V trong Excel?

Thông thường, trong Excel, khi bạn sao chép dữ liệu từ một dải ô hoặc trang tính và dán bằng Ctrl + V sang một dải ô khác, định dạng cũng sẽ được dán theo mặc định. Tuy nhiên, đôi khi, bạn chỉ muốn dán dưới dạng giá trị mà không cần bất kỳ định dạng nào khi bạn dán dữ liệu. Ở đây, tôi có thể giới thiệu cho bạn một phương pháp dễ dàng để đặt các giá trị dán chỉ làm dán mặc định khi bạn sử dụng Ctrl + V trong Excel.

Đặt giá trị dán làm dán mặc định khi sử dụng Ctrl + V với mã VBA


Đặt giá trị dán làm dán mặc định khi sử dụng Ctrl + V với mã VBA

Khi chỉ dán dữ liệu dưới dạng giá trị, bạn cần nhấp vào hình vuông nhỏ ở góc lựa chọn của mình và chọn tùy chọn Giá trị mỗi lần sau khi dán dữ liệu. Mã VBA sau có thể giúp bạn thay đổi dán mặc định thành dán các giá trị.

1. Giữ ALT + F11 phím để mở Cửa sổ Microsoft Visual Basic for Applications.

2. Nhấp chuột Chèn > Mô-đunvà dán mã sau vào Mô-đun Cửa sổ.

Mã VBA: Đặt giá trị dán làm dán mặc định khi sử dụng Ctrl + V

Sub PasteasValue()
Selection.PasteSpecial Paste:=xlPasteValues
End Sub

3. Sau đó, lưu và đóng mã, và nhấn Alt + F8 phím để mở Macro hộp thoại.

4. Trong Macro hộp thoại, chọn tên macro đã sử dụng PasteasValue và sau đó nhấp vào Các lựa chọn nút, xem ảnh chụp màn hình:

doc-dán-giá trị-mặc định-1

5. Sau đó, trong Tùy chọn Macro hộp thoại, bên dưới Phím tắt phần, vui lòng nhập v , xem ảnh chụp màn hình:

doc-dán-giá trị-mặc định-2

6. Và sau đó nhấp vào OK để đóng Tùy chọn Macro hộp thoại và tiếp tục đóng Macro thoại.

Và bây giờ, khi bạn dán dữ liệu với Ctrl + V, dữ liệu sẽ được dán dưới dạng giá trị theo mặc định.


Bài viết liên quan:

Làm cách nào để dán nội dung bên ngoài vào Excel luôn khớp với định dạng đích?


Demo: Đặt giá trị dán làm dán mặc định khi sử dụng Ctrl + V trong Excel

Kutools cho Excel: với hơn 300 bổ trợ Excel tiện dụng, dùng thử miễn phí không giới hạn trong 30 ngày. Tải xuống và dùng thử miễn phí ngay!

Các công cụ năng suất văn phòng tốt nhất

Kutools cho Excel giải quyết hầu hết các vấn đề của bạn và tăng 80% năng suất của bạn

  • Tái sử dụng: Chèn nhanh công thức phức tạp, biểu đồ và bất cứ thứ gì bạn đã sử dụng trước đây; Mã hóa ô với mật khẩu; Tạo danh sách gửi thư và gửi email ...
  • Thanh siêu công thức (dễ dàng chỉnh sửa nhiều dòng văn bản và công thức); Bố cục đọc (dễ dàng đọc và chỉnh sửa số lượng ô lớn); Dán vào Dải ô đã Lọchữu ích. Cảm ơn !
  • Hợp nhất các ô / hàng / cột mà không làm mất dữ liệu; Nội dung phân chia ô; Kết hợp các hàng / cột trùng lặp... Ngăn chặn các ô trùng lặp; So sánh các dãyhữu ích. Cảm ơn !
  • Chọn trùng lặp hoặc duy nhất Hàng; Chọn hàng trống (tất cả các ô đều trống); Tìm siêu và Tìm mờ trong Nhiều Sổ làm việc; Chọn ngẫu nhiên ...
  • Bản sao chính xác Nhiều ô mà không thay đổi tham chiếu công thức; Tự động tạo tài liệu tham khảo sang Nhiều Trang tính; Chèn Bullets, Hộp kiểm và hơn thế nữa ...
  • Trích xuất văn bản, Thêm Văn bản, Xóa theo Vị trí, Xóa không gian; Tạo và In Tổng số phân trang; Chuyển đổi giữa nội dung ô và nhận xéthữu ích. Cảm ơn !
  • Siêu lọc (lưu và áp dụng các lược đồ lọc cho các trang tính khác); Sắp xếp nâng cao theo tháng / tuần / ngày, tần suất và hơn thế nữa; Bộ lọc đặc biệt bằng cách in đậm, in nghiêng ...
  • Kết hợp Workbook và WorkSheets; Hợp nhất các bảng dựa trên các cột chính; Chia dữ liệu thành nhiều trang tính; Chuyển đổi hàng loạt xls, xlsx và PDFhữu ích. Cảm ơn !
  • Hơn 300 tính năng mạnh mẽ. Hỗ trợ Office / Excel 2007-2021 và 365. Hỗ trợ tất cả các ngôn ngữ. Dễ dàng triển khai trong doanh nghiệp hoặc tổ chức của bạn. Đầy đủ tính năng Dùng thử miễn phí 30 ngày. Bảo đảm hoàn lại tiền trong 60 ngày.
tab kte 201905

Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều

  • Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
  • Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
  • Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!
officetab dưới cùng
Nhận xét (24)
Chưa có xếp hạng. Hãy là người đầu tiên xếp hạng!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn bạn rất nhiều: D đã giúp đỡ rất nhiều!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Giải pháp rất hay. Điều này đã làm tôi khó chịu trong một thời gian. Hai nhận xét ... 1) Không có gì ngạc nhiên khi một số môi trường làm việc hạn chế hoặc cấm sử dụng (và đặc biệt hơn là gửi / nhận email) các tài liệu hỗ trợ macro. Có giải pháp thay thế không phải macro không? 2) Ctrl + Z .... "Hoàn tác" sẽ không đảo ngược "dán" được thực hiện bằng macro này. Có giải pháp thay thế hoặc mã bổ sung nào cho phép / bật / tạo "hoàn tác" cho các miếng dán được thực hiện bằng macro không? Cảm ơn rất nhiều.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Mã này không hoạt động với phiên bản mới nhất của Excel 2016. Việc chạy tập lệnh sẽ đưa ra mã lỗi cho dòng Dán: = xlPasteValues
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tôi vừa gặp phải vấn đề tương tự.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Hãy thử sử dụng mã này với Excel 2016: Sub Paste_Special () Selection.PasteSpecial Paste: = xlPasteValues, Operation: = xlNone, SkipBlanks _: = False, Transpose: = False Application.CutCopyMode = False End Sub
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn Mikael, nhưng mã của bạn không hoạt động. Microsoft hẳn đã thay đổi ngôn ngữ mã hóa VBA quá nhiều trong bản cập nhật cuối cùng của họ. Ngay cả văn bản "Paste: =" cũng dẫn đến lỗi biên dịch. Nếu có câu trả lời ở đó, nó phải nằm trong một thế hệ Excel VBA khác.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Macro tôi đã gửi được ghi lại trong phiên bản mới nhất của MS Excel 2016, vì vậy có thể vấn đề nằm trong cài đặt của bạn? Bên cạnh đó, phụ tôi đã viết sẽ không hoạt động nếu không có phần "Selection.PasteSpecial".
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Giải pháp tuyệt vời
mã này phải được viết trực tiếp vào hộp lệnh VBA không phải trong hộp mô-đun và tôi đã chọn vị trí của nó trong sổ làm việc để bạn đảm bảo KẾT THÚC mọi phụ được mở và bỏ qua bất kỳ thông báo nào bật lên
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào, giải pháp hoạt động tốt nhưng control + z không hoạt động sau khi dán :(. Có thêm trợ giúp nào không?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Giải pháp từ Mikael dường như sao chép tốt giải pháp năm 2013 do trang này cung cấp theo cách thân thiện với Excel 2016. Thật không may, nó cũng tái tạo khả năng không thể hoàn tác (thông qua Ctrl-Z hoặc các hành động "hoàn tác" khác) một hành động dán trong khi macro này được bật.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Rất tiếc, để chức năng hoàn tác hoạt động sau khi bạn đã sử dụng macro là khá khó khăn. Không thể giúp bạn với điều đó, xin lỗi.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
mẹo hay, nhưng macro sẽ trông giống như thế này, vì đoạn mã trên cung cấp cho bạn một câu lệnh lỗi, nếu bạn nhấn ctrl + v và trước đó bạn không chọn thứ gì đó bằng ctrl + c Sub PasteAsValues ​​() On Error GoTo err_handler: Selection. PasteSpecial Paste: = xlPasteValues ​​Thoát Sub err_handler: End Sub
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn ngài...
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Trừ khi tôi bỏ lỡ điều gì đó (và hướng dẫn * rất * tốt), điều này không hoạt động trong Excel 2016.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tôi sử dụng Microsoft office Standard 2016, nó hoạt động.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tôi đồng ý Graham, vừa thử điều này trong Excel 2016. Khi tôi nhấp vào nút Chạy trong hộp thoại Macro, tôi nhận được thông báo lỗi:

Lỗi Run-tme '1004':
Phương thức PasteSpecial của lớp Range không thành công

đó là một điều đáng tiếc vì điều này thực sự sẽ giúp tôi ngày hôm nay. Tôi cũng đã thử macro của Dejvid bên dưới, nhưng không có gì xảy ra khi dán từ cuốn sách này sang cuốn sách khác.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Đảm bảo rằng bạn đã chọn thứ gì đó ở chế độ sao chép. thậm chí không buồn nhập mã của anh ấy
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Nó đang hoạt động nhưng sau khi dán bạn không thể hoàn tác
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tương tự ở đây.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào, các bạn,
Tôi xin lỗi, có thể không có cách nào khác tốt để giải quyết vấn đề này, nếu bạn có bất kỳ ý tưởng hay nào khác, vui lòng bình luận tại đây.
Cảm ơn bạn!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Lưu dưới dạng .xlsb nhị phân,
Sau đó, bạn có thể sử dụng ctrl + z với macro.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
ý bạn là gì "lưu dưới dạng nhị phân. xlsb"?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tôi muốn tìm hiểu xem có cách nào để làm việc trong một trang tính, không phải trong một mô-đun.

Nếu không, có cách nào để làm việc trong trang tính cụ thể mà tôi xác định không?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Mô-đun đã lưu - được gọi là "mô-đun 2" nhưng không có gì hiển thị trong macro - không có 'PasteasValue'. Có vẻ như thiếu một bước?
Không có bình luận nào được đăng ở đây
Để lại ý kiến ​​của bạn
Đăng với tư cách khách
×
Đánh giá bài viết này:
0   Nhân vật
Các vị trí được đề xuất

Kết nối với chúng tôi

Bản quyền © 2009 - www.extendoffice.com. | Đã đăng ký Bản quyền. cung cấp bởi ExtendOffice. | BẢN ĐỒ CHI NHÁNH
Microsoft và logo Office là các nhãn hiệu hoặc nhãn hiệu đã đăng ký của Microsoft Corporation tại Hoa Kỳ và / hoặc các quốc gia khác.
Được bảo vệ bởi Sectigo SSL