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

موضوع: ساخت یوزر فرم شفاف

  1. #1


    آخرین بازدید
    2023/07/04
    تاریخ عضویت
    July 2011
    محل سکونت
    مشهد
    نوشته ها
    50
    امتیاز
    6
    سپاس
    20
    سپاس شده
    6 در 4 پست
    سطح اکسل
    56.00 %

    ساخت یوزر فرم شفاف

    سلام به همه ی اساتید
    میخواستم ببینم میشه با استفاده از دستورات vba از طریق msgbox یا userform روشی رو انجام داد که یک پیام بدون پس زمینه نمایش داده بشه و بعد از ۲ ثانیه خودش بسته بشه
    می دونم که اگه از userform استفاده کنیم و دستور زیر رو توی کدهاش قرار بدیم بعد از ۲ ثانیه بسته میشه

    Private Sub UserForm_Activate()
    Application.Wait (Now + TimeValue("0:00:02"))
    bytOpacity = 192 ' variable keeping opacity setting
    Unload Me
    End Sub
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

  2.  

  3. #2


    آخرین بازدید
    2023/07/04
    تاریخ عضویت
    July 2011
    محل سکونت
    مشهد
    نوشته ها
    50
    امتیاز
    6
    سپاس
    20
    سپاس شده
    6 در 4 پست
    سطح اکسل
    56.00 %

    نقل قول نوشته اصلی توسط Imanfy نمایش پست ها
    سلام به همه ی اساتید
    میخواستم ببینم میشه با استفاده از دستورات vba از طریق msgbox یا userform روشی رو انجام داد که یک پیام بدون پس زمینه نمایش داده بشه و بعد از ۲ ثانیه خودش بسته بشه
    می دونم که اگه از userform استفاده کنیم و دستور زیر رو توی کدهاش قرار بدیم بعد از ۲ ثانیه بسته میشه

    Private Sub UserForm_Activate()
    Application.Wait (Now + TimeValue("0:00:02"))
    bytOpacity = 192 ' variable keeping opacity setting
    Unload Me
    End Sub

    یک هفته گذشت و بدون جواب؟؟؟

  4. #3


    آخرین بازدید
    2023/12/18
    تاریخ عضویت
    August 2014
    نوشته ها
    524
    امتیاز
    504
    سپاس
    1
    سپاس شده
    468 در 301 پست
    سطح اکسل
    94.67 %

    سلام
    در مورد زمان که هیچ قایل حله و به نظر خوتون هم حل کردید....!
    در مورد این که پیش زمینه نداشته باشه!...بیشتر توضیح بدید... شفافیت با پیش زمینه تفاوت داره.!
    این که transparency یوزرفرم رو هم بخواهیم کمتر کنیم امکانش هست البته به طور کل با همه ملحقاتش کم و زیاد میشه! با سرچ در نت می تونید نمونه هایی از این کار رو ببنید!
    نمونه ای که خروجی رو نشون بده بذارید شاید زود تر به نتیجه برسیم!
    بخش امضاء :

    کد:
    Sub Macro()
    ActiveCell = "IY" & Right(Application.Name, 5)
    With ActiveCell.Characters(Start:=2, Length:=1).Font
    .Name = "Webdings"
    .Color = 255
    End With
    End Sub

  5. سپاس ها (1)


  6. #4


    آخرین بازدید
    2023/12/18
    تاریخ عضویت
    August 2014
    نوشته ها
    524
    امتیاز
    504
    سپاس
    1
    سپاس شده
    468 در 301 پست
    سطح اکسل
    94.67 %

    اینم چک کنید...!
    زمانش 5 ثانیه!
    فايل هاي پيوست شده فايل هاي پيوست شده
    بخش امضاء :

    کد:
    Sub Macro()
    ActiveCell = "IY" & Right(Application.Name, 5)
    With ActiveCell.Characters(Start:=2, Length:=1).Font
    .Name = "Webdings"
    .Color = 255
    End With
    End Sub

  7. سپاس ها (1)


  8. #5


    آخرین بازدید
    3 هفته پیش
    تاریخ عضویت
    March 2017
    محل سکونت
    قزوین
    نوشته ها
    555
    امتیاز
    518
    سپاس
    182
    سپاس شده
    449 در 216 پست
    سطح اکسل
    41.00 %

    نقل قول نوشته اصلی توسط Imanfy نمایش پست ها
    سلام به همه ی اساتید
    میخواستم ببینم میشه با استفاده از دستورات vba از طریق msgbox یا userform روشی رو انجام داد که یک پیام بدون پس زمینه نمایش داده بشه و بعد از ۲ ثانیه خودش بسته بشه
    می دونم که اگه از userform استفاده کنیم و دستور زیر رو توی کدهاش قرار بدیم بعد از ۲ ثانیه بسته میشه

    Private Sub UserForm_Activate()
    Application.Wait (Now + TimeValue("0:00:02"))
    bytOpacity = 192 ' variable keeping opacity setting
    Unload Me
    End Sub
    با کد Vba میشه یوزر فرم را شفاف کرد به توری که پشت اون معلوم باشه اگه خواستید درخدمت هستم

    در سرزمینی کہ نتوان مردانہ زیست ، مردانہ مردن بهتر از این زندگیست


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

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

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

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

  1. پاسخ ها: 15
    آخرين نوشته: 2019/05/27, 14:59
  2. گذاشتن کلید میانبر برای کلیدهای یوزرفرم
    توسط shamsololama در انجمن فرم ها در ويژوال بيسيك - Forms in VBA
    پاسخ ها: 8
    آخرين نوشته: 2017/09/06, 19:15
  3. [حل شده] تکمیل جدول بایوزرفرم
    توسط r_a در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 4
    آخرين نوشته: 2017/02/01, 10:25
  4. [حل شده] اجرای یوزر فرم در ورژن های مختلف از اکسل
    توسط mmazad در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 1
    آخرين نوشته: 2016/04/06, 10:52
  5. خطا در دو یوزرفرم ....کمک
    توسط ACE در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 10
    آخرين نوشته: 2015/11/06, 20:37

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

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

آموزش ساخت یوزر فرم در اکسل

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

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

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