Note: The other languages of the website are Google-translated. Back to English

كيفية الإشارة إلى التنسيق والقيمة من خلية أخرى في Excel؟

عادة ، نستخدم الصيغة = A1 للإشارة إلى الخلية A1 إلى خلية أخرى في ورقة العمل. لكن هذا يمكن أن يشير فقط إلى قيمة الخلية. إذا كنت تريد الإشارة إلى قيمة الخلية بالإضافة إلى تنسيقها ، فأنت بحاجة إلى تجربة طريقة أخرى. توفر لك هذه المقالة طريقتين لتحقيق ذلك.

تنسيق المرجع والقيمة من خلية أخرى مع لصق صورة مرتبطة
تنسيق المرجع التلقائي والقيمة من خلية أخرى باستخدام VBA


تنسيق المرجع والقيمة من خلية أخرى مع لصق صورة مرتبطة

لنفترض أنك تريد الإشارة إلى التنسيق والقيمة من الخلية A1 ، يرجى القيام بما يلي لإنجازها.

1. حدد الخلية (A1) التي تريد الرجوع إليها ، ثم انسخها بالضغط CTRL + C مفاتيح.

2. انتقل إلى الخلية التي تريد ربط الخلية المرجعية بها ، وانقر بزر الماوس الأيمن عليها ثم حدد > لصق خاص > صورة مرتبطة. انظر لقطة الشاشة:

الآن تتم الإشارة إلى تنسيق الخلية A1 وقيمتها إلى خلية محددة. وسيكون تنسيق وقيمة هاتين الخليتين متزامنين كما هو موضح أدناه.


تنسيق المرجع التلقائي والقيمة من خلية أخرى باستخدام VBA

يمكنك الإشارة إلى التنسيق والقيمة من خلية أخرى تلقائيًا عن طريق تشغيل برنامج VBA النصي أدناه.

1. انقر بزر الماوس الأيمن فوق علامة تبويب الورقة التي تحتوي على الخلية التي تريد الرجوع إليها ، ثم انقر فوق عرض الرمز من قائمة النقر بزر الماوس الأيمن.

2. في ظهرت مايكروسوفت البصرية للتطبيقات نافذة ، انسخ والصق رمز فبا أدناه في نافذة التعليمات البرمجية.

كود فبا: التنسيق المرجعي والقيمة من خلية أخرى

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
    With Worksheets("Sheet1")
        If .Range("A1").Value2 <> "" Then
            On Error Resume Next
            Range("A1").Copy (.Range("E2"))
        End If
    End With
End Sub

ملاحظة: في الكود ، الورقة 1 هي اسم الورقة الذي يحتوي على الخلية التي تحتاجها للإشارة إلى كل من القيمة والتنسيق. يعني A1 و E2 أنه سيتم الرجوع إلى الخلية A1 تلقائيًا إلى الخلية E2.

من الآن فصاعدًا ، عندما تتغير القيمة في الخلية A1 من الورقة 1 ، ستتم الإشارة إلى قيمتها وتنسيقها إلى الخلية E2 على الفور.


مقالات ذات صلة:

أفضل أدوات إنتاجية المكتب

Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪

  • إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
  • سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
  • دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
  • حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
  • نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
  • استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
  • سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
  • اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
  • أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.
علامة تبويب kte 201905

يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
أوفيسيتاب القاع
فرز التعليقات حسب
التعليقات (9)
لا يوجد تقييم. كن أول من يقيم!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
أهلاً! رائع جدا!! هل هناك طريقة لعمل الخيار الأول في جداول بيانات Google؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبًا جوليان ،
عذرا لم نختبر في أوراق جوجل. شكرا على تعليقك.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
كيف أفعل ذلك إذا كنت أرغب في النسخ إلى ورقة مختلفة؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبا ليل ،
إذا كنت بحاجة إلى النسخ إلى ورقة مختلفة ، فيرجى تطبيق رمز VBA أدناه. الورقة 1 هي ورقة العمل الأصلية ، ورقة 3 هي ورقة العمل الوجهة. يرجى تغييرها بناءً على احتياجاتك.

تغيير ورقة العمل الفرعية الخاصة (ByVal Target As Excel.Range)
مع أوراق العمل ("Sheet1")
إذا .Range ("A5"). Value2 <> "" ثم
على خطأ استئناف التالي
النطاق ("A5"). نسخ (أوراق العمل ("Sheet3"). النطاق ("E2"))
إنهاء حالة
انتهت ب
نهاية الفرعية
تم تصغير هذا التعليق بواسطة المشرف على الموقع
كيف يتم تشغيل هذا الكود في Excel؟ هل يجب تشغيله على ورقتي العمل؟ هل يمكن أن تكون محددة مثل خطوة بخطوة؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبًا جيسي ، مرحبًا ، كما هو مذكور أعلاه ، تحتاج فقط إلى ملء الكود في نافذة كود ورقة العمل الأصلية ، عند تغيير قيمة الخلية في ورقة العمل الأصلية (A5 في الورقة 1 في هذه الحالة) ، سيتم تشغيل الكود تلقائيًا. وسيتم نسخ الخلية A5 في الورقة 1 إلى E2 في الورقة 3.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبًا ، فعلت الكود أدناه لكنه لم يعمل
تغيير ورقة العمل الفرعية الخاصة (ByVal Target As Excel.Range)
مع أوراق العمل ("ملخص التحليل التنافسي")
If .Range ("BI7"). Value2 <> "" ثم
على خطأ استئناف التالي
النطاق ("BI7"). نسخ (أوراق العمل ("في عرض العمق - ADP"). النطاق ("E55"))
إنهاء حالة
انتهت ب
نهاية الفرعية
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبًا ، بعد إضافة الرمز ، تحتاج إلى تعديل ورقة العمل "ملخص التحليل التنافسي" لتمكين VBA.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
هل يمكنني عكس أول 5 أعمدة في كل ورقة جديدة؟ لدي البيانات فقط أريد أن يتغير التنسيق مع جميع الأوراق بدلاً من الاضطرار إلى القيام بذلك بشكل متكرر
لا توجد تعليقات منشورة هنا حتى الآن

تواصل معنا

حقوق التأليف والنشر © 2009 - شبكة الاتصالات العالمية.extendoffice.com. | كل الحقوق محفوظة. مشغل بواسطة ExtendOffice. | | خريطة الموقع
Microsoft وشعار Office هما علامتان تجاريتان أو علامتان تجاريتان مسجلتان لشركة Microsoft Corporation في الولايات المتحدة و / أو دول أخرى.
محمي بواسطة Sectigo SSL