نصيحة: اللغات الأخرى مترجمة من قبل Google. يمكنك زيارة English نسخة من هذا الرابط.
تسجيل الدخول
x
or
x
x
التسجيل
x

or

كيفية استخدام زر الأوامر لحفظ ورقة عمل نشطة كملف بدف في إكسيل؟

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

استخدم زر الأمر لحفظ ورقة العمل النشطة كملف بدف مع رمز فبا

حفظ مجموعة من الخلايا المحددة كملف بدف مع كوتولس ل إكسيل

حفظ كل ورقة عمل كملف بدف الفردية من المصنف النشط مع كوتولس ل إكسيل


حفظ بسهولة التحديد كملف بدف في إكسيل:

انقر مشروع > استيراد و تصدير > تصدير نطاق إلى ملف. ال كوتولس ل إكسيل's تصدير نطاق إلى ملف الأداة المساعدة يساعدك بسهولة تصدير التحديد كملف بدف في إكسيل. انظر أدناه سكرينشوت:

كوتولس ل إكسيل يتضمن أكثر من أدوات إكسوم إكسيل مفيد. مجانا في محاولة مع عدم وجود قيود في أيام شنومكس. تنزيل النسخة التجريبية المجانية الآن

اختيار المستند إلى قوات الدفاع الشعبي

علامة تبويب Office تمكين التحرير والتصفح في Tabbed ، وجعل عملك أسهل بكثير ...
Kutools for Excel يحل معظم مشاكلك ، ويزيد من إنتاجيتك بنسبة 80٪
  • إعادة استخدام أي شيء: أضف الصيغ الأكثر استخدامًا أو تعقيدًا والمخططات وأي شيء آخر إلى مفضلاتك ، ثم أعد استخدامها سريعًا في المستقبل.
  • أكثر من ميزات نص 20: استخراج الرقم من سلسلة النص ؛ استخراج أو إزالة جزء من النصوص ؛ تحويل الأرقام والعملات إلى الكلمات الإنجليزية ...
  • دمج الأدوات: العديد من المصنفات والأوراق في واحد ؛ دمج خلايا / صفوف / أعمدة متعددة دون فقدان البيانات ؛ دمج الصفوف المكررة ومجموع ...
  • أدوات الانقسام: تقسيم البيانات إلى أوراق متعددة بناءً على القيمة ؛ مصنف واحد إلى ملفات Excel أو PDF أو CSV متعددة ؛ عمود واحد إلى أعمدة متعددة ...
  • لصق الطفر الصفوف المخفية / المصفاة ؛ عدد ومبلغ بواسطة لون الخلفية. إنشاء قائمة بريدية و إرسال رسائل البريد الإلكتروني حسب قيمة الخلية...
  • فلتر سوبر: إنشاء مخططات تصفية متقدمة وتطبيقها على أي أوراق ؛ فرز حسب الأسبوع ، اليوم ، التردد وغير ذلك ؛ تصفية / فلترة بواسطة جريئة ، الصيغ ، التعليق ...
  • أكثر من ميزات 300 القوية ؛ يعمل مع Office 2007-2019 و 365 ؛ يدعم جميع اللغات ؛ سهولة النشر في مؤسستك أو مؤسستك.

استخدم زر الأمر لحفظ ورقة العمل النشطة كملف بدف مع رمز فبا


يمكنك تشغيل التعليمات البرمجية فبا التالية لحفظ ورقة عمل نشطة كملف بدف بالنقر فوق زر أمر. يرجى القيام على النحو التالي.

1. أولا، تحتاج إلى إنشاء مجلد باسم بدف لحفظ ملف بدف المحول الجديد. هنا إنشاء هذا المجلد في القرص المحلي (C :).

2. الرجاء إدخال زر أمر بالنقر المطور > إدراج > زر الأوامر (تحكم أكتيفكس). انظر لقطة الشاشة:

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

3. في ال العقارات مربع الحوار، أدخل النص المعروض من زر الأوامر في شرح مربع تحت مصنف ثم قم بإغلاق مربع الحوار.

يمكنك أن ترى يتم تغيير النص المعروض من زر الأوامر كما تظهر أدناه قطة.

4. انقر بزر الماوس الأيمن فوق الزر كوماند مرة أخرى، ثم انقر فوق عرض الرمز من قائمة النقر بزر الماوس الأيمن.

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

رمز فبا: زر كوماند لحفظ ورقة العمل النشطة كملف بدف

Private Sub CommandButton1_Click()
    Application.ScreenUpdating = False
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
            Filename:="C:\PDF\Export.pdf", _
            OpenAfterPublish:=False
    Application.ScreenUpdating = True
End Sub

ملاحظة:: في التعليمات البرمجية، كوماندبوتونسنومكس هو اسم زر الأمر الذي سوف تستخدم لحفظ ورقة نشطة كملف بدف. "C: \ بدف \ Export.pdf" هو مسار واسم ملف حفظ بدف الخاص بك.

6. اضغط على قديم + Q مفاتيح في وقت واحد لإغلاق ميكروسوفت فيسوال باسيك للتطبيقات نافذة او شباك. ثم إيقاف تشغيل وضع التصميم تحت المطور علامة التبويب.

