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



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





نقل البيانات إعتمادا على شرط مع إدراج عدد محدد من الصفوف فى نقاط محددة

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



27-08-2017 04:59 مساء
سعيد بيرم ابوعبدالرحمن
menu_open
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 25-08-2017
رقم العضوية : 95
المشاركات : 71
الجنس : ذكر
تاريخ الميلاد : 2-2-1965
يتابعهم : 1
يتابعونه : 3
قوة السمعة : 61
الاعجاب : 24
 offline 
السلام عليكم جميعا ورحمته الله وبركاته
بداية اسمحوا لى أن أتقدم بخالص تهنئتى القلبية 
و لجميع السادة القائمين على أكاديمية الصقر للتدريب 
بمناسبة بدأ العمل بها داعيا المولى العلى القدير أن تكون فاتحة خيرعلينا وعلى سائرالوطن العربى 
كما اتقدم بتهنئتى لجميع السادة الزملاء بمناسبة حلول عيد الاضحى المبارك
اعاده الله علينا وعليكم جميعا وعلى سائر الامة العربية والاسلامية باليمن البركات
المطلوب بحول الله تعالى فى مشاركتى الأولى
 لدى بيانات تبدأ من الصف رقم 8 فى الورقة الرئيسية *** بالعمود رقم 9  كلمة "إكاديمية" الشرط المعنى لنقل البيانات من الرئيسية الى ورقة ( الصقر للتدريب )





أريد هنا نسخ الأعمدة من 1 : 5 مع العمود رقم 18 اعتمادا على العمود 9 ونقلها إلى ورقة "الصقر للتدريب"
كما أننى فى حاجة  إلى إدراج  6 ستة صفوف بعد كل 30 اسم في ورقة ( الصقر للتدريب ) سيتم استخدام هذه الصفوف كمجاميع وتذييل
وسألقى الضوء على النقاط التي أود أن أضيف فيها الصفوف إذا كانت العناصر المتبقية أقل من 30 اسم  ثم إدراج الصفوف مباشرة بعدها
وأثناء تلك العملية أود إضافة بعض السلاسل في هذه الصفوف الستة المدرجة.
في الصف الأول المدرج لإنشاء الصيغ الإجمالية
 وفي الصف الثاني المدرج بالعمود B نكتب " المختص " وبالعمود C  نكتب "مراجع اول " وبالعمود D  نكتب " مراجع ثانى" وبالعمود F  نكتب " يعتمد "
وفي الصف السادس المدرج لإنشاء الإجماليات السابقة " اجمالى ماقبله "
مع ضبط فواصل الصفحات العمودية والأفقية تلقائيا
ملاحظة بالنسبة لصفوف التذييل الأربعة التي بين الجداول بورقة ( الصقر للتدريب ) أحتاج إلى إدراج صفوف بدون حدود
ملاحظة أخرى البيانات الأصلية فى الورقة الرئيسية حوالي 16000 صف موزعة على 800 جدول
 لذا أنا أبحث عن طريقة أسرع بإستخدام المصفوفات للقيام بهذه المهمة
مساعدتكم هى موضع تقدير *** بارك الله فيكم ورزقكم وايانا من حيث لانحتسب *** وجزاكم الله خيرا
 
 
  اكاديمية الصقر للتدريب.xlsb.rar   تحميل rar مرات التحميل :(38)
الحجم :(35.227) KB



تم تحرير الموضوع بواسطة :سعيد بيرم ابوعبدالرحمن
بتاريخ:29-08-2017 07:06 مساء







27-08-2017 11:06 مساء
مشاهدة مشاركة منفردة [1]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3572
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 282
قوة السمعة : 9890
الاعجاب : 3398
 offline 
look/images/icons/i1.gif نقل البيانات إعتمادا على شرط مع إدراج عدد محدد من الصفوف فى نقاط محددة
وعليكم السلام أخي وحبيبي في الله أبو عبد الرحمن
مشكلتك أنك ما زلت مصر على نفس الطريقة smile .. الحكمة تقول : إذا أردت أن تطاع فأمر بما يستطاع
ما تطلبه يحتاج لوقت ليس بالقليل وقد لا يكون متوفر بشكل كبير .. لذا أطلب منك في طرح موضوعاتك أن تقوم بتجزئة الطلب إلى نقاط وبعد كل نقطة إما أن تكمل في نفس الموضوع أو تطرح موضوع جديد (هذا لن يكلفك شيء) ..
عموماً عملت على الجزء الأول والأهم من وجهة نظري وهو نقل البيانات إلى ورقة عمل النتائج وبعض التنسيقات الأساسية

