علي فاهم قام بنشر أغسطس 17, 2017 الكاتب مشاركة قام بنشر أغسطس 17, 2017 5 ساعات مضت, علي فاهم said: lr = IIf(LastRowColumn(sh, "R") = 9, 9, LastRowColumn(sh, "R")) lc = LastRowColumn(sh, "C") جزيت خيرا نقول اخر صف .. نقول اخر عمود مامعنى IIf ليه 2 اي والرو جنب الكولوم نرجو الشرح مش شرط بالفيديو بالكتابه بالعربي في الكود رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر أغسطس 17, 2017 مشاركة قام بنشر أغسطس 17, 2017 تستخدم IIF لاختبار شرط زي IF لكن مختصرة في شرط واحد .. لو تحقق يعمل كذا ولو لم يتحقق يعمل كذا .. بالنسبة للدالة المعرفة تقوم بمعرفة رقم آخر صف أو رقم آخر عمود .. حيث قمت بدمج الدالتين المعرفتين في دالة معرفة واحدة .. فإذا أردت معرفة رقم الصف تكتب في البارامتر الثاني حرف الـ R ، وإذا أردت معرفة رقم آخر عمود تكتب الحرف C المهم في السطر الكود بيشوف رقم آخر صف فلو كان رقم آخر صف يساوي 9 .. إذاً المتغير المسمى lr هيساوي 9 أما إذا كان لا يساوي 9 يتحقق الجزء الثاني من الشرط حيث تقوم الدالة المعرفة باحتساب رقم آخر صف والمتغير sh يشير لورقة العمل المطلوب استخراج رقم آخر صف منها ، وهذا المتغير بدوره متغير لأنه يعمل على مصفوفة من أوراق العمل أرجو أن تكون الصورة قد اتضحت الآن 2 رابط هذا التعليق شارك More sharing options...
علي فاهم قام بنشر أغسطس 17, 2017 الكاتب مشاركة قام بنشر أغسطس 17, 2017 في ١٦/٨/٢٠١٧ at 16:12, ياسر خليل أبو البراء said: sh.Range("A" & lr).Resize(1, lc).AutoFill Destination:=sh.Range("A" & lr).Resize(c + 1, lc) هنا بينسخ صح لكني مش شايف بدايه الخليه اللي هاينسخ فيها او منها رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر أغسطس 18, 2017 مشاركة قام بنشر أغسطس 18, 2017 البداية للنسخ هو آخر صف حيث يتم عمل تعبئة تلقائية لآخر صف ... ولمدى عدد الصفوف المطلوبة طبقاُ للمتغير c الذي يشير للخلية Q1 2 رابط هذا التعليق شارك More sharing options...
قصي قام بنشر أغسطس 20, 2017 مشاركة قام بنشر أغسطس 20, 2017 ربنا يسعد ايامك استاذ ياسر رابط هذا التعليق شارك More sharing options...
ابن بنها قام بنشر أغسطس 20, 2017 مشاركة قام بنشر أغسطس 20, 2017 مشكور استاذ ياسر رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.