Ali Mohamed Ali

السلام عليكم أهل المنتدى الكرام أقدم لكم اليوم ملف به كود يقوم بفتح صفحات جديدة بمجرد كتابة اسم الشيت فى العمود 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

جرب ذلك قيمة الكابينة.xlsm

وعليكم السلام أخى ..تفضل المعادلة -وشيت به تطبيق المعادلة =IF(ISBLANK(B2),"",SUBTOTAL(3,B$2:B2)) تسلسل الصفوف وتجاهل الصفوف المختفية في التسلسل.xlsx

وممكن تجرب هذا بالمعادلات مقارنة بيانات.xlsm

اليك ملفان جربهما واختر منهم المناسب لك STOCK 2018 - Copy.xlsm STOCK 2018.xlsm

عودا حميدا أستاذى الكريم أبو عبدالله نورتنا غيبة طويلة قمة الإبداع فى هذا الحل بارك الله فيك وجعلك دائما زخرا لنا ونصيرا للمحتاجين جعله الله فى ميزان حسناتك وجزاك خيرا كثيرا

أخى بعد اذن الستاذ احمد من الأفضل أن ترسل الملف لكى يتسنى المساعدة من قبل الإخوة

ممكن تجرب هذا مرحلة إدخال البيانات.xlsm

جرب هذا هو من اعمال أسناذنا الكبير محمد الدسوقى له منا كل الحب والإحترام فورم بحث.xlsm

تفضل أخى فورم بحث.xlsm

تفضل أخى محمود تحويل من التاريخ الهجرى الى الميلادى.xlsx

تفضل أخى مطلوب ملف ترتيب عشوائي.xlsm

معدلات اكسل.xlsx

جرب هذا Subtotal.xlsm

تفضل أخى معدلات اكسل.xlsx

مطلوب ملف ترتيب عشوائي.xlsm تفضل أخى

ممكن ترسلى الملف من فضلك

تفضل أخى تحويل المعادلة الى كود(1).xlsm

السلام عليكم اهل المنتدى الكرام أقدم لكم اليوم شيت يقوم بترحيل الفواتير إلى شيت بإسم الشهر بناءاً على التاريخ الموجود فى صفحة Main أتمنى من الله أن ينال اعجابكم تقبل الله منكم سائر أعمالكم وبارك الله فيكم وجزيتم خيرا كثيراً ترحيل الفواتير حسب اسم الشهر.xlsm

أهلا وسهلا بك فى منتدانا الكريم تفضل أخى داله اذا كان كود العميل موجود فى عمود الناتج واحد واذا تواجد فى عمودين الناتج اثنان وهكذا.xlsx

من البداية تذهبى الى ملفات الورد ثم تقومى بتحديد الجداول التى تريدى نسخها ونقلها الى الإكسيل ثم عمل ضغطة يمين من الماوس ثم تختارى نسخ copy ثم بعد ذلك تذهبى الى ملف الإكسيل الذى أرسلته اليك وبداية من الخلية A1 تقومى بعمل ضغطة يمين بالماوس ثم تختارى لصق Paste أتمنى أن يكون ذلك واضح لكى بارك الله فيك وجزاك خيرا

بارك الله فيك أستاذ سليم وجزاك الله خيرا وجعله فى ميزان حسناتك فعلا كود فى غاية الفن والإتقان والسرعة وايضا جلب الأرقام بدون تكرار ابداع ودائما الى الأمام والتفوق -وجعلك الله زخرا لمن يحتاج المساعدة منك أخى الكريم وفقك الله لما يحب ويرضى

شكرا لأستاذنا ابو عيد ولإثراء الموضوع تحويل المعادلة الى كود.xlsm