أكاديمية الصقر للتدريب

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




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

Preview

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


نتائج البحث عن ردود العضو :ashraf_hertlion
عدد النتائج (188) نتيجة
16-09-2021 09:32 صباحا
icon تجميع العمود بعد آخر صف | الكاتب :ashraf_hertlion |المنتدى: اكسيل اسئله واجابات
 الف مليون شكر يا استاذى العزيز / ياسر خليل
هذا هو المطلوب وأشكرك على سعة صدرك وكريم اخلاقك وجعلة الله فى ميزان حسناتك الى يوم القيامة
دمت لنا ولهذا الصرح الكبير وجزاك الله خيرا
15-09-2021 11:56 مساء
icon تجميع العمود بعد آخر صف | الكاتب :ashraf_hertlion |المنتدى: اكسيل اسئله واجابات
 استاذى العزيز / ياسر خليل
انا فاهم وأعى كل قوانين المنتدى ومقدر العبئ الكبير الذى تتحملة على عاتق حضرتك وكل الأساتذه والزملاء الأفاضل , لكن سبب عرضى وتكرار الموضوع مرة آخرى هو عدم تمكنى بالرد على حضرتك بعدما تفضلت حضرتك فى ثانى مشاركة لك وطرحت الكود بتاع حضرتك وعن التجربة كما نصحت تبين أنه قد اغلق الموضوع وهذا للإيضاح
لكن فعلاً انا محتاج كود يكون متغير وليس ضمن نطاق محدد وسبب الإلحاح المتكرر لطلبى هذا هو احتياجى الشديد فى مجال عملى ..
وشاكر جداً لحضرتك على كل ما تقدمه لنا من مساعدات وربنا يجعله فى ميزان حسناتك الى يوم القيامة 
15-09-2021 09:10 مساء
icon تابع مشكلة موضوع تجميع العمود بعد آخر صف | الكاتب :ashraf_hertlion |المنتدى: اكسيل اسئله واجابات
 استاذى العزيز / ياسر خليل
من باب من لا يشكر الناس لا يشكر الله و انا اشكر حضرتك كتير لسرعة الرد وحسن الاستجابة واناشد سعة صدر حضرتك فيما يلى ...
فى الموضع ذاته اللى حضرتك تفضلت وكتبت كود ولا اروع من كده بس لما قمت بتجربته ظهرت لى بعض المشاكل منها
1- اريد أن اعرف أين اضع هذا الكود لكى يعمل تلقائى بعد آخر صف يتم ترحيله قبل الطباعة ولا اقوم بتفعيله كل مرة اريد الطباعه فيها .
2- عند التجربة ظهرت لى حالتان ومرفق لحضرتك صورتين لهاتين الحالتين .
3- حضرتك مقيد الكود بمدى معين يعنى بعد ادخال 6 صوف ويتم التجميع وفى حالة أكثر من ذلك لا يأخذ باقى الصفوف ضمن التجميع وأيضا فى حالة اقل من 6 صفوف يتم التجميع داخل معادلة التجميع ضمن المدى المحدد للكود من قبل وانا اريده ان لا يكون مقيد ومحدد بمدى معين ولكن اريده ان يكون المدى مطاطى على حسب عدد الصفوف سواء كانت كثيرة او كانت قليله .
برجاء من حضرتك النظر فى هذه الحالات وحلها وشكراً لحضرتك مقدما ... تقبل تحياتى
15-09-2021 09:41 مساء
icon تابع مشكلة موضوع تجميع العمود بعد آخر صف | الكاتب :ashraf_hertlion |المنتدى: اكسيل اسئله واجابات
 استاذى المحترم/ ياسر خليل
