اريد كود بحيث لو تم النسخ واللصق لا يمسح تنسيق الملف
السلام عليكم
لدي جدول ما هل هناك اكواد تمنع عند النسخ واللصق لا يتغير شكل التنسيق
حيث ان المفترض ان يكون اللصق كقيم فقط وليس ككل ، ولكن احيانا يتم نسيان ذلك وعمل ككل فبالتالي يتغير شكل التنسيق للملف
وكما اشرت اعلاه ، اريد عند نسخ اي شي ولصقه في المسار الذي اريده واحدده ان يكون قيم فقط
انتبه من فضلك ..فقد تـــم اعادة رفع الملف بإمتداد يقبل الأكواد Xlsm , طالما ان طلبك لا يمكن تنفيذه الا بالأكواد
Rs.xlsm
أقترح تنفيذ ذلك يدويا وليس بالكود
عن طريق عمل لصق كقيم paste as values بدلا من لصق paste
ورمزها (123) في القائمة المختصرة للخلية والتي تظهر بعد عمل كلك يمين عليها
وإذا كنت حريصا على استخدام الكود فيمكنك وضع هذا الاجراء في موديول جديد وربطه بزر وليكن اسمه لصق
Sub pst
Selection.PasteSpecial Paste:=xlPasteValues
End Sub
وهو للصق ما تم نسخه في الخلية المحددة
ولاستخدام هذا الاجراء عند الضغط على CTRL+V يمكن وضع هذا الكود في حدث المصنف ThisWorkbook
Private Sub Workbo
