بيت / نظام التشغيل المحمول / انسخ في Excel بدون خلايا مخفية. انسخ البيانات التي تمت تصفيتها إلى Excel. تحويل الصفوف إلى أعمدة والعودة مرة أخرى

انسخ في Excel بدون خلايا مخفية. انسخ البيانات التي تمت تصفيتها إلى Excel. تحويل الصفوف إلى أعمدة والعودة مرة أخرى

إذا كانت بعض الخلايا أو الصفوف أو الأعمدة في ورقة العمل غير مرئية، فيمكنك نسخ كافة الخلايا (أو الخلايا المرئية فقط). افتراضيًا، لا يقوم Excel بنسخ الخلايا المرئية فحسب، بل ينسخ أيضًا الخلايا المخفية أو التي تمت تصفيتها. إذا كنت تريد نسخ الخلايا المرئية فقط، فاتبع الخطوات أدناه. على سبيل المثال، يمكنك نسخ البيانات التلخيصية فقط من ورقة عمل منظمة.

اتبع الخطوات أدناه.

ملحوظة:عند النسخ، يتم إدراج القيم بالتسلسل في الصفوف والأعمدة. إذا كانت منطقة اللصق تحتوي على صفوف أو أعمدة مخفية، فقد تحتاج إلى إظهارها لرؤية كافة البيانات التي نسختها.

عند نسخ الخلايا المرئية ولصقها في نطاق بيانات يحتوي على خلايا مخفية أو تم تطبيق عامل تصفية عليه، قد تلاحظ أنه تم لصق الخلايا المخفية مع الخلايا المرئية. لسوء الحظ، لا يمكنك تغيير هذا الإعداد عند نسخ نطاق من الخلايا ولصقه في Excel للويب لأن لصق الخلايا المرئية فقط غير متوفر.

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

إذا كنت لا تريد تنسيق بياناتك كجدول وكان برنامج Excel لسطح المكتب مثبتًا لديك، فيمكنك فتح المصنف في Excel لنسخ الخلايا المرئية ولصقها. للقيام بذلك، انقر فوق الزر فتح في إكسلواتبع الخطوات الواردة في نسخ الخلايا المرئية فقط ولصقها.

مزيد من المعلومات

يمكنك دائمًا طرح سؤال على أحد متخصصي مجتمع Excel Tech، وطلب المساعدة في مجتمع الإجابات، وكذلك تقديم الاقتراحات ميزة جديدةأو تحسين على الموقع

الصق فقط في الخطوط المرئيةاكسليمكن عمل الأرقام والصيغ والنص بعدة طرق. عندما تحتاج إلى إدراج أرقام أو صيغ أو نص في ليس كل صفوف الجدول، يمكنك استخدام عامل تصفية. كيفية تثبيت عامل التصفية وكيفية التصفية في Excel، راجع مقالة "التصفية في Excel". ولكن لإدراج البيانات في الخلايا المرئية فقط، فأنت بحاجة إلى أساليبك الخاصة، خاصة إذا كان هناك العديد من الصفوف.
الطريقة الأولى هيعادي .
دعونا نأخذ طاولة مثل هذا. سيكون الجدول هو نفسه بالنسبة لجميع الأمثلة.
دعونا نستخدم مرشحًا لإزالة جميع الأرقام 2 من الجدول. في الخلايا المرئية المتبقية نضع الرقم 600. في الخلية B2 نضع الرقم 600، ثم ننسخه أسفل العمود (اسحب الزاوية اليمنى السفلية للخلية B2). تم نسخ القيم إلى الخلايا المرئية فقط. يمكنك أيضًا إدراج الصيغ بنفس الطريقة. نكتب الصيغة التالية في الخلية C2. =أ2*10
اتضح مثل هذا.
دعونا نلغي الفلتر. والنتيجة هي جدول مثل هذا.
تم إدراج الصيغة والأرقام في الصفوف التي تمت تصفيتها فقط.
الطريقة الثانية.
سنقوم أيضًا بتصفية البيانات. في الخلية الأولى نكتب رقمًا أو صيغة أو نصًا وما إلى ذلك. الآن، إذا كان هناك آلاف الصفوف، فحدد الخلايا على النحو التالي: اضغط على المفاتيح "Ctrl" + "Shift" + زر السهم لأسفل (أو الزر لأعلى، اعتمادًا على المكان الذي نريد تحديد الخلايا فيه - أسفل أو أعلى الخلية التي كتب فيها الرقم).
الآن، أو اضغط على مجموعة المفاتيح "Ctrl" + G، أو المفتاح F5. سيظهر مربع حوار الانتقال. انقر فوق الزر "تحديد...". وفي مربع الحوار الجديد "تحديد مجموعة من الخلايا"، حدد المربع المجاور للكلمات "الخلايا المرئية فقط".انقر فوق "موافق". ثم أدخل كالمعتاد.

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