سيادتك مقيد الكود بمدى معين  ws.Range("H" & lr).Resize(, 2).Formula = "=SUM(H6:H11)" يعنى بعد ادخال 6 صوف ويتم التجميع وفى حالة أكثر من ذلك لا يأخذ باقى الصفوف ضمن التجميع وأيضا فى حالة اقل من 6 صفوف يتم التجميع داخل معادلة التجميع ضمن المدى المحدد للكود من قبل وانا اريده ان لا يكون مقيد ومحدد بمدى معين ولكن اريده ان يكون المدى مطاطى على حسب عدد الصفوف سواء كانت كثيرة او كانت قليله .
كود الترحيل الموجود بزر الحفظ هو
ممنوع تكرار نفس المشاركات والا ستحذف جميع المشاركات
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Sheets("items_out").Activate
If TextBox1.Value <> "" And TextBox2.Value <> "" Then
lrow = WorksheetFunction.CountIf(Range("b6:b1000"), TextBox1.Value)
If lrow >= 1 Then
MsgBox ("عفواً هذا الكود تم إدخاله مسبقاً")
TextBox1.Value = ""
TextBox2.Value = ""
TextBox6.Value = ""
TextBox7.Value = ""
TextBox8.Value = ""
TextBox34.Value = ""
TextBox20.Value = ""
TextBox21.Value = ""
TextBox30.Value = ""
TextBox31.Value = ""
TextBox32.Value = ""
TextBox25.Value = ""
TextBox37.Value = ""
TextBox38.Value = ""
Else
lrow = Range("a" & Rows.Count).End(xlUp).Row
Range("A" & lrow + 1).Value = "=ROW()-5"
Range("b" & lrow + 1).Offset(0, 0).Value = TextBox1.Value
Range("b" & lrow + 1).Offset(0, 1).Value = TextBox8.Value
Range("b" & lrow + 1).Offset(0, 6).Value = TextBox2.Value
Range("b" & lrow + 1).Offset(0, 4).Value = TextBox37.Value
Range("b" & lrow + 1).Offset(0, 5).Value = TextBox30.Value
Range("b" & lrow + 1).Offset(0, 7).Value = TextBox38.Value
Range("b" & lrow + 1).Offset(0, 8).Value = TextBox6.Value
Range("b" & lrow + 1).Offset(0, 2).Value = Format(TextBox7.Value, "yyyy/mm/dd")
Range("b" & lrow + 1).Offset(0, 3).Value = TextBox40.Value
Range("c4").Value = Format(TextBox7.Value, "yyyy/mm/dd  ddd")
Range("J4").Value = TextBox40.Value
TextBox1.Value = ""
TextBox2.Value = ""
TextBox6.Value = ""
TextBox8.Value = ""
TextBox34.Value = ""
TextBox30.Value = ""
TextBox31.Value = ""
TextBox32.Value = ""
TextBox37.Value = ""
TextBox38.Value = ""
End If
Else
MsgBox ("عفواً البيانات غير موجوده برجاء كتابة البيانات")
End If
 Application.ScreenUpdating = True
TextBox1.SetFocus
End Sub


كود حضرتك لحل المشكلة هو
Sub Sum_Colom()
    Dim ws As Worksheet, lr As Long
    Set ws = ThisWorkbook.Worksheets("items_out")
    lr = ws.Cells(Rows.Count, 1).End(xlUp).Row + 1
    With ws.Range("A" & lr).Resize(1, 10)
        .Interior.Color = vbYellow
        .Borders.Value = 1
    End With
    ws.Range("C" & lr).Value = "الإجمالي"
    ws.Range("H" & lr).Resize(, 2).Formula = "=SUM(H6:H11)"
End Sub
 
15-09-2021 11:54 صباحا
icon تجميع العمود بعد آخر صف | الكاتب :ashraf_hertlion |المنتدى: اكسيل اسئله واجابات
 استاذنا الكبير / ياسر خليل
انا مقدر قيمة الوقت الذى تستقطعه من وقتك الثمين للرد على  مطالبنا وحل مشاكلنا ربنا ان شاء الله يجعله فى ميزان حسناتك الى يوم القيامة
مرفق مع الرد على الموضوع جزء من الملف الذى اعمل علية وصورة توضح الإجماليات المطلوب تنفيذها على العمودين I & H عند الطباعة بعد الترحيل من الفورم الى الشيت المسمى ( items_out ) انا اريد التجميع فقط على الشيت بعد ترحيل آخر صف كما هو موضح فى الصورة وليس التجميع على الفورم .
لك منى كل التحية والإحترام
08-09-2021 01:23 صباحا
icon اختيار عمود معين | الكاتب :ashraf_hertlion |المنتدى: اكسيل اسئله واجابات
 الف مليون شكر ياكبير وربنا لا يحرمنا من تكاتك وحركاتك وأكوادك الجميله وربنا يجعله فى ميزان حسناتك الى يوم القيامة
