كيفية إدراج جدول عائم أو مربع نص في ورقة عمل Excel؟

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

أدخل الجدول العائم في Excel مع رمز VBA

قم بإدراج مربع نص عائم في Excel برمز VBA

أدخل الجدول العائم في Excel مع رمز VBA

لا توجد طريقة مباشرة لإدراج الجدول العائم ، لذلك تحتاج إلى تحويل بيانات الجدول إلى صورة ، ثم تطبيق رمز لإنهائه ، يرجى القيام بذلك على النحو التالي:

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

2. في خرجت نسخ الصورة مربع الحوار، حدد كما هو موضح على الشاشة من مظهر قسم واختيار صورة تحت شكل ، انقر فوق OK لإغلاق مربع الحوار ، ثم انقر فوق خلية لإخراج الصورة ، ثم اضغط أخيرًا CTRL + V للصق هذه الصورة ، انظر لقطة الشاشة:

3. بعد تحويل الجدول إلى صورة ، انقر بزر الماوس الأيمن فوق علامة تبويب الورقة التي تحتوي على صورة الجدول التي تريد أن تظل مرئية دائمًا ، واختر عرض الرمز من قائمة السياق ، وفتح Microsoft Visual Basic للتطبيقات نافذة ، انسخ والصق الكود التالي في الوحدة النمطية الفارغة:

كود فبا: إدراج الجدول العائم في إكسل:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
    Application.ScreenUpdating = False
    If Target.Cells.Count > 1 Then Exit Sub
        With ActiveSheet.Shapes("Picture1")
            .Top = ActiveWindow.VisibleRange.Top + 5
            .Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - .Width - 45
        End With
    Application.ScreenUpdating = False
End Sub

ملاحظة: في هذا الرمز ، Picure1 هو اسم الصورة الذي قمت بإنشائه ، يرجى تغييره حسب حاجتك.

4. ثم احفظ وأغلق نافذة الكود ، الآن ، عندما تقوم بالتمرير في ورقة العمل والنقر فوق خلية ، تظل صورة الجدول دائمًا في الزاوية اليمنى العلوية من ورقة العمل.

قم بإدراج مربع نص عائم في Excel برمز VBA

لإدراج مربع نص عائم ، يوجد هنا أيضًا رمز VBA لحل هذه المهمة.

1. أولاً ، يجب عليك إدراج مربع نص من ملف المطور ، انقر فوق المطور > إدراج > مربع نص (عنصر تحكم ActiveX)، ثم ارسم مربع النص ، وأدخل المعلومات في مربع النص حسب حاجتك. انظر لقطة الشاشة:

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

كود فبا: إدراج مربع نص عائم في إكسيل:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
    Application.ScreenUpdating = False
    With ActiveWindow.VisibleRange
        TextBox1.Top = .Top + 5
        TextBox1.Left = .Left + .Width - TextBox1.Width - 45
    End With
    Application.ScreenUpdating = True
End Sub

ملاحظة: في هذا الرمز ، مربع النص 1 هو اسم مربع النص الذي أدخلته ، يرجى تغييره حسب حاجتك.

3. ثم احفظ وأغلق نافذة التعليمات البرمجية ، الآن ، عندما تقوم بتمرير ورقة العمل إلى أي مكان ، يتم الاحتفاظ دائمًا بمربع النص المدرج في الزاوية اليمنى العليا من ورقة العمل.

---

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

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

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

اقرأ أكثر... تحميل مجاني ... شراء... 

---

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

• تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
• فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
• يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!

اقرأ أكثر... تحميل مجاني ... شراء...