محمود_الشريف قام بنشر يناير 23, 2014 قام بنشر يناير 23, 2014 الساده / أعضاء المنتدى المحترمين السلام عليكم ورحمه الله وبركاته اليكم كود جميل لعمل نسخة فقط من الشيت المفعل ويحتفظ بالكود داخل الشيت الجديد وكل ما تحاول تفعل اى خلية بالشيت الجديد يقوم بعمل نسخة منه وهكذا من الممكن التحكم فيه لعمل نسخة واحده فقط اليكم الكود Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim wbTemp As Workbook ActiveSheet.Copy Set wbTemp = ActiveWorkbook ActiveSheet.Cells.Copy ActiveSheet.Range("a1").Select Selection.PasteSpecial Paste:=xlValues wbTemp.SaveAs ThisWorkbook.Path & "\" & "اسم الملف.xlsx", 51 wbTemp.Close Set wbTemp = Nothing End Sub
؛ أحمد النجار ؛ قام بنشر يناير 23, 2014 قام بنشر يناير 23, 2014 شكرا على الموضوع الرائع جزاك الله خيرا
محمود_الشريف قام بنشر يناير 23, 2014 الكاتب قام بنشر يناير 23, 2014 أخى فى الله الأستاذ الكبير / أحمد النجار بارك الله فيكم وجزاكم رب العالمين عنا خير الجزاء وتقبلوا منى وافر الإحترام والتقدير
محمد ابو البـراء قام بنشر يناير 23, 2014 قام بنشر يناير 23, 2014 جزاكم الله خيراً أخي الحبيب محمود الشريف على موضعاتك المميزة
محمود_الشريف قام بنشر يناير 23, 2014 الكاتب قام بنشر يناير 23, 2014 جزاكم الله خيراً أخي الحبيب محمود الشريف على موضعاتك المميزة أخى فى الله الأستاذ الكريم والحبيب/ محمد ابو البراء بارك الله فيكم وجزاكم رب العالمين عنا خير الجزاء وتقبلوا منى وافر الإحترام والتقدير
محمود_الشريف قام بنشر يناير 23, 2014 الكاتب قام بنشر يناير 23, 2014 اخي محمود جزاك الله خيرا أخى فى الله الأستاذ القدير والحبيب / أبو حنين بارك الله فيكم وجزاكم رب العالمين عنا خير الجزاء وتقبلوا منى وافر الإحترام والتقدير
محمود_الشريف قام بنشر يناير 24, 2014 الكاتب قام بنشر يناير 24, 2014 بارك الله فيك و جزاك الله خيرا أخى فى الله الأستاذ الكريم / زيزو بارك الله فيكم وتقبلوا منى وافر الإحترام والتقدير
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.