الآن، انقر على زر الأوامر، سيتم حفظ ورقة العمل النشطة كملف بدف المسمى تصدير وتقع في الموقع المحدد.


حفظ مجموعة من الخلايا المحددة كملف بدف مع كوتولس ل إكسيل

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

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

2. في ال تصدير نطاق إلى ملف مربع الحوار، تحتاج إلى:

شنومكس حدد PDF الخيار في قسم تنسيق الملف؛

شنومك حدد مجلد لحفظ ملف بدف الخاص بك في حفظ الاتجاه قسم.

شنومك انقر فوق OK .

شنومكس قم بتسمية ملف بدف الخاص بك في مربع التصدير الثاني إلى ملف، ثم انقر فوق OK زر. انظر لقطة الشاشة:

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

الآن يتم حفظ النطاق المحدد كملف بدف.

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


حفظ كل ورقة عمل كملف بدف الفردية من المصنف النشط مع كوتولس ل إكسيل

يمكنك استخدام سبليت وركبوك فائدة كوتولس ل إكسيل لحفظ كل ورقة عمل في مصنف نشط كملف بدف فردي بسهولة.

كوتولس ل إكسيل : مع أكثر من شنومكس مفيد اكسل الإضافية، مجانا في محاولة مع عدم وجود قيود في أيام شنومكس.

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

2. في ال سبليت وركبوك مربع الحوار، يمكنك ان ترى يتم سرد كافة أوراق العمل في الداخل، يرجى تحديد بدف (* .pdf) الخيار من حفظ كنوع القائمة المنسدلة، ثم انقر فوق الانقسام زر. وفي ظهرت تصفح للحافظة مربع الحوار، حدد مجلد حيث تريد حفظ ملفات بدف، ثم انقر فوق OK زر. انظر لقطة الشاشة:

ثم يتم حفظ كافة أوراق العمل في المصنف النشط كملف بدف فردي على الفور.

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


عرض توضيحي: حفظ التحديد أو كل ورقة عمل كملف بدف مع كوتولس ل إكسيل

كوتولس ل إكسيل يتضمن أكثر من أدوات إكسوم إكسيل مفيد. مجانا في محاولة مع عدم وجود قيود في أيام شنومكس. تنزيل النسخة التجريبية المجانية الآن!


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


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

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

علامة تبويب Office توفر واجهة مبوبة لـ Office ، واجعل عملك أسهل بكثير

  • تمكين تحرير علامات التبويب والقراءة في Word و Excel و PowerPointوالناشر والوصول ، Visio ومشروع.
  • افتح مستندات متعددة وقم بإنشائها في علامات تبويب جديدة لنفس النافذة ، وليس في نوافذ جديدة.
  • يزيد إنتاجيتك بنسبة 50٪ ، ويقلل مئات نقرات الماوس لك كل يوم!
أسفل مكتبه
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    atul tailor · 4 months ago
    plz paste coding for save as pdf button in microsoft excel
  • To post as a guest, your comment is unpublished.
    Nzee · 10 months ago
    IT SHOWS Run-Time error '1004'
    • To post as a guest, your comment is unpublished.
      crystal · 9 months ago
      Hi Nzee,
      I need to know your Excel version. Thank you for your comment.
  • To post as a guest, your comment is unpublished.
    Randy · 1 years ago
    I can convert my files to PDF now with a command button, but can I also get that same function to allow a different name to each file; based on an existed number structure?
  • To post as a guest, your comment is unpublished.
    Jo Colenso · 1 years ago
    I have a similar request I want the file to be named the same as a particular cell in the tab , IE: G19 ( This is the invoice number and I want the file to save as PDF with that name) ? . I have managed to get the export.pdf working but this isn't going to work on multiple saves.Any thoughts thanks
    • To post as a guest, your comment is unpublished.
      crystal · 1 years ago
      Good Day,
      The following VBA code can help you solve the problem. Please select cell G19 in the popping up Kutoos for Excel dialog box after running the code. Thank you for your comment.

      Private Sub CommandButton1_Click()
      Dim xRg As Range
      Dim xName As String
      On Error Resume Next
      Application.ScreenUpdating = False
      Set xRg = Application.InputBox("Select the cell you will name the PDF with the cell value:", "Kutools for Excel", Selection.Address, , , , , 8)
      If xRg Is Nothing Then Exit Sub
      xName = xRg(1).Value
      ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
      Filename:="C:\PDF\" & xName & ".pdf", _
      OpenAfterPublish:=False
      Application.ScreenUpdating = True
      End Sub
  • To post as a guest, your comment is unpublished.
    Ian · 2 years ago
    Hi,
    How would one allow the user to enter the file name as opposed to "Export.pdf"?
    Thanks,
    Ian
    • To post as a guest, your comment is unpublished.
      Mayur · 1 years ago
      Sub SaveAsPDF()
      Application.Screen Updating = False
      ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
      Filename:=Application.InputBox("Enter File Name")

      strExcelPath = "H:\My Documents"

      Application.ScreenUpdating = True
      End Sub