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

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
أحمد يوسف ali mohamed ali-- لا تميز خلال هذه الفترة YasserKhalil تعديل واضافة كود اكسيل اسئله واجابات


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


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





نسخ و طباعة نطاق معين بشرط او اكثر

السلام عليكم أساتذتى الأفاضل كيف يمكن نسخ نطاق معين ولصقه في نطاق اخر بشرط اواكثر ثم الطباعة ؟



22-03-2020 09:58 مساء
halan550
menu_open
عضو
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 11-02-2020
رقم العضوية : 18038
المشاركات : 16
الجنس : ذكر
تاريخ الميلاد : 11-6-1999
قوة السمعة : 20
الاعجاب : 5
 offline 

السلام عليكم أساتذتى الأفاضل
كيف يمكن نسخ نطاق معين ولصقه في نطاق اخر بشرط اواكثر ثم الطباعة ؟

 
 
  نسخ نطاق.xlsx   تحميل xlsx مرات التحميل :(5)
الحجم :(129.961) KB





22-03-2020 10:57 مساء
مشاهدة مشاركة منفردة [1]
محمد الدسوقى
menu_open
خبير
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 47
المشاركات : 733
الجنس : ذكر
تاريخ الميلاد : 14-10-1973
الدعوات : 69
قوة السمعة : 7718
الاعجاب : 32
 offline 
look/images/icons/i1.gif نسخ و طباعة نطاق معين بشرط او اكثر
اتفضل أخى الكريم المرفق التالى
بمجرد كتابة رقم الفاتورة فى ورقة ( طباعة ) سيتم ترحيل البيانات المطلوبة
وأضفت زر فى أعلى الفاتورة للطباعة


 
 
 
  نسخ نطاقMD.xlsm   تحميل xlsm مرات التحميل :(10)
الحجم :(137.166) KB


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



22-03-2020 11:02 مساء
مشاهدة مشاركة منفردة [2]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8675
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 21
قوة السمعة : 25551
الاعجاب : 206
 offline 
look/images/icons/i1.gif نسخ و طباعة نطاق معين بشرط او اكثر
السلام عليكم
جرب هذا الكود
Sub Test()
    Dim x, ws As Worksheet, sh As Worksheet, nInvoice, r As Long, n As Long
    
    Application.ScreenUpdating = False
        Set ws = ThisWorkbook.Worksheets(1)
        Set sh = ThisWorkbook.Worksheets(2)
        nInvoice = sh.Range("B3").Value
        x = Application.Match(nInvoice, ws.Columns(1), False)
        n = 7
        
        If Not IsError(x) And nInvoice <> Empty Then
            For r = 2 To ws.Cells(Rows.Count, 1).End(xlUp).Row
                If ws.Cells(r, 1).Value = nInvoice Then
                    sh.Cells(n, 1).Resize(1, 4).Value = ws.Cells(r, 4).Resize(1, 4).Value
                    n = n + 1
                End If
            Next r
        End If
    Application.ScreenUpdating = True
    
    MsgBox "Done...", 64
End Sub

أثارت هذه المشاركة إعجاب: عبدالله فتحى، ali mohamed ali، محمد الدسوقى، hassona229،



22-03-2020 11:07 مساء
مشاهدة مشاركة منفردة [3]
halan550
menu_open
عضو
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 11-02-2020
رقم العضوية : 18038
المشاركات : 16
الجنس : ذكر
تاريخ الميلاد : 11-6-1999
قوة السمعة : 20
الاعجاب : 5
 offline 
look/images/icons/i1.gif نسخ و طباعة نطاق معين بشرط او اكثر

شكرا استاذنا الفاضل محمد الدسوقي علي مرورك ولكن
اولا : حضرتك محدد نطاق الطباعة وانا عايزة نطاق طباعة مطاطي حسب عدد الاصناف المنسوخة
ثانيا : الكود بينسخ صف واحد وليس كل الصفوف

استاذنا الكريم YasserKhalil من أبداع لأبداع اكبر

كفيتم و وفيتم الله لا يضيع عليك تعبكم و يخليك لنا يارب ❣️

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



23-03-2020 09:06 صباحا
مشاهدة مشاركة منفردة [4]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8675
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 21
قوة السمعة : 25551
الاعجاب : 206
 offline 
look/images/icons/i1.gif نسخ و طباعة نطاق معين بشرط او اكثر
بارك الله فيك أخي الكريم والشكر موصول لصاحب الجولات والصولات المبدع بحق محمد الدسوقي 
والحمد لله الذي بنعمته تتم الصالحات

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





المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
كود للطباعة علي طابعتين في نفس الوقت halan550
11 179 hassona229
كيف اصنع شيت اكسل لدرجات الطلاب بالمعادلات و يتم ربطه بشيت اخر لطباعة اكثر من شهادة تعبئة تلقائية Mostafa Adel
1 171 Mostafa Adel
حفظ نطاق الطباعة كصورة Export Print Area + Print title rows As Picture hassona229
35 636 hassona229
كن محترفاً : شرح احتراف طباعة وتجليد كتاب ورقى بكار للأبد
8 1619 علي بطيخ سالم
حفظ نطاق الطباعة كصورة Export Print Area As JPG Picture YasserKhalil
32 1509 hassona229

الكلمات الدلالية
طباعة ، نطاق ، معين ، بشرط ، اكثر ،


 







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

الساعة الآن 09:55 صباحا

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