پرفروش ترين
برترين
آخرين محصولات فروشگاه
فایل الکترونیکی آموزش اکسل پیشرفته ۲۰۱۰
آموزش ایجاد فایل چندکاربره با سطح دسترسی مشخص
یوزرفرم پیشرفته -Advanced  User Form
داشبورد (مقدماتی) – Dashboards(Elementary)
ابزارهای اعتبار سنجی و اخطار دهنده
بسته آموزشی userform
مدیریت و کنترل خطا در اکسل
توابع متنی
گرافیک در اکسل
جزوه آموزشی جداول و نمودارهای پاشنه ای
فایل آموزشی نحوه تهیه فرمت عددی دلخواه یا custom number format cell
آموزش ایجاد فایل چندکاربره با سطح دسترسی مشخص
صفحه 1 از 2 12 آخرینآخرین
نمایش نتایج: از شماره 1 تا 10 , از مجموع 12

موضوع: save as worksheet با کد vb

  1. #1


    آخرین بازدید
    15 _ 09 _ 2016
    تاریخ عضویت
    June_2012
    نوشته ها
    39
    امتیاز
    3
    سپاس
    1
    سپاس شده
    3 در 3 پست

    save as worksheet با کد vb

    سلام به اساتید محترم من می خوام با استفاد از یک command button در صفحه worksheet بعد اعمال تغییرات ، صفحه رو ذخیره مجدد کنم ممنون می شم کد vb شو برای بگذارید

    Private Sub save as_Click()
    کد vb
    End Sub
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.
    پاسخ مورد نظر براي اين تاپيك ارسال شده است.

  2.  

  3. #2


    آخرین بازدید
    07 _ 12 _ 2016
    تاریخ عضویت
    November_2010
    محل سکونت
    کرج
    نوشته ها
    363
    امتیاز
    255
    سپاس
    193
    سپاس شده
    556 در 139 پست

    MEYTI به Yahoo ارسال پیام

    RE: save as worksheet با کد vb

    با سلام دوست عزیز برای save as از کد زیر میتونی استفاده کنی این کد فایل را با نام 123 در درایو E ذخیره میکنه که بسته به کار خودت میتونی نام و مسیر ذخیره رو تغییر بدی

    Sub Button1_Click()

    Dim filename As String
    filename = 123
    ChDir "E:\"
    ActiveWorkbook.SaveAs filename:= _
    "E:\" + filename + ".XLSM"
    ActiveWorkbook.Close
    End Sub

  4. #3


    آخرین بازدید
    15 _ 09 _ 2016
    تاریخ عضویت
    June_2012
    نوشته ها
    39
    امتیاز
    3
    سپاس
    1
    سپاس شده
    3 در 3 پست

    RE: save as worksheet با کد vb

    سلام دوست عزیز از کدتون استفاده کردم ولی ارور می ده ممنون میشم برنامه آماده رو برام بذارید
    Dim filename As String
    filename = 123
    ChDir "E:\"
    ActiveWorkbook.SaveAs filename:= _
    "E:\" + filename + ".XLSM"
    ActiveWorkbook.Close

  5. #4


    آخرین بازدید
    07 _ 12 _ 2016
    تاریخ عضویت
    November_2010
    محل سکونت
    کرج
    نوشته ها
    363
    امتیاز
    255
    سپاس
    193
    سپاس شده
    556 در 139 پست

    MEYTI به Yahoo ارسال پیام

    RE: save as worksheet با کد vb

    فایل نمونه خدمت شما دوست عزیز
    فايل هاي پيوست شده فايل هاي پيوست شده

  6. #5


    آخرین بازدید
    15 _ 09 _ 2016
    تاریخ عضویت
    June_2012
    نوشته ها
    39
    امتیاز
    3
    سپاس
    1
    سپاس شده
    3 در 3 پست

    RE: save as worksheet با کد vb

    سلام استاد گرامی از اینکه فایل نمونه رو برام گذاشتید ممنونم. آیا میشه کاری کرد که پنجره save as مانند خود اکسل باز بشه و اروری که بعد از cancel کردن فرم ظاهر میشه را حذف کرد

  7. #6


    آخرین بازدید
    07 _ 12 _ 2016
    تاریخ عضویت
    November_2010
    محل سکونت
    کرج
    نوشته ها
    363
    امتیاز
    255
    سپاس
    193
    سپاس شده
    556 در 139 پست

    MEYTI به Yahoo ارسال پیام

    RE: save as worksheet با کد vb

    خدمت شما



    کد PHP:
    Application.Dialogs(xlDialogSaveAs).Show ("*.xlsm"

  8. #7


    آخرین بازدید
    15 _ 09 _ 2016
    تاریخ عضویت
    June_2012
    نوشته ها
    39
    امتیاز
    3
    سپاس
    1
    سپاس شده
    3 در 3 پست

    RE: save as worksheet با کد vb

    دستتون درد نکنه استاد خیلی استفاده کردیم

  9. #8
    علی فاطمی آنلاین نیست.
    مدير تالارمهندسی صنایع و ويژوال بيسيك


    آخرین بازدید
    6 روز پیش
    تاریخ عضویت
    February_2014
    محل سکونت
    تهران
    نوشته ها
    474
    امتیاز
    1049
    سپاس
    2,497
    سپاس شده
    969 در 324 پست

    علی فاطمی به Yahoo ارسال پیام فرستادن پیام با Skype به علی فاطمی
    نقل قول نوشته اصلی توسط MEYTI نمایش پست ها
    خدمت شما



    کد PHP:
    Application.Dialogs(xlDialogSaveAs).Show ("*.xlsm"
    با سلام و روز بخیر
    پس از اجرای این کد اگر کاربر cansle رو بزنه کدهای نوشته شده پس از این کد بازم اجرا میشه . یعنی عملا کنسل نمیشه ، راه حلی برای کنسل شدن در این کد وجود داره؟
    در دنیا فقط یک نفر وجود دارد که باید از او بهتر باشید و آن کسی نیست جز گذشته خودتان




  10. #9
    M_R_M آنلاین نیست.
    مدير تالار اکسل و بانک اطلاعاتی


    آخرین بازدید
    2 روز پیش
    تاریخ عضویت
    February_2011
    محل سکونت
    ســــاوه
    نوشته ها
    1,523
    امتیاز
    5549
    سپاس
    6,348
    سپاس شده
    4,345 در 1,207 پست

    M_R_M به Yahoo ارسال پیام فرستادن پیام با Skype به M_R_M
    نقل قول نوشته اصلی توسط علی فاطمی نمایش پست ها
    با سلام و روز بخیر
    پس از اجرای این کد اگر کاربر cansle رو بزنه کدهای نوشته شده پس از این کد بازم اجرا میشه . یعنی عملا کنسل نمیشه ، راه حلی برای کنسل شدن در این کد وجود داره؟
    چه کدی می نویسی؟
    پذیرش نادانی خویش ، اغلب نخستین گامی است که به سوی آموزش بر می داریم

  11. #10
    علی فاطمی آنلاین نیست.
    مدير تالارمهندسی صنایع و ويژوال بيسيك


    آخرین بازدید
    6 روز پیش
    تاریخ عضویت
    February_2014
    محل سکونت
    تهران
    نوشته ها
    474
    امتیاز
    1049
    سپاس
    2,497
    سپاس شده
    969 در 324 پست

    علی فاطمی به Yahoo ارسال پیام فرستادن پیام با Skype به علی فاطمی
    باسلام
    پس ازاین کد
    کد:
    Application.Dialogs(xlDialogSaveAs).Show ("*.xlsm")  
    یعنی پس ازsaveas کدی نوشتم که شیت1 توی فایل جدید رو پاک کنه، حالا وقتی cancel رو می زنی فایل رو saveas نمی کنه و شیت 1 همون فایل رو پاک میکنه. درصورتی که می خوام با زدن cancel فقط عملیات saveas انجام نشود .
    ممنون از توجه شما
    در دنیا فقط یک نفر وجود دارد که باید از او بهتر باشید و آن کسی نیست جز گذشته خودتان





صفحه 1 از 2 12 آخرینآخرین

اطلاعات موضوع

کاربرانی که در حال مشاهده این موضوع هستند

در حال حاضر 1 کاربر در حال مشاهده این موضوع است. (0 کاربران و 1 مهمان ها)

موضوعات مشابه

  1. ارتباط بين دو worksheet
    توسط ahadbares در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 2
    آخرين نوشته: 20 _ 04 _ 2013, 20:51
  2. حذف save as در اکسل
    توسط parisasasa در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 4
    آخرين نوشته: 10 _ 09 _ 2012, 09:43
  3. save az
    توسط khorasan66 در انجمن كاربرد اكسل در رشته هاي مختلف
    پاسخ ها: 1
    آخرين نوشته: 12 _ 06 _ 2012, 13:20

بازدید کنندگان با جستجو های زیر این صفحه را پیدا کرده اند

انجمن اكسل ايران , اكسل , اكسس , سوال و جواب اكسل , سوال اكسس , انجمن اكسل ايران , توابع اكسل, آموزش اكسل, آموزش اكسس, VBA, ويژوال بيسيك

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •  
  • BB code ها فعال هستند
  • شکلک ها فعال هستند
  • کد [IMG] فعال است
  • کد [VIDEO] فعال است
  • کد HTML غیر فعال است
با ما در تماس باشيد