قم بإنشاء ورقة عمل باسم Output (بالطبع يمكنك بعد ذلك تغيير اسم ورقة العمل لأي ورقة تريدها) ... لأن كدا كدا هنمسح كل البيانات والتنسيقات والألوان وأي حاجة وكل حاجة قبل وضع النتائج الجديدة
جرب الكود التالي .. وبعدها تناول نقطة واحدة (مع كوب عصير ليمون أو عصير مانجو smile )
Sub Test()
    Dim ws      As Worksheet
    Dim sh      As Worksheet
    Dim a       As Variant
    Dim b       As Variant
    Dim i       As Long
    Dim j       As Long
    Dim k       As Long

    Application.ScreenUpdating = False
        Set ws = Sheets("الرئيسية")
        Set sh = Sheets("Output")
        a = ws.Range("A8:R" & ws.Cells(Rows.Count, 1).End(xlUp).Row).Value
        ReDim b(1 To UBound(a, 1), 1 To 6)
    
        sh.Cells.Clear
        For i = LBound(a, 1) To UBound(a, 1)
            If a(i, 9) = "اكاديمية" Then
                k = k + 1
                For j = 1 To 5
                    b(k, j) = CStr(a(i, j))
                Next j
                b(k, 6) = a(i, 18)
            End If
        Next i
    
        If k = 0 Then Exit Sub
        With sh
            .DisplayRightToLeft = True
            With .Range("A7")
                .Resize(1, 6).Value = Array("م", "القومى", "قائمة الاسماء", "الجهة", "كود", "المبلغ")
                .Resize(1, 6).Font.Bold = True
                .Offset(, 1).EntireColumn.NumberFormat = "@"
                .Offset(, 1).EntireColumn.ColumnWidth = 15
                .Offset(, 5).EntireColumn.NumberFormat = "0.00"
                .Offset(1).Resize(k, UBound(b, 2)).Value = b
            End With
            With .Cells
                .ReadingOrder = xlRTL
                .HorizontalAlignment = xlCenter: .VerticalAlignment = xlCenter
            End With
        End With
    Application.ScreenUpdating = True
End Sub

أثارت هذه المشاركة إعجاب: سعيد بيرم ابوعبدالرحمن، Merzoukrafi75،




27-08-2017 11:47 مساء
مشاهدة مشاركة منفردة [2]
محمد الدسوقى
menu_open
عضو محترف
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 47
المشاركات : 360
الجنس : ذكر
تاريخ الميلاد : 14-10-1973
الدعوات : 40
يتابعهم : 7
يتابعونه : 226
قوة السمعة : 2379
الاعجاب : 592
 offline 
look/images/icons/i1.gif نقل البيانات إعتمادا على شرط مع إدراج عدد محدد من الصفوف فى نقاط محددة
أستاذى الغالى / ياسر أبو البراء
أنا جربت نقل البيانات بالمصفوفات كما تعلمنا منكم وشغالة 100 % ـ بخلاف الكود المرفق منكم فى المشاركة السابقة
ولكن الجزء الخاص بادراج صفوف الذى يطلبه أخونا السائل مش راض يظبط يا ريت نظرة عليه ونشوف فين الخطأ
Option Explicit
Sub Data_Transfer()
'----------------
Dim ws As Worksheet, sh As Worksheet
Set ws = Sheets("الصقرللتدريب") 'الهدف
Set sh = Sheets("الرئيسية") 'المصدر
Dim Arr As Variant, Arr1 As Variant, Temp As Variant
Dim LR As Long, i As Long, j As Long, p As Long

LR = sh.Cells(Rows.Count, 3).End(xlUp).Row

ws.Range("B8:F20000").ClearContents