ل ملء الخلايا المرئية في أعمدة Excel المحددة، اضغط على مجموعة المفاتيح "Ctrl" + D. وسيتم ملء جميع الأعمدة المحددة بالبيانات أو الصيغة، كما هو الحال في الخلية الأولى. في مثالنا، كتبنا الرقم 800 في الخلية D2، العمود D.



الطريق الثالث.
في عمود جديد (في مثالنا، العمود E)، حدد الخلايا. اضغط على المفتاح F5. سيظهر مربع حوار الانتقال. انقر فوق الزر "تحديد...". وفي مربع الحوار الجديد "تحديد مجموعة من الخلايا"، حدد المربع المجاور للكلمات "الخلايا المرئية فقط". انقر فوق "موافق". الآن، دون إلغاء التحديد، في الخلية الأولى من العمود (خلتنا هي E2)، أدخل الصيغة والرقم وما إلى ذلك. اضغط على مجموعة المفاتيح "Ctrl" + "أدخل".

بافلوف نيكولاي

في هذه المقالة أود أن أقدم لك التقنيات الأكثر فعالية للعمل فيها مايكروسوفت اكسل، جمعتها خلال السنوات العشر الماضية من العمل في المشاريع وإجراء التدريبات على هذا البرنامج الرائع. لا يوجد وصف للتقنيات فائقة التعقيد هنا، ولكن هناك تقنيات لكل يوم - بسيطة وفعالة، موصوفة بدون "ماء" - فقط "بقايا جافة". لن تستغرق معظم هذه الأمثلة أكثر من دقيقة أو دقيقتين لإتقانها، ولكنها ستساعدك على توفير المزيد.

انتقل بسرعة إلى الورقة المطلوبة

هل تجد نفسك تعمل مع مصنفات Excel التي تتكون من عدد كبير من الأوراق؟ إذا كان هناك أكثر من عشرة منهم، فإن كل انتقال إلى الورقة المطلوبة التالية يصبح مشكلة صغيرة في حد ذاته. الحل البسيط والأنيق لهذه المشكلة هو النقر في الركن الأيسر السفلي من النافذة على الأزرار لتمرير علامات تبويب الورقة ليس باليسار، ولكن بزر الفأرة الأيمن - سيظهر جدول محتويات الكتاب مع القائمة الكاملةجميع الأوراق ويمكنك الذهاب إلى الورقة المطلوبة في حركة واحدة:

يعد هذا أسرع بكثير من التمرير عبر علامات تبويب الأوراق باستخدام نفس الأزرار بحثًا عما تحتاجه.


نسخ دون الإضرار بالتنسيق

كم مئات (الآلاف؟) من المرات التي رأيت فيها هذه الصورة وأنا أقف خلف طلابي أثناء التدريبات: يقوم المستخدم بإدخال صيغة في الخلية الأولى ثم "يمددها" عبر العمود بأكمله، منتهكًا تنسيق الصفوف أدناه، نظرًا لأن هذه الطريقة لا تقوم بنسخ الصيغة فحسب، بل تقوم أيضًا بنسخ تنسيق الخلية. وفقًا لذلك، سيتعين عليك بعد ذلك تصحيح الضرر يدويًا. ثانية للنسخ ثم 30 لإصلاح تصميم تالف بسبب النسخ.

بدءًا من Excel 2002، يوجد حل لهذه المشكلة بسيط وأنيق. مباشرة بعد نسخ (سحب) الصيغة إلى العمود بأكمله، تحتاج إلى استخدام علامة ذكية - رمز صغير يظهر مؤقتًا في الركن الأيمن السفلي من النطاق. سيؤدي النقر عليه إلى عرض قائمة بخيارات النسخ الممكنة، حيث يمكنك تحديد تعبئة بدون تنسيق. في هذه الحالة، يتم نسخ الصيغ، لكن التنسيق لا:


