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

موضوع: چاپ input messageدر validation

  1. #1


    آخرین بازدید
    2023/08/14
    تاریخ عضویت
    March 2010
    محل سکونت
    تهران
    نوشته ها
    2,034
    امتیاز
    4508
    سپاس
    2,467
    سپاس شده
    4,096 در 1,241 پست
    سطح اکسل
    85.00 %

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

    چاپ input messageدر validation

    سلام
    آیا امکان چاپ متنی که در input message در validation نوشته میشه وجود داره؟
    اگر نه چطور میشه همه این متن ها رو در cell کپی کرد؟؟
    اگر از comment استفاده کرده بودم مشکلی نبود.اما اشتباه کردم :s
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

  2.  

  3. #2


    آخرین بازدید
    2022/06/28
    تاریخ عضویت
    May 2010
    محل سکونت
    بلژیک
    نوشته ها
    174
    امتیاز
    108
    سپاس
    0
    سپاس شده
    119 در 53 پست
    تعیین سطح نشده است

    RE: چاپ input messageدر validation

    شما می توانید با استفاده از کد زیر به مقدار Input message در validation هر سلولی که می خواهید دسترسی داشته باشید. به عنوان مثال:

    dim k as string = Range("e5").Validation.InputMessage

    بعد می توانید این مقدار k را در هر جای برنامه خود چاپ کنید.

    Range("e4") = k
    -------
    http://md6712.com
    جامعه ایده پردازان: http://idekadeh.com

  4. #3


    آخرین بازدید
    2023/08/14
    تاریخ عضویت
    March 2010
    محل سکونت
    تهران
    نوشته ها
    2,034
    امتیاز
    4508
    سپاس
    2,467
    سپاس شده
    4,096 در 1,241 پست
    سطح اکسل
    85.00 %

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

    RE: چاپ input messageدر validation

    خیلی ممنون.
    این خیلی خوبه.اما اگر بشه این متن مورد نظر رو در همون سلول خودش چاپ کرد.یعنی توی پرینت نشون داده بشه خیلی خوب میشه. چون یه سری سلول دارم که مربوط به زمانسنجی ها میشه و باید حتما توضیحات مربوط روی سلول مورد نظر نشون داده بشه.مثل کامنت!
    نمی دونم توضیحاتم مفهوم بود یا نه!
    اگر نه.بگید فایل رو می ذارم
    ممنون

  5. #4


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

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

    RE: چاپ input messageدر validation

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

    برای این که آن محدوده سل های که اینپود مسیجشان را می خواهی چاپ کنی می توانی در یک ستون کنار آن وارد کنید تا زمان پرینت متن اینپود مسیج ها نیز در سل کنار آن داشته باشی که برای این کار از حلقه for each می توانی استفاده کنی تا تمام مسیج ها را در سل کناری(یا هر سلی که مورد نظر است) هر سل بنویسد بصورت زیر

    در این کدها رنج انتخابی سل های B1:B20 است که می توانی آن را تغییر دهی

    Sub Macro2()
    On Error Resume Next
    For Each c In Range("b1:b20")
    c.Offset(0, 1) = c.Validation.InputMessage
    Next
    End Sub

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

    Sub Macro1()
    On Error Resume Next
    For Each c In Range("b1:b20")

    c.AddComment
    c.Comment.Visible = True
    c.Comment.Text Text:=c.Validation.InputMessage
    Next
    End Sub

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

    Sub del()
    On Error Resume Next
    For Each c In Range("b1:b20")
    c.Comment.Delete
    Next

    End Sub

    توجه :
    در این مثال خانه های که اینپود مسیج ندارند هم کامنت گذاشته می شود ولی کامت خالی که اگر مزاحم کار می شود با مقداری تغییر در کد می توانید ازآن جلوگیری کنید

  6. #5


    آخرین بازدید
    2023/08/14
    تاریخ عضویت
    March 2010
    محل سکونت
    تهران
    نوشته ها
    2,034
    امتیاز
    4508
    سپاس
    2,467
    سپاس شده
    4,096 در 1,241 پست
    سطح اکسل
    85.00 %

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

    RE: چاپ input messageدر validation

    خیلی خیلی ممنون
    لطف کردین

  7. #6


    آخرین بازدید
    2022/12/05
    تاریخ عضویت
    October 2011
    محل سکونت
    مشهد
    نوشته ها
    4,374
    امتیاز
    12614
    سپاس
    4,596
    سپاس شده
    11,990 در 3,203 پست
    سطح اکسل
    70.00 %

    RE: چاپ input messageدر validation

    نقل قول نوشته اصلی توسط m_d6712
    شما می توانید با استفاده از کد زیر به مقدار Input message در validation هر سلولی که می خواهید دسترسی داشته باشید. به عنوان مثال:

    dim k as string = Range("e5").Validation.InputMessage

    بعد می توانید این مقدار k را در هر جای برنامه خود چاپ کنید.

    Range("e4") = k
    سلام
    همین مقدار K رو میشه با .Range.AddComment به همون سلی که input massage داره به صورت کامنت اضافه کرد( گرچه سوال قدیمی هست ولی برای استفاده دوستان دیگه جواب دادم)



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

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

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

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

  1. فراخوانی متن Input Message در سلول
    توسط Amirsayyafi در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 0
    آخرين نوشته: 2012/09/22, 13:20
  2. Data validation شرطی چه جوری ؟؟؟
    توسط mr_shadmanpour در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 4
    آخرين نوشته: 2012/07/29, 17:52
  3. Data Validation
    توسط kaka در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 3
    آخرين نوشته: 2012/06/28, 01:21
  4. validation Data
    توسط alishabanipour در انجمن پیوت تیبل و پايگاه داده - Pivot Table and Database
    پاسخ ها: 5
    آخرين نوشته: 2012/03/08, 01:02
  5. data validation و نامگذاری محدوده
    توسط mojtaba_2006 در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 5
    آخرين نوشته: 2011/12/29, 21:29

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

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

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

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

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