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

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

قام بنشر

بسم الله الرحمن الرحيم 

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

ولكم جزيل الشكر

 

تدريب .rar

قام بنشر

اخى

شاهد المرفق

استاذي إبراهيم

ياريت شرح لهذا كود الترحيل

Dim lr As Integer
lr = [b1000].End(xlUp).Row
Range("b2:d" & lr).Copy Range("l" & [l1000].End(xlUp).Row + 1)
Range("b2:d" & lr).ClearContents
MsgBox "تم الترحيل"


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

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

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

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

Important Information