Arr = sh.Range("A8:AU" & LR).Value
Arr1 = Array(2, 3, 4, 5, 18)

ReDim Temp(1 To UBound(Arr, 1) + 1, 0 To UBound(Arr1) + 1)
For i = 1 To UBound(Arr)
'-----------------------------------
                ' معيار الترحيل
'-----------------------------------
If Arr(i, 9) = "اكاديمية" Then
'-----------------------------------
p = p + 1
For j = 0 To UBound(Arr1)
Temp(p, j) = Arr(i, Arr1(j))

Next j
End If
Next i
If p > 0 Then ws.Range("B8").Resize(p, UBound(Temp, 2)).Value = Temp

'-----------------------------------
    ' استدعاء الكود الخاص بادراج صفوف
'-----------------------------------
Call insertRows

 ActiveSheet.Range("b7").Activate
 Application.ScreenUpdating = True
 Application.Visible = True
 
End Sub


واليك الكود الخاص بادراج صفوف محتاج نظرة للتعديل
Private Sub insertRows()
    Dim LastRow         As Long
    Dim CurRow          As Long
    Dim i               As Long
    
    Const firstRow = 8         'Start Row
    Const numRows = 30          'Fixed Rows
    Const insertRows = 6        'Insert Rows
    
    Application.ScreenUpdating = False
        ActiveSheet.ResetAllPageBreaks
        ActiveWindow.View = xlPageBreakPreview
        
        LastRow = Range("A" & Rows.Count).End(xlUp).Row
        
        If (LastRow - firstRow) Mod numRows <> 0 Then
            CurRow = LastRow
            Range("A" & CurRow).Offset(1).Resize(insertRows).EntireRow.Insert
            Range("A" & CurRow).Offset(1).Resize(insertRows, 37).Borders.Value = 0
            Range("B" & CurRow + 1).Value = "المختص / ........................."
            Range("C" & CurRow + 2).Value = "مراجع أول / ........................."
            Range("D" & CurRow + 1).Value = "مراجع ثانى / ........................."
            Range("E" & CurRow + 2).Value = "يعتمد / ........................."
            Range("F" & CurRow + 1).Value = "إجمالى ما قبله"
            
        End If
        
       
            
            ActiveSheet.HPageBreaks.Add Before:=Range("A" & CurRow + insertRows + 1)
        
        
        ActiveWindow.View = xlNormalView
    Application.ScreenUpdating = True
End Sub


تقبل تحياتى

أثارت هذه المشاركة إعجاب: YasserKhalil،




28-08-2017 01:19 صباحا
مشاهدة مشاركة منفردة [3]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3572
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 282
قوة السمعة : 9890
الاعجاب : 3398
 offline 
look/images/icons/i1.gif نقل البيانات إعتمادا على شرط مع إدراج عدد محدد من الصفوف فى نقاط محددة
بارك الله فيك أخي محمد الدسوقي
ومشكور على الجهد المبذول
إن شاء الله غداً سأحاول الإطلاع على الأكواد .. لأن الوقت قد تأخر وأحتاج لبعض الراحة
تقبل تحياتي





28-08-2017 11:37 مساء
مشاهدة مشاركة منفردة [4]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3572
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 282
قوة السمعة : 9890
الاعجاب : 3398
 offline 
look/images/icons/i1.gif نقل البيانات إعتمادا على شرط مع إدراج عدد محدد من الصفوف فى نقاط محددة
لم نرى منك رداً أخي العزيز أبو عبد الرحمن .. لعل غيابك خير إن شاء الله

أثارت هذه المشاركة إعجاب: عبدالجيد،




29-08-2017 02:41 صباحا
مشاهدة مشاركة منفردة [5]
سعيد بيرم ابوعبدالرحمن
menu_open
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 25-08-2017
رقم العضوية : 95
المشاركات : 71
الجنس : ذكر
تاريخ الميلاد : 2-2-1965
يتابعهم : 1
يتابعونه : 3
قوة السمعة : 61
الاعجاب : 24
 offline 
