نمایش نتایج: از شماره 1 تا 9 , از مجموع 9

موضوع: ادرس دهی در محیط ویژوال

  1. #1


    آخرین بازدید
    2016/08/18
    تاریخ عضویت
    December 2010
    نوشته ها
    398
    امتیاز
    253
    سپاس
    750
    سپاس شده
    383 در 159 پست
    تعیین سطح نشده است

    ادرس دهی در محیط ویژوال

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

  2.  

  3. #2


    آخرین بازدید
    5 ساعت پیش
    تاریخ عضویت
    September 2013
    محل سکونت
    بچه محل آقا امام رضا
    نوشته ها
    4,469
    امتیاز
    12312
    سپاس
    8,924
    سپاس شده
    10,583 در 3,742 پست
    سطح اکسل
    100.00 %

    سلام دوست عزيز

    موارد 2 و 3 و 4 رو براتون نوشتم. منظورتون رو از 5 متوجه نشدم.
    خروج رو هم نوشتم براتون
    فايل هاي پيوست شده فايل هاي پيوست شده
    • نوع فایل: xlsm 1.xlsm اطلاعات (23.3 کیلو بایت, 48 نمایش)
    ویرایش توسط Amir Ghasemiyan : 2013/11/29 در ساعت 01:16


  4. #3


    آخرین بازدید
    2016/08/18
    تاریخ عضویت
    December 2010
    نوشته ها
    398
    امتیاز
    253
    سپاس
    750
    سپاس شده
    383 در 159 پست
    تعیین سطح نشده است

    نقل قول نوشته اصلی توسط amir ghasemiyan نمایش پست ها
    سلام دوست عزيز

    موارد 2 و 3 و 4 رو براتون نوشتم. منظورتون رو از 5 متوجه نشدم.
    خروج رو هم نوشتم براتون
    با سلام
    در خصوص مورد 4 اگر بخواهیم دیتا که وارد فایل دوم شد ، بعد ذخیره و بسته شود ، چه کدی میشه نوشت؟
    خواستن ، توانستن است.

  5. #4


    آخرین بازدید
    5 ساعت پیش
    تاریخ عضویت
    September 2013
    محل سکونت
    بچه محل آقا امام رضا
    نوشته ها
    4,469
    امتیاز
    12312
    سپاس
    8,924
    سپاس شده
    10,583 در 3,742 پست
    سطح اکسل
    100.00 %

    نقل قول نوشته اصلی توسط dadvar نمایش پست ها
    با سلام
    در خصوص مورد 4 اگر بخواهیم دیتا که وارد فایل دوم شد ، بعد ذخیره و بسته شود ، چه کدی میشه نوشت؟
    براي ذخيره و بسته شدن اين كد رو بذارين

    کد:
    Private Sub CommandButton5_Click()
    Workbooks.Open Filename:="C:\Users\Amir\Desktop\2.xlsx"
    Range("a1:a10").Value = TextBox1.Text
    ActiveWorkbook.Save
    ActiveWorkbook.Close
    End Sub

  6. سپاس ها (3)


  7. #5


    آخرین بازدید
    2022/12/26
    تاریخ عضویت
    November 2010
    محل سکونت
    کرج
    نوشته ها
    362
    امتیاز
    295
    سپاس
    193
    سپاس شده
    596 در 151 پست
    تعیین سطح نشده است

    MEYTI به Yahoo ارسال پیام
    با سلام آقای دادور و با تشکر از جناب قاسمیان
    عذرخواهی بابت تاخیر در جواب ،دیشب در پیام خصوصی سوالی پرسیدین متاسفانه وقت نشد و جناب قاسمیان زحمتشو کشیدن
    در رابطه مورد آخر ادرس فایل در شبکه هم میتونی از کد زیر استفاده کنید
    کد:
     
    Workbooks.Open "\\PC1\a\2.xlsx" 
     
    Range("a1:a10").Value = TextBox1.Text
    ActiveWorkbook.Save
    ActiveWorkbook.Close
    که در اینجا pc1 همکان کامپیوتر در شبکه است که فایل مورد نظر در پوشه a در آن شیر شده است
    در مورد سوالی هم که فرمودید فایل بدون باز شدن ویرایش بشه امکانش نیست مگر از کد زیر استفاده کنید و فایل باز شده را مخفی کنید تا دیده نشود

    کد:
    Application.Windows.Application.Visible = False
    مهدی کریمی


  8. #6


    آخرین بازدید
    2022/06/26
    تاریخ عضویت
    January 2013
    محل سکونت
    شیراز
    نوشته ها
    1,198
    امتیاز
    3248
    سپاس
    1,566
    سپاس شده
    3,182 در 795 پست
    سطح اکسل
    84.00 %

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

  9. سپاس ها (3)


  10. #7


    آخرین بازدید
    2016/08/18
    تاریخ عضویت
    December 2010
    نوشته ها
    398
    امتیاز
    253
    سپاس
    750
    سپاس شده
    383 در 159 پست
    تعیین سطح نشده است

    تشکر از دوستان بابت همفکری که میکنن:
    سوالاتی دیگه ای هم حین کار کردن با فایل های اصلی برام پیش میاد حالا اگر مربوط به این تاپیک باشه مطرح میکنم و از تجربیات و دانش دوستان استفاده میبریم

    اگر به فایلی که میخواهسم اطلاعات بفرستیم دارای پسورد باشه و من پسوردش رو بلد باشم خوب برا انجام این کار پسورد رو میزنم و ادامه کار انجام میشه.
    ولی اگه بخوام این فایل رو در اختیار کاربر قرار بدم که اون انجام بده و نمیخوام که اون پسورد فایل رو بدونه چطوری میشه براش کد نویسی کرد؟
    با تشکر
    خواستن ، توانستن است.

  11. #8


    آخرین بازدید
    2022/12/26
    تاریخ عضویت
    November 2010
    محل سکونت
    کرج
    نوشته ها
    362
    امتیاز
    295
    سپاس
    193
    سپاس شده
    596 در 151 پست
    تعیین سطح نشده است

    MEYTI به Yahoo ارسال پیام
    در این مورد برای باز کردن فایل پسورد دار از نمونه کدزیر استفاده کن

    کد:
     Workbooks.Open Filename:="Path", Password:="OpenFile", WriteResPassword:="WriteFile"
    به عنوان مثال برای همان فایل که فقط داراری پسورد open باشد از کد زیر استفاده کن

    کد:
    Workbooks.Open Filename:="d:\a.xlsx", Password:="123"
    مهدی کریمی


  12. #9


    آخرین بازدید
    2021/11/24
    تاریخ عضویت
    October 2013
    نوشته ها
    9
    امتیاز
    14
    سپاس
    0
    سپاس شده
    4 در 2 پست
    تعیین سطح نشده است

    با سلام خدمت کلیه اساتید
    در تمام کدهای بالا مسیر و نام فایل ثابت فرض شده
    اگه بخواهیم نام و مسیر فایل پویا باشه یعنی با یه فرمی شبه فرم (open ) خود اکسل مسیر و نام فایل انتخاب بشه چکار باید کرد ؟آیا این فرم بعنوان فرم پیش فرض و آماده وجود داره یا اینکه باید اونو طراحی کرد فراموش نکنیم که فرم open موجود در برنامه ها امکانات خوبی برای مسیر یابی فایل ها دارن ؟
    ممنون از تمام دوستان
    جواب سوالمو تو این آدرس پیدا کردم بازم ممنون
    save as worksheet با کد vb
    ویرایش توسط afshar_yan : 2014/02/08 در ساعت 12:31



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

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

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

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

  1. تشکر ویژه از استاد ویژه
    توسط admin در انجمن تقدیر و تشکر از اعضاء و مدیران
    پاسخ ها: 0
    آخرين نوشته: 2013/10/08, 16:15
  2. جوین کردن
    توسط blue_cry در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 9
    آخرين نوشته: 2012/08/28, 09:07
  3. جمع ساعات بیشتر از 24 -- فایل ویژه --
    توسط silent در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 10
    آخرين نوشته: 2012/06/22, 19:27

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

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

کلمات کلیدی این موضوع

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

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

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