اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر (معدل)

{Sub شكلبيضاوي2_Click()

Application.ScreenUpdating = False
 Dim i, LR
    LR = ورقة13.Range("B" & Rows.Count).End(xlUp).Row
       For i = 8 To LR
          ورقة13.Cells(i, "B").Resize(1, 7).Copy
           RawData.Range("F" & Rows.Count).End(xlUp).Offset(1).PasteSpecial xlPasteValues
           RawData.Range("A" & Rows.Count).End(xlUp).Offset(1) = ورقة13.Range("C4")
           RawData.Range("B" & Rows.Count).End(xlUp).Offset(1) = ورقة13.Range("I4")
           RawData.Range("C" & Rows.Count).End(xlUp).Offset(1) = ورقة13.Range("I5")
           RawData.Range("D" & Rows.Count).End(xlUp).Offset(1) = ورقة13.Range("C5")
           RawData.Range("E" & Rows.Count).End(xlUp).Offset(1) = "فاتورة"

       Next
Range("A8:H27").SpecialCells(xlCellTypeConstants).ClearContents
Application.CutCopyMode = False
Application.ScreenUpdating = True
{End Sub

 كشف حساب جديد2.rar

تم تعديل بواسطه صلاح المصرى
قام بنشر

أخي الكريم

هل اطلعت على التوجيهات

يوضع الكود بين أقواس الكود

يذكر ما المطلوب من الموضوع بعنوان معبر وليس عنوان عام .. مثال : شرح لكود الترحيل لكشف حساب جديد (مجرد مثال)

في الرد الأول لم يكن هناك مرفق ..

 

  • Like 1
قام بنشر (معدل)

اخى الكريم

الالتزام بتوجيهات المنتدى هدفه الوصول الى افضل طريقة ممكنة فى التعامل وطرح الموضوعات بداخل المنتدى 

وتزكير       استاذنا ومشرفنا الحبيب ياسر خليل     حضرتك بها امر لا يضايقك فى شئ  ..عموماً بالمرفق ستجد شرح الكود .. ولاستخدام الحلقات بالكود

اليك تزكير بها

      do.php?img=38805

 كشف حساب جديد2.rar

خالص تحياتى

 

تم تعديل بواسطه خالد الرشيدى
  • Like 4
قام بنشر

 أخى واستاذى محمد حسن      وعليكم السلام ورحمة الله وبركاتة

 لكم يسعدنى دائماً مرور حضرتك بعباراتة الطيبة ... جزاك الله خيراً

                       شكراً جزيلاً لك

                   

قام بنشر

شكرا جزيلا لك اخى خالد الرشيدى انا لم اغضب من الاخ الحبيب ياسر خليل بالعكس فأنا اراه مثلى الاعلى لكن اريد حذف الموضوع الغير المقبول بشكل عام .

يسعدنى مجهودكم الطيب ... جزاكم الله خير ووفقكم 

  • Like 1
قام بنشر

 الاخ خالد الرشبدي والاخ محمد حسن

الله يعطيكم العافية والصحة وادامكم اللة عونا للجميع ووسع صدوركم زيادة وزيادة

 استاذنا ومشرفنا الحبيب ياسر خليل احب ان اعلمكم بانه لا يوجداي ضياع

لمجهودكم وان لم يستفد من الشروحات صاحب الطلب فهناك الكثيرمن يستفيديون

وانما تعتبر االحلول التي لا توافق صاحب الطلب حلولا عند غيرهم واثرائا للموضوع

وان هذا المنتدى هو للتعلم بالدرجة الاولى وليس تقديم مساعدة لشخص معين والمساعدة  

موجهة له فقط فهيه للجميع

ودمتم بود ورزقم الله محبة الجميع 

  • Like 1

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information