اعلن هنا
أكاديمية الصقر للتدريب
أعلن هنا
أعلن هنا
صفحتنا على الفيس بوك
أعلن هنا


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


الرئيسية
نتائج البحث


نتائج البحث عن ردود العضو :محمد الدسوقى
عدد النتائج (188) نتيجة
22-09-2018 11:37 مساء
icon ترحيل صفوف معينة بشرط | الكاتب :محمد الدسوقى |المنتدى: اكسيل اسئله واجابات
 
أخى الحبيب / ابو البراء
أستاذى الكريم / إســـــــــــــــــلام

لكم منى كل الاحترام والتقدير
فكل ما أقدمه فى هذا المنتدى العريق إنما هو من ثمار بستان علمكم
أسأل الله العظيم أن يديم عليكم هذا البستان علما نافعا 142
22-09-2018 10:00 مساء
icon ترحيل صفوف معينة بشرط | الكاتب :محمد الدسوقى |المنتدى: اكسيل اسئله واجابات
 
أخى الكريم
لظهور رسالة تحذيرية قبل عملية حذف الصفوف
استبدل كود الحذف الموجود فى المشاركة السابقة بالكود التالى
Sub M_D_DeleteRows()
Dim LR As Long, i As Long
Dim Ws As Worksheet
Set Ws = Sheets("Data")
LR = Ws.Range("D" & Rows.Count).End(xlUp).Row
'-----------------------------------------
Application.ScreenUpdating = False
Ws.Unprotect Password:="123"
M = MsgBox(" سيتم حذف الصفوف " & Chr(10) & "هل بالتأكيد تريد إتمام عملية الحذف ؟؟", vbYesNo, " أكاديمية الصقر للتدريب ")
If M = vbNo Then Exit Sub

If M = vbYes Then

For i = LR To 5 Step -1
If Ws.Cells(i, 13).Value = "خالص" Then
Ws.Cells(i, 13).EntireRow.Delete
End If
Next
End If
'-----------------------------------------
Ws.Protect Password:="123"
Application.ScreenUpdating = True
End Sub

 
22-09-2018 11:13 صباحا
icon ترحيل صفوف معينة بشرط | الكاتب :محمد الدسوقى |المنتدى: اكسيل اسئله واجابات
 
الأستاذ /  takydeen
1ـ بالنسبة لرسالة الخطأ التى ظهرت ............> تم التعديل لتفاديها
2ـ الكود يعمل بأى عدد من الصفوف 5000 أو 10000 كما تشاء
إذا زاد عدد الأعمدة ...
يمكن التغيير فى نطاق الأعمدة بالمصفوفة فى الجزئية التالية :
Arr = Sh.Range("A6:N" & LR).Value

حيث (N) آخر عمود فى النطاق المراد الترحيل منه
وأيضا سيتم إضافة الأعمدة التى سيتم ترحيلها ضمن المصفوفة التالية :
Arr1 = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14)

حيث أن هذه الأرقام تعبر عن أرقام الأعمدة فى المصفوفة ابتداء من العمود ( A) يعنى أن العمود ( A) = الرقم ( 1 ) وهكذا
--------------------------
أرجو أن يكون هو المطلوب 
وإليك الملف بعد التعديل لرسالة الخطأ
---------------------------------

لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
--------------------------------- 
22-09-2018 03:00 صباحا
icon ترحيل صفوف معينة بشرط | الكاتب :محمد الدسوقى |المنتدى: اكسيل اسئله واجابات
 
بارك الله فيك أخى / على
دائما رائع وحلول سريعة
--------------------------
وبعد إذنك اثراء للموضوع الذى سبقتنى بالحل كالعادة

 حل آخر للترحيل بالمصفوفات إلى ملف مغلق
تم إنشاء مجلد باسم ( M_D) يحتوى على الصفحة الرئيسية المصدر ( Main) التى يتم الترحيل منها
وأيضا صفحة الهدف المراد الترحيل إليها وهى (Archive )
وسيتم الترحيل و وورقة الهدف مغلقة
ــ تم حماية ورقة العمل ـ كلمة المرور  123
ـ الترحيل للبيانات التى تحتوى على كلمة ( خالص ) فقط
ـ حذف الصفوف التى تحتوى على كلمة ( خالص ) فقط

