Sửa Code Paste Value Chỉ áp dụng File đang có Code

[Hết Xăng rồi]

Chào Tất cá Mọi người !. Em có tham khảo code chỉ Paste Value khi Ctrl + V ( Của diễn đàn ), Code chạy rất Ok, Nhưng Khi em mở 1 file Excel khác lên ( Tức là File không có Code này ) Em vẫn muốn Là Ctrl V như Bình thường ( Tức là lấy luôn định dạng màu sắc ). Vậy phải sửa lại code như thế nào để code chỉ áp dụng File đang có code, Các file khác khi mở lên không bị ảnh hưởng. em xin cảm ơn

Sub Auto_Open()
    With Application
        .OnKey "^v", "PasteValue"
        .CommandBars.FindControl(ID:=6002).Enabled = False
        .CommandBars("Cell").Controls("Paste").OnAction = "PasteValue"
        .CommandBars("Edit").Controls("Paste").OnAction = "PasteValue"
    End With
End Sub
Sub PasteValue()
    Selection.PasteSpecial 3
End Sub
Sub Auto_Close()
    With Application
        .OnKey "^v"
        .CommandBars("Standard").Reset
        .CommandBars("Cell").Reset
        .CommandBars("Edit").Reset
    End With
End Sub

 

[cantl]

Bạn quá chú tâm về "yên hùng", "siêu nhơn" cho nên quên mất trên chiến trường có dạng người chả hùng cũng chả siêu.

Tôi muốn nói đến hạng "chiến lược gia". Hạng này chỉ chú tâm vào kết quả. Hành động, phong cách là thứ yếu.
Thớt cứ khăng khăng hỏi "mục đích của diễn đàn?". Nếu nghĩ mục đích của diễn đàn là giúp nhau về công nghệ, mục đích của mình là nhờ giúp về công nghệ thì cứ lo bắt cầu cho hai cái mục đích ấy gặp nhau. Mắc chi lo vớ vẩn cãi nhau khiến cuối cùng mục đích trật tét lét tè le.

Giải pháp chưa có là do người ta chưa hiểu vấn đề của mình. Người ta chưa hiểu là do kỹ năng diễn tả cái mình đang có, các điều kiện khách quan, và mục đích/kết quả cuối cần đạt của mình còn kém. Lo mà trau dòi nó, ở đấy mà nuôi cái cục tự ái tổ bố. Học hỏi cái mốc xì.

Em có ý thế này. Đối với bác thì giải quyết vấn đề cái một, nhưng đối với những người không biết thì trần tục họ chỉ muốn được giải đáp. Bác là thành viên lâu năm, thường xuyên tham gia diễn đàn, câu nói của bác sẽ bình thường như nói chuyện với các thành viên đã quen, còn đối với những người ít tham gia như em hoặc mới tham gia thì câu nói của bác gây tự ái lắm chứ. Cha mẹ sinh con, trời sinh tự ái mà.
Vì câu nói của mỗi người sẽ không vừa ý lẫn nhau, như chủ quan em hiểu là bác đang nói chuyện với những thành viên lâu năm, còn bọn em thì đang hỏi về vấn đề khúc mắc. Do đó, đôi khi những câu nói lại hướng suy nghĩ ra khỏi vấn đề chính.
Còn cái vụ siêu nhân, anh hùng em chỉ muốn nói cho vui thay đổi không khí thôi, nhưng có bạn befaint mỉa mai quá nên em lôi phim ra diễn đạt tí. Em với bác và em với befaint đã từng mâu thuẫn trên diễn đàn nên em thù dai lắm.
Đôi lời trao đổi thẳng thắn với bác vậy thôi vì tính em nó cứng nhắc và bảo thủ. Hy vọng sẽ có dịp được bác giúp đỡ giải quyết vấn đề và cả bạn befaint nữa nhé.

Bài đã được tự động gộp: 14/11/22

Cái _open không có tội. Cái bên trong mới có tội: Đánh tới tận cùng application thì đẻ đứa nào dính chấu cái nấy thôi.

Vâng bác ạ. Em không rành về VBA nên bác chỉ em cũng không hiểu được. Bài này em thấy liên quan vấn đề mình đã từng gặp nên theo để xem cách xử lý, chứ mục đích đặt ra ban đầu thì với riêng em sẽ không hoặc chưa dùng đến.