كيفية تصدير الرسوم البيانية إلى رسومات في Excel؟
في Excel، قد تقوم أحيانًا بتوليد بعض الرسوم البيانية من البيانات لجعل البيانات تبدو أكثر وضوحًا ومباشرة. إذا كنت ترغب في حفظ أو تصدير هذه الرسوم البيانية كرسومات لغرض معين، كيف يمكنك القيام بذلك؟
تصدير مخطط إلى رسم بياني باستخدام كود VBA
تصدير عدة مخططات/صور/أشكال إلى رسومات باستخدام Kutools لـ Excel 
تصدير مخطط إلى رسم بياني باستخدام كود VBA
يمكن أن يساعدك الكود التالي VBA في تصدير مخطط محدد من ورقة العمل النشطة كصورة. وسيتم حفظ الصورة في نفس الموقع الذي تم فيه تطبيق المصنف. اتبع الخطوات التالية:
1. حدد المخطط الذي تريد تصديره.
2. ثم اضغط باستمرار على مفتاحي ALT + F11، وسيفتح نافذة Microsoft Visual Basic for Applications.
3. انقر فوق إدراج > وحدة، والصق الكود التالي في نافذة الوحدة.
VBA: تصدير المخطط إلى رسم بياني
Option Explicit
Sub ExportChart()
Const sSlash$ = "/"
Const sPicType$ = ".gif"
Dim sChartName$
Dim sPath$
Dim sBook$
Dim objChart As ChartObject
On Error Resume Next
Set objChart = ActiveSheet.ChartObjects(1)
If objChart Is Nothing Then
MsgBox "No charts have been detected on this sheet", 0
Exit Sub
End If
If ActiveChart Is Nothing Then
MsgBox "You must select a single chart for exporting ", 0
Exit Sub
End If
Start:
sChartName = Application.InputBox("Please Specify a name for the exported chart" & vbCr & _
"There is no default name available" & vbCr & _
"The chart will be saved in the same folder as this file", "Chart Export", "")
If sChartName = Empty Then
MsgBox "You have not entered a name for this chart", , "Invalid Entry"
Goto Start
End If
If sChartName = "False" Then
Exit Sub
End If
sBook = ActiveWorkbook.Path
sPath = sBook & sSlash & sChartName & sPicType
ActiveChart.Export Filename:=sPath, FilterName:="GIF"
End Sub4. ثم اضغط على مفتاح F5 لتشغيل هذا الكود، وأدخل الاسم للمخطط المصدر في مربع الحوار كما هو موضح في اللقطة:
5. وبعد ذلك انقر فوق موافق، سيتم تصدير المخطط المحدد بتنسيق Gif وحفظه في نفس موقع الملف الأصلي. شاهد اللقطة:
مع الكود VBA أعلاه، يمكنك تصدير مخطط واحد فقط في كل مرة. إذا كنت ترغب في تصدير مخططات أخرى، يرجى تحديد مخطط آخر أولاً، ثم تصديره باستخدام الكود.
تصدير عدة مخططات/صور/أشكال إلى رسومات باستخدام Kutools لـ Excel
أداة تصدير الرسومات الخاصة بـ Kutools لـ Excel يمكنها تصدير عدة مخططات، صور أو أشكال دفعة واحدة في Excel.
بعد تثبيت Kutools لـ Excel، يرجى القيام بما يلي: (تنزيل مجاني لـ Kutools لـ Excel الآن!)
1. انقر فوق Kutools Plus > استيراد / تصدير > تصدير الرسومات، شاهد اللقطة:
2في تصدير الرسومات مربع الحوار، جميع المخططات, الصور و الأشكال قد تم سردها في مربع القائمة على اليسار، حدد النوع الذي تريد تصديره، ثم انقر فوق الزر
لتحديد دليل لحفظ الرسومات المصدرة. وفي الوقت نفسه، يمكنك اختيار تنسيق الصور من قائمة تنسيق التصدير حسب الحاجة، مثل GIF, JPEG, TIF أو PNG.
3. ثم انقر فوق موافق، سيتم تصدير جميع المخططات والصور والأشكال بنجاح إلى الموقع المحدد. شاهد اللقطات:
 |
 |
 |
عرض توضيحي: تصدير الرسومات
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في Excel باستخدام Kutools لـ Excel، واختبر كفاءة غير مسبوقة. Kutools لـ Excel يوفر أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة الأكثر أهمية بالنسبة لك...
Office Tab يجلب واجهة التبويب إلى Office ويجعل عملك أسهل بكثير
- تفعيل تحرير وقراءة عبر التبويبات في Word، Excel، PowerPoint، Publisher، Access، Visio وProject.
- افتح وأنشئ عدة مستندات في تبويبات جديدة في نفس النافذة، بدلاً من نوافذ مستقلة.
- يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات اليومية من الفأرة!
جميع إضافات Kutools. مثبت واحد
حزمة Kutools for Office تجمع بين إضافات Excel وWord وOutlook وPowerPoint إضافة إلى Office Tab Pro، وهي مثالية للفرق التي تعمل عبر تطبيقات Office.
- حزمة الكل في واحد — إضافات Excel وWord وOutlook وPowerPoint + Office Tab Pro
- مثبّت واحد، ترخيص واحد — إعداد في دقائق (جاهز لـ MSI)
- الأداء الأفضل معًا — إنتاجية مُبسطة عبر تطبيقات Office
- تجربة كاملة لمدة30 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد