Jump to content
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

تغيير كود حفظ ملف الاكسل باسم خليه معينة من xls الى xlsx


Go to solution Solved by وضاح محمد,

Recommended Posts

الاخوة الاكارم

 

رمضان كريم وتقبل الله منكم صالح الاعمال

 

الملف المرفق قمت بتحميله من أوفيسنا وهو يحتوي مايكرو للحفظ باسم خلية معينة مع تحديد مكان الحفظ

ولكنه يحفظ بامتداد xls

 

المطلوب :

اريد ان يكون هذا الملف بامتداد xlsx 

وان يكون الحفظ ايضا بنفس الطريقة ولكن بامتداد xlsx

 

مع الشكر الجزيل لتعاونكم مسبقاً ....

احفظ ملف الاكسل باسم خليه معينة مع تحديد مكان الحفظ.rar

  • Like 1
Link to post
Share on other sites

السلام عليكم

الاخ الكريم / وضاح محمد

بارك الله فيك

ع السريع كدة ... عشان الصيام

جرب الملف التالي لحفظ الملف بالتنسيق المطلوب xlsx من خلال الكود التالي

Sub copy_sh()
Dim F_FOL As String
  Application.ScreenUpdating = False
  F_FOL = "D:\"
  FName = Sheets("ورقة1").Range("B3").Text
  With ActiveWorkbook
    ActiveWorkbook.Worksheets.Copy
    ActiveWorkbook.SaveCopyAs Filename:=F_FOL & FName & ".xlsx"
    ActiveWorkbook.Close False
    .Activate
  End With
  Application.ScreenUpdating = True
End Sub

ارجو ان يفي بطلبك اخي الكريم

 

 

 

حفظ ملف باسم خلية معينة.rar

  • Like 1
Link to post
Share on other sites

السلام عليكم

 

السيد الفاضل / حمادة عمر

 

اتوجه لكم بالشكر والتقدير على المجهود الطيب الذي بذلتموه لتلبية طلبي

وارجو من الله العلي القدير ان يجعله في ميزان حسناتكم .

 

السد الفاضل : الموضوع الذي ارسلتموه لي لم ينقصه سوى شيء واحد وهو:

تحديد مكان الحفظ ،،،، فهل من الممكن اضافة امر الى نفس الكود بحيث استطيع ان اقوم بتحديد او تغيير مكان أو مسار الحفظ عبر أو بواسطة خلية معينة

كأن يكون مكان الحفظ مثلا في القرص :C أو القرص :D أو القرص :E وذلك لان ارشفة الملفات عندي تتطلب تغيير مكان الحفظ من قرص لآخر حسب مضمون ومحتوى الملف .

وكما هو موجود في الملف الذي ارسلته لكم .

 

وتقبلوا خالص الشكر والتقدير ...

Link to post
Share on other sites
  • Solution

الأخ الأكرم / حمادة عمر

 

الحمد لله وبفضل الله تعالى لقد توصلت الى الكود الذي كنت اطلبه وذلك بمساعدتكم الكريمة لي

 

وفقكم الله وسدد على طريق الخير خطاكم ...

 

مرفق لكم الملفات التي توصلت اليها

 

وتقبلوا مني فائق الاحترام والتقدير ...

حفظ ملف الاكسل حسب خلية معينة + حسب الخلية التي يقف عليها المؤشر.rar

Link to post
Share on other sites

السلام عليكم

الاخ الكريم / وضاح محمد

بارك الله فيك

والاهم بالتأكيد انك توصلت لما تريد تماما

والاجمل والاروع انك وضعت ملفك النهائي في موضوعك ليستفيد منه الجميع

فالكثير عندما يصل لحل موضوعه بمفرده او عن طريق مساعدة لا يقوم بوضع الحل في الموضوع

شكرا جزيلا لك

تقبل خالص تحياتي

Link to post
Share on other sites

دائما رائع استاذنا الكبير جدا

حمادة عمر

جزاك الله خيرا

 

الاخت الفاضلة

تقبلي خالص تحياتي

Link to post
Share on other sites

 

السلام عليكم

السيد الفاضل / حمادة عمر

بارك الله فيك

 

الوفاء لا يقابل الا بالوفاء ...

 

شكرا جزيلا لاهتمامك

 

ودمتم في رعاية الله ..

 

 

ونعم الاخلاق الحميدة والرفيعة

تقبل خالص تحياتي اخي الحبيب

Link to post
Share on other sites
  • 10 months later...
  • 3 weeks later...

لقد فتحت الملفات  بعد التحميل .. ووجت أن زر الحفظ  الذي انتم تقصدونه هو زر حفظ  افتراضي وليس الاساسي .

هل هناك كود  يقوم بحفظ  الملف بأسم الخلية .. عند النقر على  زر الحفظ الاساسي تبع الأكسل . بدون أن انشئ زر حفظ

شكرا جزيلا

Link to post
Share on other sites
  • 1 year later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...