look/images/icons/i1.gif نقل البيانات إعتمادا على شرط مع إدراج عدد محدد من الصفوف فى نقاط محددة
اخى وحبيب قلبى ابو البراء
السلام عليكم ورحمته الله وبركاته 
بداية جزاكم الله جميعا عنى خير الجزاء *** ودعنى أولا أن أرحب بأخى العزيز الاستاذ الفاضل / محمد الدسوقى بارك الله فيه
وجزاه الله عنى خير الجزاء عما قدمه من اسهامات طيبة *** واعتذر لعدم الرد فى حينه لانشغالى طوال اليوم وحتى 1.30 صباح الثلاثاء لنقل محل السكن الخاص بشقيقتى
أخى الحبيب ابوالبراء أننى بالنسبة لك أمثل حاله استثنائية بشأن تجزئة نقاط الموضوع وهذا عين الصواب
 ولكن وكما عودتنا ان سبيل الوصول لحل أمثل  فى شرح مفصل للمطلوب
وبما أن نقطتين الموضوع لا تقبل التجزئة  لارتباطهما ببعض فكان طلبى
 اليكم هذا المرفق وهو لذات الموضوع الذى نحن بصدده
واعتبره اخى ابو البراء  كأنه لم يكن نظرا لبطئة الشديد فى التعامل مع البيانات الكبيرة فضلا عن إختلاف الاعمده  المراد نقلها
ولكن لتوضيح ألية عمل الملف ومايحتوية لمضمون هذا الموضوع بشكل عام نحو طلبى بإستخدام المصفوفات خاصة أننى اتعامل مع كميات كبيرة من البيانات
فضلا ** لا أمرا نفذ الكود ولاحظ النتيجة
تقبلوا جميعا وافر تقديرى واحترامى وجزاكم الله خيرا

 
 
 
  نقل البيانات إعتمادا على شرط مع إدراج عدد محدد من الصفوف فى نقاط محددة.xlsb.rar   تحميل rar مرات التحميل :(8)
الحجم :(44.766) KB






29-08-2017 07:04 صباحا
مشاهدة مشاركة منفردة [6]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3572
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 282
قوة السمعة : 9890
الاعجاب : 3398
 offline 
look/images/icons/i1.gif نقل البيانات إعتمادا على شرط مع إدراج عدد محدد من الصفوف فى نقاط محددة
أخي العزيز أبو عبد الرحمن
الملف المرفق .. ألا يحقق غرضك؟! لما تقوم بطرح الموضوع طالما أن لديك حل له ..!!
بالنسبة لتجزئة الطلب كما أخبرتك لأن الوقت لا يسعني للعمل على الملف لوقت كبير لذا طلبت منك أن تتناول نقطة واحدة في كل مرة حتى إذا انتهت تلك النقطة انتقلنا لغيرها .. هذا أسلوبي في حل المشكلات وهو أسلوب مجرب ومضمون
في مشاركتك الأخيرة بدأت أتوه منك .. بإرفاقك ملف آخر ومرفق به حل جيد جداً .. لقد احترت في الحقيقة ولا أعلم ما المطلوب فعله الآن .. وكيف أن الملف المرفق من قبلكم لا يحقق الغرض
في الواقع أن مشكلة البيانات الكثيرة بالنسبة لك هو أنك تريد عمل تنسيقات لكل هذا الكم وهذا ما قد يجعله الأمر صعباً بعض الشيء ، لأن المصفوفات لن تفيدك في مسألة التنسيقات حيث أن التنسيقات مرتبطة بورقة العمل بشكل مباشر بخلاف البيانات نفسها التي تخزن في مصفوفة ...
أرجو توضيح الأمر وتناول المشكلة جزئية جزئية لكي تستطيع إنجاز عملك بشكل أفضل إن شاء الله

أثارت هذه المشاركة إعجاب: عبدالجيد، سعيد بيرم ابوعبدالرحمن،




29-08-2017 07:07 صباحا
مشاهدة مشاركة منفردة [7]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3572
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 282
قوة السمعة : 9890
الاعجاب : 3398
 offline 
look/images/icons/i1.gif نقل البيانات إعتمادا على شرط مع إدراج عدد محدد من الصفوف فى نقاط محددة
سؤال بالنسبة لإدراج الصفوف بين البيانات .. بالنسبة لآخر صفحة هل التذييل سيكون مباشرةً بعد آخر بيانات موجودة أياً كان عدد البيانات المتبقية أم كما في المرفق الذي أرفقته الأخير ..يتم إدراج صفوف فارغة بحيث يكتمل عدد الصفوف ويصبح 30 أيضاً؟

