• 0

كيف أنسخ التغييرات من ملف إكسل لآخر بشكل تلقائي؟

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

أشكركم

انشر على الشّبكات الاجتماعية


رابط هذه المساهمة
  • 0

يمكن استعمال المثال التالي كنموذج، وأظنه يصب في نفس ما تصبو إليه:

Set ws = Sheets("Sheet1")
ws.Range(ws.Range("J1:K1"), ws.Range("J1:K1").End(xlDown)).Copy
Sheets("Sheet2").Range("A1").End(xlDown).Offset(1,0).Paste

حيث:

Sheet1: هي الصفحة أو جدول إكسل.

المجال  (J1:K1) حيث خصصت الكلمة Rang لتعيين المجال الذي نريد تحديده لنسخه باستعمال الوظيفة Copy.

ثم ننسخه في الصفحة الثانية Sheet2 ابتداءً من الخانة A1.

المصدر:

انشر على الشّبكات الاجتماعية


رابط هذه المساهمة

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

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

يستغرق التسجيل بضع ثوان فقط


سجّل حسابًا جديدًا

تسجيل الدخول

تملك حسابا مسجّلا بالفعل؟


سجّل دخولك الآن