والف شكر مرة آخرى على اهتمامك وردوك السريعة ... دمت لنا استاذاً وفخراً لكل من ينتسب الى هذا الصرح الكبير
تقبل تحياتى   123
21-08-2021 10:11 مساء
icon مدى مطاطى لجداول البويفت تيبل | الكاتب :ashraf_hertlion |المنتدى: اكسيل اسئله واجابات
 الف مليون شكر يا استاذنا يا كبير تم مشاهدة الفيديو الموجود بالرابط اللى حضرتك نصحتنى به وتم التعديل عل الجدول الخاص بى وتم حل المشكلة بفضل الله ثم بفضل حضرتك ... جعلك الله دائماً عوناً وسنداً لكل من يمد يده لطلب العون والمساعده جعل الله هذا العمل في ميزان حسناتك الى يوم القيامه , تقبل تحياتى واحترام لشحض حضرتكم الكريم نتمتى لهذا المنتدى الكبير مزيد من النجاح والتقدم وزيادة لعدد المشتركن به لما يقدمه من حل لجميع المشاكل التي يتم طرحها بهذا الصرح الكبير .142
 
14-07-2020 10:55 مساء
icon تفسير سؤال لضريبة كسب العمل بدالة IF | الكاتب :ashraf_hertlion |المنتدى: اكسيل شروحات ودروس
 بارك الله فيك أخي الحبيب اسلام ومشكور وربنا يجعلة فى ميزان حسناتك
ممكن طلب من حضرتك ان تشرح لنا طريقة حساب ضريبة الدخل الجديده التى سوف يعمل بها من أول يوليو 2020 ولو تكرمت تكون بأمثلة أو بعمل شيت اكسيل يوضح الضريبة المستحقة لكل شريحة كى تعم الفائدة لكل الأعضاء
تقبل تحياتى واحتراماتى لحضرتك وكل الاعضاء المحترمين بهذا المنتدى الكبير
30-06-2020 11:00 مساء
icon حصرياً اختبارات الترقي للمعلمين على ملف إكسيل (بنك أسئلة) | الكاتب :ashraf_hertlion |المنتدى: موضوعات ياسر خليل أبو البراء
 عمل ممتاز  بارك الله فيك استاذ ياسر وجزاك الله كل خير
30-04-2020 11:56 صباحا
icon حذف الصفوف المحددة من خلال checkbox | الكاتب :ashraf_hertlion |المنتدى: اكسيل اسئله واجابات
 تمام تمام يا استاذ / ياسر  يا كبير والله بدون مبالغة مش عارفين حضرتك لو مش موجود بهذا الصرح الكبير كنا هنلاقى سعة صدر وسرعة الاستجابة على هذه التساؤلات وحل المشاكل دى كلها فين ربنا يجعله فى ميزان حسناتك الى يوم القيامة
23-04-2020 03:31 مساء
icon انشاء تكست بوكس يدعم الضغط كليك يمين | الكاتب :ashraf_hertlion |المنتدى: اكسيل اسئله واجابات
 الله عليك وتسلم ايديدك الكبير كبير يا استاذ / ياسر خليل
كود ولا اروع من كدة
وكل عام وجميع اساتذتنا واحبابنا فى هذا الصرح الكبير بخير وتقبل من صيام شهر رمضان الكريم 142
20-04-2020 11:25 مساء
icon تعديل الكود لزيادة عدد الأعمدة التى تظهر عند عملية البحث فى الليست بوكس | الكاتب :ashraf_hertlion |المنتدى: اكسيل اسئله واجابات
 الف مليون شكر يا كبير
تم التعديل على الكود وتم المطلوب بفضل الله ثم بفضل حضرتك دمت لنا ودامت سعة صدر حضرتك وجعلك الله عونا وسنداً لكل من يحتاج يد العون والمساعدة
وجعله الله فى ميزان حسناتك الى يوم القيامة وكل عام وحضرتك بخير

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





الساعة الآن 07:44 صباحا

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