-----------------------------------------

لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
-----------------------------------------
تقبلوا تحياتى 
 
21-09-2018 01:59 مساء
icon برنامج نتائح الطلاب وطباعة الشهادة -تصميم اخوكم محمد الحوفي | الكاتب :محمد الدسوقى |المنتدى: اكسيل مشاريع جاهزه
 
بارك الله فيك أخى الكريم
وجزاكم الله خيرا على هذا المجهود
18-09-2018 09:55 مساء
icon إنشاء قوائم مخصصة داخل الاكسيل | الكاتب :محمد الدسوقى |المنتدى: اكسيل شروحات ودروس
 
أشكرك أستاذى الجليل / حسام
على تشجعيك الدائم ومرورك العطر على الموضوع
-----------------------------
بارك الله فيك  استاذ هانى
وجزاكم خيرا ومشكور مروركم العطر على الموضوع
18-09-2018 02:14 صباحا
icon إنشاء قوائم مخصصة داخل الاكسيل | الكاتب :محمد الدسوقى |المنتدى: اكسيل شروحات ودروس
 
أساتذتى الكرام
المبدع / إسلام عبدالله ـ
العلامة / ياسر خليل ـ
المبدع / على محمد
مشكور مروركم العطر على الموضوع
وبارك الله فيكم جميعا وزادكم فضلا وعلما
15-09-2018 11:31 مساء
icon جلب اسماء الملفات داخل فولدر بارتباط تشعبى | الكاتب :محمد الدسوقى |المنتدى: اكسيل شروحات ودروس
 
قمة الابداع أستاذى الجليل / إسلام
تقبل وافر احترامى وتقديرى
123
14-09-2018 02:16 مساء
icon سلاسل رقمية | الكاتب :محمد الدسوقى |المنتدى: اكسيل اسئله واجابات
 
أخى الحبيب / ابو البراء
كان الغرض من بدء التسلسل برقم غير 1  هو تطويع الكود لاستخدامه فى أرقام الجلوس لكل صف 
بحيث كل صف يبدأ بمسلسل معين وينتهى عند عدد طلاب هذا الصف وهكذا
14-09-2018 01:40 مساء
icon سلاسل رقمية | الكاتب :محمد الدسوقى |المنتدى: اكسيل اسئله واجابات
 
بارك الله فيك أخى الحبيب / على
فعلا تم المطلوب
جزاك الله خيرا
14-09-2018 01:04 صباحا
icon سلاسل رقمية | الكاتب :محمد الدسوقى |المنتدى: اكسيل اسئله واجابات
 
بارك الله فيك أخى الحبيب أبو البراء
و نحمد الله تعالى بوجود أستاذنا الكبير / سليم 
فعلا إضافة عظيمة للمنتدى
----------------------
نسأل الله العظيم أن يديم عليكم نعمة العلم النافع ويزيدكم علما
---------------------------------------


ملحوظة : لو حبيت أغير بداية كل سلسلة رقمية غير رقم 1  لاحظت أنه  يترك عدد أسطر فارغة تحتها بقيمة البداية التى اخترتها ثم يكمل
مثلا : عنتد اختيار بداية السلسلة برقم 10 فيتم الترقيم تمام بالسلسلة الأولى ،  وبعدها يترك 10 أسطر فارغة قبل البدء بالسلسلة الثانية وهكذا 
ـ فلماذا ؟؟؟؟ وهل يمكن تلافى ذلك ليكون التلسلسل  لباقى السلاسل الرقمية تحت بعضها مباشرة ؟؟؟؟
12-09-2018 05:21 مساء
icon اريد البحث في اكثر من شيت | الكاتب :محمد الدسوقى |المنتدى: اكسيل اسئله واجابات
 
بارك الله فيك أخى الحبيب / أبو البراء
كده اشتغل الكود تمام
الله ينور عليك  113

الصفحة 1 من 16 < 1 2 3 4 16 > الأخيرة »





الساعة الآن 08:51 مساء

أعلن هنا
أعلن هنا
أعلن هنا