كود ترحيل بيانات ( مساعدة فى الملف المرفق )

[محمد عبد الناصر]

السلام عليكم ورحمة الله وبركاتة ؛؛؛؛؛

عايز كود اخد بيه بيانات معينه فى الصفحه ترحل مسلسل بالترتيب الى الشيت الى اسمو " تقرير " بمعنى انى هبدا اعمل تصريح لاول مره  عايز لما ادوس على الامر البيانات دى ترحل فى مسلسل رقم 1 فى الشيت الى اسمو " تقرير " وهاجى اعمل تصريح تانى وادوس على الامر عشان ارحل البيانات المطلوبة لو مسلسل رقم 1 فى الشيت " تقرير " فيه بيانات يبدا الامر فى ترحيل البيانات الى مسلسل رقم 2 وكده والى بعده فى مسلسل 3 وكده  مجرد انو ياخد   البيانات ويرحلها الى الشيت " تقرير "

البيانات المطلوب ترحيلها الى فى الخليه    A8 -A10-L23-L24-A24

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

 

 

2454 - Copy.rar

تم تعديل سبتمبر 5, 2015 بواسطه محمود فؤااد

[محمد عبد الناصر]

ليها حل دى ؟

[احمدزمان]

السلام عليكم و رحمة الله وبركاته

من حديث سهل بن سعد: الأناة من الله، والعجلة من الشيطان. وسنده ضعيف

[محمد عبد الناصر]

ليها حل حضرتك دى ولا لا ؟ انا مش فاهم معلش

[احمدزمان]

السلام عليكم و رحمة الله وبركاته

 

الدفاع عن النفس

هذي حاجة تخوف

شاهد الحل المرفق

Sub TARHEEELL()
' ترحيل من sheet1 الى تقرير
Dim FS As Worksheet, TS As Worksheet
Dim R, ER1, ER2
Set FS = Sheets("Sheet1")
Set TS = Sheets("تقرير ")
FS.Range("B66:H66").Copy

For ER2 = 6 To TS.UsedRange.Rows.Count + 9
If TS.Cells(ER2, 2) = "" Then
TS.Range("B" & ER2).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Application.CutCopyMode = False
End
End If
Next ER2
End Sub

مع التحية

Xl0000016.rar

[محمد عبد الناصر]

الله ينور عليك ربنا يجعلو فى مزيان حسناتك يااااااااااااااااااااارب يا استاذ احمد زمان

اخر طلب معلش فى الصفحه امر مكتوب عليه ترحيل الصفحه كامله عايز لما ادوس عليه يرحل الصفحه كامله ويرحل البيانات المطلوبه بدل يعنى ما ادوس على امرين ادوس على امر واحد

[احمدزمان]

السلام عليكم و رحمة الله

اخ محمود

عملنا 3×1 

ترحيل الصفحة + ترحيل للجدول + طباعة 

صورة الطابعة الموجودة في الورقة اضغط عليها يتم تنفيذ الكل

 

Xl0000016.rar

[محمد عبد الناصر]

الله ينور يا استاذ / احمد زمان بجد شغل اكتر من رائع

 

اخر حاجه حضرتك بس لما بدوس على الأمر واروح للتقرير لو فى اسم موجود بنفس البيانات بيعملها تانى هيه هيه نفس البيانات ان اعايز لو البيانات دى موجوده فى التقرير مينقلهاش تانى اعتماد على رقم الإقامه مش الاسم

[محمد عبد الناصر]

ليها حل دى ان فى التقرير لو رقم الإقامه ده موجود ميرحلش البيانات ؟؟؟؟