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

موضوع: ذخیره در فایل Notpad با شروط خاص

  1. #1


    آخرین بازدید
    22 _ 05 _ 2013
    تاریخ عضویت
    February_2013
    نوشته ها
    31
    امتیاز
    1
    سپاس
    0
    سپاس شده
    1 در 1 پست

    ذخیره در فایل Notpad با شروط خاص

    با سلام و احترام
    میخواهم با اجرای ماکرو اطلاعات موجود در شیت جاری به Notpad فرستاده شود و ذخیره شود.
    [align=center][b]البته با شروط زیر[/align]
    1-ارسال به Notpad به اندازه سطرهایی که شامل داده می باشد -یعنی شامل سطرهای خالی نباشد)
    2- بتوان آدرس ذخیره شدن فایل را در برنامه مشخص کرد.
    3-نامی که برای ذخیره فایل می خواهیم قرار دهیم را از یک سلول مشخص بخواند.

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

  2.  

  3. #2


    آخرین بازدید
    03 _ 04 _ 2017
    تاریخ عضویت
    February_2010
    محل سکونت
    بوشهر
    نوشته ها
    922
    امتیاز
    653
    سپاس
    29
    سپاس شده
    799 در 342 پست

    shamsololama به Yahoo ارسال پیام فرستادن پیام با Skype به shamsololama

    RE: ذخیره در فایل Notpad با شروط خاص

    با درود فراوان
    توضیح جلو کدها نشته ام

    Sub CreateAfile2()
    Set fs = CreateObject("Scripting.FileSystemObject")
    namfile = Range("b1").Value
    Adresfile = "C:\"
    Set a = fs.CreateTextFile(Adresfile & namfile & ".txt", True) 'ايجاد يک فايل تکست در آدرس مشخصبا نام که از سل بي يک گرفته
    For Each c In Range("A1:A100")
    If c <> "" Then
    a.WriteLine (c.Value) 'وارد کردن متن دلخواه به فايل تکس
    End If

    Next
    End Sub

  4. #3


    آخرین بازدید
    22 _ 05 _ 2013
    تاریخ عضویت
    February_2013
    نوشته ها
    31
    امتیاز
    1
    سپاس
    0
    سپاس شده
    1 در 1 پست

    RE: ذخیره در فایل Notpad با شروط خاص

    سلام
    خیلی گُلی
    متشکرم

  5. #4


    آخرین بازدید
    22 _ 05 _ 2013
    تاریخ عضویت
    February_2013
    نوشته ها
    31
    امتیاز
    1
    سپاس
    0
    سپاس شده
    1 در 1 پست

    RE: ذخیره در فایل Notpad با شروط خاص 2

    سلام

    میشه در این موردم هم راهنمایی بفرمائید.

    1-وقتی فایل ذخیره میشود میخواهم به تاریخ و ساعت جاری سیستم ذخیره شود در جواب بالا اگر اشتباه نکنم فقط به نوشته ذخیره میشود (در واقع می خواهم در سلول B1 فرمول ()now= را درج کنم)

    2-چه جوری میتونم در این انجمن فایلی را ضمیمه کنم (عکس یا اکسل) تا بتوانم منظورم را بهتر بیان کنم odgy:

    با احترامات فراوان

  6. #5


    آخرین بازدید
    03 _ 04 _ 2017
    تاریخ عضویت
    February_2010
    محل سکونت
    بوشهر
    نوشته ها
    922
    امتیاز
    653
    سپاس
    29
    سپاس شده
    799 در 342 پست

    shamsololama به Yahoo ارسال پیام فرستادن پیام با Skype به shamsololama

    RE: ذخیره در فایل Notpad با شروط خاص

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

    در کد قبلی این تغییر رو بده
    بجای
    namfile = Range("b1").Value
    بنویس
    namfile = Range("b1").Text

    < همچنین سل بی یک که میخوای تاریخ now() رو توش بنویسی
    فرمت سلش رو به این فرمت تغییر بده
    dd-mm-yyyy
    یعنی اینکه بجای اسلش باید خط یا هرچیزی دیگه ای که نام فایل قبول میکنه بگذارید

    برای آپلود هم باید زمان ارسال پاسخ گزینه ای برای آپلود داشته باشه

    موفق باشید

  7. #6


    آخرین بازدید
    22 _ 05 _ 2013
    تاریخ عضویت
    February_2013
    نوشته ها
    31
    امتیاز
    1
    سپاس
    0
    سپاس شده
    1 در 1 پست

    RE: ذخیره در فایل Notpad با شروط خاص

    متشکرم


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

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

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

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

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

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

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