أثارت هذه المشاركة إعجاب: سعيد بيرم ابوعبدالرحمن،




29-08-2017 05:36 مساء
مشاهدة مشاركة منفردة [8]
سعيد بيرم ابوعبدالرحمن
menu_open
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 25-08-2017
رقم العضوية : 95
المشاركات : 71
الجنس : ذكر
تاريخ الميلاد : 2-2-1965
يتابعهم : 1
يتابعونه : 3
قوة السمعة : 61
الاعجاب : 24
 offline 
look/images/icons/i1.gif نقل البيانات إعتمادا على شرط مع إدراج عدد محدد من الصفوف فى نقاط محددة
اخى الحبيب الغالى ابو البراء
السلام عليكم ورحمته الله وبركاته
بشأن المرفق السابق هو يحقق الهدف كمضمون للفكرة العامة للموضوع 
اما عن سرعته فى التنفيذ فأهون علىّ بكثير أن أذهب الى مرسى مطروح والعودة الى ديارى افضل عندى من الانتظار فى تنفيذ الكود حيث
يستغرق وقت التنفيذ فى الملف الاصلى مايقرب من 20 دقيقة حيث تبلغ عدد صفوف البيانات  فى الورقة الرئيسة مايقرب من 16000 صف
اما عن استفساركم بشأن ادراج الصفوف وعن اخر صفحة فالتذييل سيكون مباشرة بعد حدود الجدول سواء
اكتملت البيانات عند الــ 30 بيان ام لم تكتمل كما بالمرفق نظرا لاننا محكومين فى نهاية الامر لطباعة الصفحات بشكل موحد
برجاء الاطلاع على المرفق التالى وهو لعدد 31 بيان فقط برجاء تنفيذ الكود ولاحظ النتيجة بالصفحة رقم 2 حتى نهايتها
أرجو من الله العلى القدير أن يوفقنا الى ما فيه الخير والرشاد **** وجزاكم الله خيرا

 
 
 
  نقل البيانات إعتمادا على شرط مع إدراج عدد محدد من الصفوف فى نقاط محددة.xlsb.rar   تحميل rar مرات التحميل :(10)
الحجم :(41.497) KB



تم تحرير المشاركة بواسطة :سعيد بيرم ابوعبدالرحمن
بتاريخ:30-08-2017 01:52 صباحا






29-08-2017 07:32 مساء
مشاهدة مشاركة منفردة [9]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3572
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 282
قوة السمعة : 9890
الاعجاب : 3398
 offline 
look/images/icons/i1.gif نقل البيانات إعتمادا على شرط مع إدراج عدد محدد من الصفوف فى نقاط محددة
أخي العزيز أبو عبد الرحمن
هل أكمل على الكود الذي بدأت فيه ؟؟ أم أن هناك أي تعقيب بخصوص الكود قبل أن نمضي قدماً
وما هي الخطوة التالية الآن : هل أبدأ في وضع الأكواد التي تقوم بإدراج الصفوف ...؟؟!! والتذييل ؟؟! أم أن هناك أي تعليق بخصوص الكود في المشاركة الثانية

أثارت هذه المشاركة إعجاب: سعيد بيرم ابوعبدالرحمن،




30-08-2017 12:26 صباحا
مشاهدة مشاركة منفردة [10]
سعيد بيرم ابوعبدالرحمن
menu_open
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 25-08-2017
رقم العضوية : 95
المشاركات : 71
الجنس : ذكر
تاريخ الميلاد : 2-2-1965
يتابعهم : 1
يتابعونه : 3
قوة السمعة : 61
الاعجاب : 24
 offline 
