بعد اذن استاذى سليم هل هذا هو ما تقصده؟
بمجرد كتابة الرقم فى العمود c من صفحة Index
سوف يقوم بفتح صفحة جديدة بالرقم الذى كتبته
بارك الله فيك وجزاك الله خيرا
STORE-ITEM salim (3)2.xlsm
جزاك الله كل خير اخى الكريم الأستاذ محمد
هذا فيديو بالشرح :
وعليكم السلام اخى سليم دائما نصيحتك أستفاد منها كثيرا -جزاك الله كل خير
وهذا ما كان ينقص هذا الكود دائما تكمل لنا النقصان
بارك الله فيك وجعله دائما فى ميزان حسناتك وادخلك فسيح جناته
السلام عليكم أهل المنتدى الكرام
أقدم لكم اليوم ملف به كود يقوم بفتح صفحات جديدة بمجرد كتابة اسم الشيت فى العمود C من صفحة Main
تقبلوا منى بارك الله فيكم وجزيتم خيرا
اكسل vba فتح شيت جديد بمجرد ادخال الاسم فى الخلية.xlsm
أهلا ومرحبا بك اخى الكريم فى منتدانا الكبير
من الأفضل أن ترسل ملف وتشرح فيه ما تريد
ممكن تتبع هذا الفيديو فهو لحذف جميع محتويات الخلايا ماعدا المعادلات ,الإبقاء عليها
وهذا ملف أخر به كود يقوم بمسح محتويات صف بشرط كتابة رقم الإذن مثلا فى الخلية A1 فى صفحة Sheet 1
ثم الضغط على ابحث وامسح
وأيضا اتبع هذا الموقع
http://et3lmonline.com/2010/08/delete-and-clear-tools-ms-excel/
وهذا كود اخر
Private Sub Workbook_Open()
If Date >= CDate("15/05/2014") Then
Application.ScreenUpdating = False
Sheet1.Range("B1:I2880").ClearContents
With Sheet2.Range("C8:AA40")
.Value = .Value
End With
Me.Save
Application.ScreenUpdating = True
End If
End Sub
وهذا أخر
Sub sbClearCellsOnlyData()
Range("A1:C10").ClearContents
End Sub
وهذا كود أخير
Sub sbClearEntireSheet()
Sheets("SheetName").Cells.Clear
End Sub
بارك الله فيك وجزيت خيرا
كود حذف محتويات صف بشرط.xls
عودا حميدا أستاذى الكريم أبو عبدالله نورتنا غيبة طويلة
قمة الإبداع فى هذا الحل بارك الله فيك وجعلك دائما زخرا لنا ونصيرا للمحتاجين
جعله الله فى ميزان حسناتك وجزاك خيرا كثيرا
السلام عليكم اهل المنتدى الكرام
أقدم لكم اليوم شيت يقوم بترحيل الفواتير إلى شيت بإسم الشهر بناءاً على التاريخ الموجود فى صفحة Main
أتمنى من الله أن ينال اعجابكم
تقبل الله منكم سائر أعمالكم وبارك الله فيكم وجزيتم خيرا كثيراً
ترحيل الفواتير حسب اسم الشهر.xlsm