كيفية حفظ ملف Excel بقيمة الخلية؟
عند استخدام مصنف ، هل فكرت يومًا في حفظ ملف Excel استنادًا إلى محتوى خلية؟ على سبيل المثال ، لديك "سعر البيع" في الخلية A1 ، وتريد حفظ المصنف باسم سعر البيع. بالطبع ، يمكنك كتابة الاسم في مربع الحوار حفظ باسم ، ثم حفظه. لكن هذه ستكون طريقة غير فعالة في مقدار عملك. اليوم سأتحدث عن خدعة سريعة لحلها.
احفظ ملف Excel بقيمة خلية محددة باستخدام التعليمات البرمجية لـ VBA
احفظ ملف Excel بقيمة خلية محددة باستخدام التعليمات البرمجية لـ VBA
قد تساعدك التعليمات البرمجية لـ VBA التالية في حفظ المصنف بقيمة خلية محددة ، يرجى القيام بما يلي:
1. اضغط باستمرار على ALT + F11 مفاتيح لفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.
2. انقر إدراج > وحدة، والصق الكود التالي في ملف نافذة الوحدة.
كود فبا: احفظ ملف إكسل بقيمة خلية محددة
Private Sub filename_cellvalue()
'Update 20141112
Dim Path As String
Dim filename As String
Path = "C:\Users\dt\Desktop\my information\"
filename = Range("A1")
ActiveWorkbook.SaveAs filename:=Path & filename & ".xls", FileFormat:=xlNormal
End Sub
3. ثم اضغط F5 لتنفيذ التعليمات البرمجية ، وقد تم تسمية المصنف الخاص بك على أنه محتوى الخلية للخلية A1. انظر لقطة الشاشة:
الملاحظات:
1. يمكنك تحديد أي قيمة خلية كاسم ملف بمجرد تعديل A1 إلى مرجع خلية أخرى في الكود أعلاه.
2. سيتم حفظ المصنف النشط في مجلد ج: \ المستخدمون \ dt \ سطح المكتب \ معلوماتي \ (يجب أن تبقى الشرطة المائلة الأخيرة عند لصق موقعك بدلاً من الموقع) ، يمكنك تغيير المسار حسب حاجتك.
مقالات ذات صلة:
كيفية حفظ الملف مع التاريخ والوقت في إكسيل؟
كيفية إظهار مسار الملف في شريط العنوان أو شريط الأدوات في إكسيل؟
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!