نسخ الخلايا المرئية فقط

إذا كنت تعمل في Microsoft Excel لأكثر من أسبوع، فمن المؤكد أنك واجهت بالفعل مشكلة مماثلة: في بعض الحالات، عند نسخ الخلايا ولصقها، يتم إدراج خلايا أكثر مما تم نسخه للوهلة الأولى. قد يحدث هذا إذا كان النطاق المنسوخ يتضمن صفوفًا/أعمدة مخفية، أو مجموعات، أو إجماليات فرعية، أو تصفية. ولنأخذ إحدى هذه الحالات كمثال:

في هذا الجدول، يتم حساب الإجماليات الفرعية ويتم تجميع الصفوف حسب المدينة - يسهل فهم ذلك من خلال أزرار الزائد والناقص الموجودة على يسار الجدول ومن خلال الفواصل في الترقيم خطوط مرئية. إذا قمنا بتحديد البيانات من هذا الجدول ونسخها ولصقها بالطريقة المعتادة، فسوف نحصل في النهاية على 24 صفًا إضافيًا. نريد فقط نسخ النتائج ولصقها!

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

حدد النطاق المراد نسخه (في مثالنا هو A1:C29)

اضغط على المفتاح F5 على لوحة المفاتيح، ثم على الزر "تحديد" في النافذة التي تفتح.
ستظهر نافذة تسمح للمستخدم باختيار ليس كل شيء في الصف، ولكن فقط الخلايا الضرورية:

في هذه النافذة، حدد الخيار الخلايا المرئية فقط وانقر فوق موافق.

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

إذا كنت تشك في أنه سيتعين عليك إجراء مثل هذه العملية في كثير من الأحيان، فمن المنطقي إضافة زر إلى شريط أدوات Microsoft Excel لاستدعاء هذه الوظيفة بسرعة. يمكن القيام بذلك من خلال القائمة "أدوات> تخصيص"، ثم انتقل إلى علامة التبويب "الأوامر"، وفي فئة "تحرير"، ابحث عن الزر "تحديد الخلايا المرئية" واسحبه إلى شريط الأدوات باستخدام الماوس:


تحويل الصفوف إلى أعمدة والعودة مرة أخرى

عملية بسيطة، ولكن إذا كنت لا تعرف كيفية القيام بها بشكل صحيح، فيمكنك قضاء نصف يوم في سحب الخلايا الفردية يدويًا:

انها في الواقع بسيطة. في ذلك الجزء من الرياضيات العليا الذي يصف المصفوفات، يوجد مفهوم التبديل - وهو إجراء يقوم بتبديل الصفوف والأعمدة في المصفوفة مع بعضها البعض. في Microsoft Excel، يتم تنفيذ ذلك في ثلاث خطوات: انسخ الجدول

انقر بزر الماوس الأيمن على خلية فارغة وحدد "لصق خاص".

في النافذة التي تفتح، حدد علامة Transpose وانقر فوق OK:


إضافة البيانات بسرعة إلى الرسم البياني

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

هناك طريقة أخرى - بسيطة وسريعة وجميلة - وهي تحديد الخلايا التي تحتوي على بيانات جديدة، ونسخها (CTRL+C) ولصقها (CTRL+V) مباشرة في المخطط. يدعم Excel 2003، على عكس الإصدارات الأحدث، القدرة على سحب نطاق محدد من خلايا البيانات وإفلاته مباشرة في المخطط باستخدام الماوس!

إذا كنت تريد التحكم في جميع الفروق الدقيقة والدقيقة، فيمكنك استخدام لصق خاص وليس عاديًا عن طريق تحديد تحرير> لصق خاص من القائمة. في هذه الحالة، سيعرض Microsoft Excel مربع حوار يسمح لك بتكوين مكان وكيفية إضافة البيانات الجديدة بالضبط:

وبالمثل، يمكنك بسهولة إنشاء مخطط باستخدام بيانات من جداول مختلفة من أوراق مختلفة. إن أداء نفس المهمة بالطريقة الكلاسيكية سيستغرق المزيد من الوقت والجهد.


ملء الخلايا الفارغة

بعد تنزيل التقارير من بعض البرامج إلى تنسيق Excel أو عند إنشاء جداول محورية، غالبًا ما يتلقى المستخدمون جداول تحتوي على خلايا فارغة في بعض الأعمدة. لا تسمح لك هذه الإغفالات بتطبيق أدوات مألوفة ومريحة مثل التصفية التلقائية والفرز على الجداول. وبطبيعة الحال، هناك حاجة لملء الفراغات بقيم من الخلايا ذات المستوى الأعلى:

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

هناك طريقة لحل هذه المشكلة بسرعة وبشكل جميل باستخدام صيغة واحدة:

حدد كافة الخلايا في عمود به مسافات فارغة (أي النطاق A1:A12 في حالتنا)

للاحتفاظ بالخلايا الفارغة فقط في التحديد، اضغط على المفتاح F5 وفي نافذة التنقل التي تفتح، اضغط على الزر تحديد. ستظهر لك نافذة تسمح لك بتحديد الخلايا التي نريد تحديدها:

اضبط المفتاح على "فارغ" ثم انقر فوق "موافق". الآن يجب أن تبقى الخلايا الفارغة فقط في التحديد:

دون تغيير الاختيار، أي. دون لمس الماوس، أدخل الصيغة في الخلية الأولى المحددة (A2). اضغط على علامة المساواة بلوحة المفاتيح ثم على السهم لأعلى. نحصل على صيغة تشير إلى الخلية السابقة:

لإدخال الصيغة التي تم إنشاؤها في جميع الخلايا الفارغة المحددة مرة واحدة، اضغط ليس على المفتاح ENTER، ولكن على المجموعة CTRL + ENTER. سوف تملأ الصيغة كافة الخلايا الفارغة:

الآن كل ما تبقى هو استبدال الصيغ بالقيم لتسجيل النتائج. حدد النطاق A1:A12، وانسخه والصق قيمه في الخلايا باستخدام لصق خاص.


القائمة المنسدلة في الخلية

تقنية يجب أن يعرفها دون مبالغة كل من يعمل في برنامج Excel. يمكن أن يؤدي استخدامه إلى تحسين أي جدول تقريبًا، بغض النظر عن الغرض منه. في جميع الدورات التدريبية، أحاول إظهار ذلك لطلابي في اليوم الأول.

الفكرة بسيطة للغاية - في جميع الحالات التي يتعين عليك فيها إدخال البيانات من أي مجموعة، بدلاً من إدخال خلية يدويًا من لوحة المفاتيح، حدد القيمة المطلوبة باستخدام الماوس من القائمة المنسدلة:

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

لإنشاء قائمة منسدلة في خلية:

حدد الخلايا التي تريد إنشاء قائمة منسدلة فيها.

إذا كان لديك Excel 2003 أو إصدار أقدم، فحدد البيانات>التحقق من الصحة من القائمة. إذا كان لديك Excel 2007/2010، فانتقل إلى علامة التبويب "بيانات" وانقر فوق الزر "التحقق من صحة البيانات".

في النافذة التي تفتح، حدد خيار القائمة من القائمة المنسدلة.

في الحقل المصدر، يجب عليك تحديد القيم التي يجب أن تكون في القائمة. فيما يلي الخيارات الممكنة:

أدخل خيارات النص في هذا الحقل مفصولة بفواصل منقوطة

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

إذا كان موجودًا في ورقة أخرى من هذا المصنف، فسيتعين عليك إعطاؤه اسمًا مسبقًا (حدد الخلايا، اضغط على CTRL+F3، أدخل اسم النطاق بدون مسافات)، ثم اكتب هذا الاسم في الحقل


التنسيق الشرطي (5)
القوائم والنطاقات (5)
وحدات الماكرو (إجراءات VBA) (63)
متنوعة (39)
الأخطاء ومواطن الخلل في Excel (4)

كيفية لصق الخلايا المنسوخة في الخلايا المرئية/المصفاة فقط

بشكل عام، أعتقد أن معنى المقال واضح بالفعل من العنوان. سأقوم بتوسيعها قليلاً.

