صفحه 1 از 2 12 آخرینآخرین
نمایش نتایج: از شماره 1 تا 10 , از مجموع 15

موضوع: ذخيره اطلاعات در اكسل

  1. #1


    آخرین بازدید
    2018/07/30
    تاریخ عضویت
    November 2010
    نوشته ها
    29
    امتیاز
    3
    سپاس
    6
    سپاس شده
    3 در 2 پست
    تعیین سطح نشده است

    ذخيره اطلاعات در اكسل

    با سلام
    يه فايل تهيه شده كه هر روزه توسط كاربر پر ميشه ودر نهايت پرينت گرفته ميشود فرداي اون روز توسط كاربرديگري پاك ميشه ومجدداً داخل اون نگارش ميشه، حالا ميخوايم به نحوي اين اطلاعات ذخيره بشه اگه امكان داره راهنمايي بفرماييد

    باتشكر
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

  2.  

  3. #2


    آخرین بازدید
    2021/12/05
    تاریخ عضویت
    February 2010
    محل سکونت
    بوشهر
    نوشته ها
    940
    امتیاز
    718
    سپاس
    29
    سپاس شده
    863 در 365 پست
    تعیین سطح نشده است

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

    RE: ذخيره اطلاعات در اكسل

    با درود فراوان


    بسته به اینکه میخواهید در همان فایل و در شیتی دیگر ذخیره شود و یا انکه در یک ورک بوک جدید و جداگانه ذخیره شود مقداری با هم متفاوت است
    ولی در کدام از موارد ذکر شده مد نظر شما باشد با گذاشتن یک کلید برای اجرا ماکرو می توانید در آن ماکرو دستوری بنویسید که صفحه را ذخیره و سپس خالی کند برای ورود دیتا جدید

    که اگر برای اجرای آن مشکلی داشتید یک نمونه فایل را بفرستید تا انجام دهم

  4. #3


    آخرین بازدید
    2018/07/30
    تاریخ عضویت
    November 2010
    نوشته ها
    29
    امتیاز
    3
    سپاس
    6
    سپاس شده
    3 در 2 پست
    تعیین سطح نشده است

    RE: ذخيره اطلاعات در اكسل

    باسلام
    جناب شمس العلما باتوجه به اينكه فايل مهمي نميباشد هركدام ساده تر است انتخاب ميكنم لطفاً تشريح بفرماييد تا مانند پستهاي قبلي شما از دانش شما استفاده نمايم
    فايل نمونه تقديم ميگردد

    [attachment=150]
    فايل هاي پيوست شده فايل هاي پيوست شده

  5. #4


    آخرین بازدید
    2021/12/05
    تاریخ عضویت
    February 2010
    محل سکونت
    بوشهر
    نوشته ها
    940
    امتیاز
    718
    سپاس
    29
    سپاس شده
    863 در 365 پست
    تعیین سطح نشده است

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

    RE: ذخيره اطلاعات در اكسل

    با درود فراوان

    نمونه فایل برای ذخیره و انتقال فایل در این کد اول مسیر ذخیره را میپرسد و سپس نام فایل برای ذخیره شدن و بعد از آن فایل را خالی میکند

    این را بر اساس فایل نمونه ای که فرستادی انجام دادم که در صورت نیاز میتوانی گزینه انتخاب سلها برای خالی کردن را خودت تغییر بدی

    فایل نمونه:

    [attachment=151]
    فايل هاي پيوست شده فايل هاي پيوست شده
    • نوع فایل: xls data.xls اطلاعات (28.5 کیلو بایت, 35 نمایش)

  6. #5


    آخرین بازدید
    2018/07/30
    تاریخ عضویت
    November 2010
    نوشته ها
    29
    امتیاز
    3
    سپاس
    6
    سپاس شده
    3 در 2 پست
    تعیین سطح نشده است

    RE: ذخيره اطلاعات در اكسل

    سلام وتشكر از محبت شما
    فايل رو دانلود كردم اما پيغام ميده
    لطفا راهنمايي بفرماييد

  7. #6


    آخرین بازدید
    2021/12/05
    تاریخ عضویت
    February 2010
    محل سکونت
    بوشهر
    نوشته ها
    940
    امتیاز
    718
    سپاس
    29
    سپاس شده
    863 در 365 پست
    تعیین سطح نشده است

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

    RE: ذخيره اطلاعات در اكسل

    با درود فراوان

    چه پیغامی میده چون اینجا امتحان کردم مشکلی نداره

  8. #7


    آخرین بازدید
    2018/07/30
    تاریخ عضویت
    November 2010
    نوشته ها
    29
    امتیاز
    3
    سپاس
    6
    سپاس شده
    3 در 2 پست
    تعیین سطح نشده است

    RE: ذخيره اطلاعات در اكسل

    با سلام به پيوست عكس مورد نظر تقديم ميگردد
    [attachment=154]
    تصاویر کوچک فایل پیوست تصاویر کوچک فایل پیوست pic.JPG  

  9. #8


    آخرین بازدید
    2021/12/05
    تاریخ عضویت
    February 2010
    محل سکونت
    بوشهر
    نوشته ها
    940
    امتیاز
    718
    سپاس
    29
    سپاس شده
    863 در 365 پست
    تعیین سطح نشده است

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

    RE: ذخيره اطلاعات در اكسل

    با درود فراوان

    دلیل این ارور این است که شما ماکرو اکسل خود را فعال نکرده اید برای این کار از میسر زیر انتخاب امنیت ماکرو را روی LOw تنظیم کنید

    Tools-Macro_security

    Low را تیک بزنید

    بعد از این کار یک بار فایل رو ببندید و دوباره باز کنید

  10. سپاس ها (1)


  11. #9


    آخرین بازدید
    2021/07/17
    تاریخ عضویت
    October 2010
    محل سکونت
    تهران
    نوشته ها
    168
    امتیاز
    73
    سپاس
    2
    سپاس شده
    58 در 39 پست
    تعیین سطح نشده است

    RE: ذخيره اطلاعات در اكسل

    سلام استاد گرامی
    ببخشید آیا امکان دارد در مورد کدها یک توضیح مختصر دهید
    البته اگر وقت دارید و از حوصله این تالار خارج نیست
    با سپاس فراوان

  12. #10


    آخرین بازدید
    2021/12/05
    تاریخ عضویت
    February 2010
    محل سکونت
    بوشهر
    نوشته ها
    940
    امتیاز
    718
    سپاس
    29
    سپاس شده
    863 در 365 پست
    تعیین سطح نشده است

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

    RE: ذخيره اطلاعات در اكسل

    نقل قول نوشته اصلی توسط sh_amar
    سلام استاد گرامی
    ببخشید آیا امکان دارد در مورد کدها یک توضیح مختصر دهید
    البته اگر وقت دارید و از حوصله این تالار خارج نیست
    با سپاس فراوان
    با درود فراوان

    Dim fd As FileDialog
    Set fd = Application.FileDialog(msoFileDialogFolderPicker)
    در یان قسمت یک دیالوگ فایل را با متغییر fd ست می کنیم که با انتخاب هر مسیری از این دیالوگ فایل
    مراحل زیر انجام شده و مسیر را در متغییر Addr ذخیره میکند
    Dim vrtSelectedItem As Variant
    With fd
    If .Show = -1 Then
    For Each vrtSelectedItem In .SelectedItems
    addr = vrtSelectedItem
    Next vrtSelectedItem
    Else
    End If
    End With
    Set fd = Nothing

    در این قسمت با یک اینپود باکس نام فایل را برای ذخیره شدن انتخاب میکنیم
    Dim nam
    nam = InputBox("äÇãí ÑÇ ÈÑÇí ÐÎíÑå ÝÇíá æÇÑÏ ˜äíÏ")

    If Len(nam) > 0 Then

    در این کد از Sheet1 یک کپی گرفته و با ترکیب متغییرهای که آدرس و نام را در آن ذخیره کرده ایم یک کپی یا بک آپ از فایل گرفته
    و سیو می کنیم
    Sheets("Sheet1").Select
    Sheets("Sheet1").Copy
    ActiveWorkbook.SaveAs Filename:=addr & "\" & nam, _
    FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
    ReadOnlyRecommended:=False, CreateBackup:=False
    End If
    در این قسمت فایل جدیدی را که ایجاد کرده ایم می بندیم
    Windows(nam & ".xls").Close
    در این کد نیز فایل اصلی را انتخاب کرده و سل های مورد نظر را خالی می کنیم
    Windows("data.xls").Activate
    Sheet1.Range("b3:e7") = ""


  13. سپاس ها (1)



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

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

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

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

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

ذخیره اطلاعات در اکسل

کد ذخیره اطلاعات در اکسل

ذخیره کردن در اکسل توسط filedialog

علاقه مندی ها (Bookmarks)

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

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