look/images/icons/i1.gif نقل البيانات إعتمادا على شرط مع إدراج عدد محدد من الصفوف فى نقاط محددة
اخى وحبيبى ابو البراء
السلام عليكم ورحمته الله وبركاته
نعم أخى ياسر يمكنك استكمال الكود الذى بدأت فيه بإضافة الاكواد الخاصة بإدراج الصفوف والتذييل
ولاتنسى بعد طلب الاذن جزئية انشاء صيغ " الاجمالى و جملة ماقبله " علما بأن العمود المعنى بالاجمالى وجملة ماقبله هو العمود F فقط
ولا يوجد أية تعقيبات أخرى **** المرفق التالى هو نفس المرفق بمشاركتى الاولى مرفق به الكود الخاص بكم
بارك الله فيكم وفى من تحب وجزاكم الله تعالى عنى خير الجزاء 
 
 
  ابو البراء - اكاديمية الصقر للتدريب.xlsb.rar   تحميل rar مرات التحميل :(13)
الحجم :(36.624) KB






30-08-2017 09:25 صباحا
مشاهدة مشاركة منفردة [11]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3572
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 282
قوة السمعة : 9890
الاعجاب : 3398
 offline 
look/images/icons/i1.gif نقل البيانات إعتمادا على شرط مع إدراج عدد محدد من الصفوف فى نقاط محددة
أخي الحبيب أبو عبد الرحمن
لا تقلق إذا تأخرت عليك في الأمر .. في الحقيقة لدي بعض الحلول لكني أحاول الوصول لأفضل حل ممكن ليناسب هذا الكم من البيانات .. حيث أفكر الآن في إلغاء نقطة إدراج الصفوف في ورقة العمل بشكل مباشر لأن ذلك سيؤثر على سرعة الكود بالتأكيد .. مع هذا العدد الهائل من الصفوف ، وأفكر في أن أقوم بترك فراغات داخل المصفوفة نفسها وقد نجحت الفكرة نوعاً ما ولكن ما زال العمل جاري على الفكرة حتى تكتمل إن شاء المولى
أرجو أن تعذر تأخري عليك في الرد

أثارت هذه المشاركة إعجاب: سعيد بيرم ابوعبدالرحمن،




30-08-2017 01:06 مساء
مشاهدة مشاركة منفردة [12]
سعيد بيرم ابوعبدالرحمن
menu_open
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 25-08-2017
رقم العضوية : 95
المشاركات : 71
الجنس : ذكر
تاريخ الميلاد : 2-2-1965
يتابعهم : 1
يتابعونه : 3
قوة السمعة : 61
الاعجاب : 24
 offline 
look/images/icons/i1.gif نقل البيانات إعتمادا على شرط مع إدراج عدد محدد من الصفوف فى نقاط محددة
أخى الحبيب الغالى ابو البراء
السلام عليكم ورحمته الله وبركاته
ليس هناك مايدعو للقلق وكيف لى أن أقلق وقد وهبنى الله تعالى صديقا غاليا وأخا حنون ذو قلب أبيض يتمنى الخير للجميع
هذا ماأشعر به دوما نحوك اخى وحبيبى أبوالبراء *** فلك كامل الوقت حتى تكتمل الفكرة العامة للموضوع
واسمح لى بسؤال بشأن الغاء نقطة إدراج الصفوف بورقة العمل (( Output ))
هل سيؤثر ذلك على نقطتى تذييل الصفحات وإنشاء صيغ الاجمالى وجملة ماقبله ؟
تقبل وافر تقديرى واحترامى **** وجزاكم الله تعالى عنى خير الجزاء

أثارت هذه المشاركة إعجاب: YasserKhalil،





المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
نقل الطلبة الى الناجحين الى مستوى اعلا مع ترك معيدين malik
10 540 YasserKhalil
مساعدة فى نقل معادلة من شيت الى شيت اخر sobhy30003
2 218 sobhy30003
نقل (ترحيل) البيانات عند الضغط على زر الترحيل الى شيت معين زيد2017
3 351 زيد2017
معادلة نقل مبلغ السلفة ومبلغ الشراء محمد لؤي
0 164 محمد لؤي
نقل البيانات من الرئيسية مع إدراج عدد محدد من الصفوف فى نقاط محددة لاكثر من ورقة سعيد بيرم ابوعبدالرحمن
10 351 YasserKhalil

الكلمات الدلالية
لا يوجد كلمات دلالية ..


 







اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.



الساعة الآن 11:54 صباحا

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