ليس سراً أن برنامج Excel يسمح لك بتحديد الصفوف المرئية فقط (على سبيل المثال، إذا تم إخفاء بعضها أو تم تطبيق عامل التصفية).

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

انسخ نطاقًا واحدًا من الخلايا والصقه في الخلايا المرئية فقط
لإدراج البيانات في الخلايا المرئية فقط، يمكنك استخدام الماكرو التالي:

الخيار الصريح rCopyRange كنطاق "باستخدام هذا الماكرو نقوم بنسخ البيانات Sub My_Copy() إذا Selection.Count > 1 ثم قم بتعيين rCopyRange = Selection.SpecialCells(xlVisible) آخر: Set rCopyRange = ActiveCell End If End Sub "باستخدام هذا الماكرو نقوم بإدراج البيانات بدءًا من الخلية المحددة Sub My_Paste() إذا كان rCopyRange لا شيء، فاخرج من Sub إذا كان rCopyRange.Areas.Count > 1 ثم MsgBox "يجب ألا يحتوي النطاق الملصق على أكثر من منطقة واحدة!"،فبكريتيكال، "النطاق غير صالح": الخروج من Sub Dim rCell كنطاق، li As Long، le As Long، lCount As Long، iCol كعدد صحيح، iCalculation كعدد صحيح Application.ScreenUpdating = False iCalculation = Application.Calculation: Application.Calculation = -4135 لـ iCol = 1 إلى rCopyRange .Columns.Count li = 0: lCount = 0: le = iCol - 1 لكل rCell في rCopyRange.Columns(iCol).تفعل الخلايا إذا ActiveCell.Offset(li, le).EntireColumn.Hidden = False And _ ActiveCell.Offset (li, le).EntireRow.Hidden = False ثم rCell.Copy ActiveCell.Offset(li, le): lCount = lCount + 1 End If li = li + 1 حلقة أثناء lCount >= rCell.Row - rCopyRange.Cells(1 ).الصف التالي rCell التالي iCol Application.ScreenUpdating = صحيح: Application.Calculation = iCalculation End Sub

الخيار الصريح Dim rCopyRange As Range "استخدم هذا الماكرو لنسخ البيانات Sub My_Copy() If Selection.Count > 1 ثم Set rCopyRange = Selection.SpecialCells(xlVisible) Else: Set rCopyRange = ActiveCell End If End Sub "استخدم هذا الماكرو للصق البيانات التي تبدأ من الخلايا المحددة Sub My_Paste() إذا كان rCopyRange لا شيء، ثم قم بالخروج من Sub إذا كان rCopyRange.Areas.Count > 1 ثم MsgBox "يجب ألا يحتوي النطاق الملصق على أكثر من منطقة واحدة!"، vbCritical، "نطاق غير صالح": خروج Sub Dim rCell كنطاق، li As Long، le As Long، lCount As Long، iCol كعدد صحيح، iCalculation كعدد صحيح Application.ScreenUpdating = False iCalculation = Application.Calculation: Application.Calculation = -4135 لـ iCol = 1 إلى rCopyRange.Columns .Count li = 0: lCount = 0: le = iCol - 1 لكل rCell في rCopyRange.Columns(iCol).تفعل الخلايا إذا ActiveCell.Offset(li, le).EntireColumn.Hidden = False And _ ActiveCell.Offset(li , le).EntireRow.Hidden = False ثم rCell.Copy ActiveCell.Offset(li, le): lCount = lCount + 1 End If li = li + 1 Loop while lCount >= rCell.Row - rCopyRange.Cells(1). الصف التالي rCell التالي iCol Application.ScreenUpdating = صحيح: Application.Calculation = iCalculation End Sub

لإكمال الصورة، من الأفضل تعيين وحدات الماكرو هذه لمفاتيح التشغيل السريع (في الرموز أدناه، يتم ذلك تلقائيًا عند فتح كتاب باستخدام الرمز). للقيام بذلك، تحتاج فقط إلى نسخ الرموز أدناه في الوحدة النمطية هذا الكتاب (هذا المصنف) :

خيار صريح "إلغاء تعيين مفاتيح التشغيل السريع قبل إغلاق المصنف Private Sub Workbook_BeforeClose(Cancel As Boolean) Application.OnKey "^q": Application.OnKey "^w" End Sub "تعيين مفاتيح التشغيل السريع عند فتح المصنف تطبيق Private Sub Workbook_Open() .OnKey "^q"، "My_Copy": Application.OnKey "^w"، "My_Paste" End Sub

