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

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

قام بنشر

السلام عليكم شبالب 

عندي قائمه مبيعات في ورقه 1 اريد كود يرحل نفس الجدول لورقه الثانيه وكل ما ارحل ينزل تحت الي قبله يعني ينسخليه الصفحه ويلسقهه بلصفحه الثانيه في كل مره اضغط تلرحيل ينزل تحت الي قبله 

رفقت ملف  للتعديل 

0000.rar

قام بنشر
12 ساعات مضت, سليم حاصبيا said:

جرب هذا الشيء

تم التعديل على بعض الخلايا (الغاء دمج بعض الخلايا و تغيير اسماء الصفحات )لسهولة عمل الكود

 

2 مندوب salim 2003.rar

ممنون منك اخي الكريم 

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

قام بنشر
12 ساعات مضت, سليم حاصبيا said:

جرب هذا الشيء

تم التعديل على بعض الخلايا (الغاء دمج بعض الخلايا و تغيير اسماء الصفحات )لسهولة عمل الكود

 

2 مندوب salim 2003.rar

اخي انا جربت هاذ الكود شغال تمام بس بقه تعديل بسيط عليه تخليه يلسق بورقه عمل ثانيه مو نفس الورقه 

هاذ الكود 

Sub Abu_Ahmed_Trheel()
Dim LR As Integer
LR = [A1000].End(xlUp).Row
Range("A1:J" & LR).Copy Range("L" & [L1000].End(xlUp).Row + 1)
MsgBox "تم الترحيل بنجاح ", vbOKOnly, "تنبيه"
End Sub
 

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