يمكنك الآن نسخ النطاق المطلوب بالضغط على المفاتيح كنترول + س ، وأدخله في المرشح - كنترول + ث .

تنزيل المثال

(46.5 كيلو بايت، 9,622 تنزيل)

انسخ الخلايا المرئية فقط والصقها في الخلايا المرئية فقط
وبناءً على طلب زوار الموقع، قررت تحسين هذا الإجراء. أصبح من الممكن الآن نسخ أي نطاقات: مع الصفوف المخفية والأعمدة المخفية ولصق الخلايا المنسوخة أيضًا في أي نطاقات: مع الصفوف المخفية والأعمدة المخفية. إنه يعمل بنفس الطريقة السابقة تمامًا: عن طريق الضغط على المفاتيح كنترول + س انسخ النطاق المطلوب (مع صفوف وأعمدة مخفية/مصفاة أو غير مخفية)، والصقه باستخدام اختصار لوحة المفاتيح كنترول + ث . يتم إجراء الإدراج أيضًا في صفوف وأعمدة مخفية/مصفاة أو بدون تلك المخفية.
إذا كان النطاق المنسوخ يحتوي على صيغ، لتجنب إزاحة المرجع، يمكنك نسخ قيم الخلية فقط - أي. عند إدراج القيم، لن يتم إدراج الصيغ، ولكن نتيجة حسابها. أو إذا كان من الضروري الحفاظ على تنسيقات الخلايا التي يتم الإدراج فيها، فسيتم نسخ ولصق قيم الخلية فقط. للقيام بذلك، تحتاج إلى استبدال السطر في الكود (في الملف أدناه):

rCell.Copy rResCell.Offset(lr, lc)

rCell.Copy rResCell.Offset(lr, lc)

إلى هذا:

rResCell.Offset(lr, lc) = rCell.Value

rResCell.Offset(lr, lc) = rCell.Value

كلا هذين الخطين موجودان في الملف أدناه، ما عليك سوى ترك الخط الأكثر ملاءمة لمهامك.

تنزيل المثال:

(54.5 كيلو بايت، 7,928 تنزيل)


انظر أيضا:
[]

هل ساعد المقال؟ شارك الرابط مع أصدقائك! دروس الفيديو

("الشريط السفلي":("textstyle": "static"، "textpositionstatic": "bottom"، "textautohide": true، "textpositionmarginstatic":0، "textpositiondynamic": "bottomleft"، "textpositionmarginleft": 24،" textpositionmarginright":24,"textpositionmargintop":24,"textpositionmarginbottom":24,"texteffect":"slide",texteffecteasing":"easeOutCubic",texteffectduration":600,"text Effectslidedirection":left",text Effectslidedistance" :30،texteffectdelay":500،textefffectseparate":false،texteffect1":slide"،text Effectslidedirection1":right"،text Effectslidedistance1":120،texteffecteasing1":easeOutCubic"،texteffectduration1":600 "texteffectdelay1":1000"،texteffect2":slide"،text Effectslidedirection2":right"،text Effectslidedistance2":120،texteffecteasing2":easeOutCubic"،texteffectduration2":600،texteffectdelay2":1500،" textcss":"display:block; text-align:left;",textbgcss":"display:absolute:0px; "،"titlecss": "display:block؛ الموقف:نسبي؛ الخط: غامق 14px \"Lucida Sans Unicode\"،\"Lucida Grande\"،sans-serif،Arial؛ اللون:#fff;"،"descriptioncss": "display:block; الموقف:نسبي؛ الخط: 12px \"Lucida Sans Unicode\"،\"Lucida Grande\"،sans-serif،Arial؛ اللون: #ففف؛ الهامش العلوي:8px;,"buttoncss":display:block; الموقف:نسبي؛ هامش أعلى:8px;"،"،texteffect Response":true،"texteffect Responsesize":640، "titlecss Response": "font-size:12px؛"، "descriptioncss Response": "display:none !important؛"، "buttoncss Response": " ""،"،addgooglefonts":false،"googlefonts":"،"،textleftrightpercentforstatic":40))