نویسنده موضوع: نمایش پیغام پاپ آپ در اکسل  (دفعات بازدید: 101 بار)

bagheri65

  • کاربر تازه‌وارد
  • *
  • ارسال: 20
  • جمع امتیازها: +0/-0
نمایش پیغام پاپ آپ در اکسل
« : 17 شهریور 1399 - 15:48 »
سلام
توضیحات در فایل پیوست اکسل

lamp

دانلود فهرست + فصل اول کتاب توابع و فرمول نویسی اکسل

خبر: کامل ترین کتاب توابع و فرمول نویسی در اکسل ترجمه تیم فرساران


majid_mx4

  • مدیران انجمن
  • *
  • ارسال: 1905
  • جمع امتیازها: +685/-7
پاسخ : نمایش پیغام پاپ آپ در اکسل
« پاسخ #1 : 18 شهریور 1399 - 12:07 »
باسلام

ابتدا کلید های Alt+F11 را فشار دهید و در محیط وبی وارد شوید.

روی شیت 1 کلیک کرده و سپس دستورات زیر را وارد نمایید.( توجه داشته باشید فایل باید بصورت Xlsm ذخیره شود.

Dim answer As Integer
If Range("d3").Value = "NO" Then
    MsgBox "عددي يافت نشد ", vbInformation, "خطا در نمايش عدد"
Exit Sub
End If
If Target.Address = "$A$3" And Range("d3") <> "No" Then
    answer = MsgBox(" مبلغ نقد  " & Range("d3"), vbYesNo + vbQuestion, "اخطار")
    If answer = vbYes Then
MsgBox "بله را فشار داديد"
'هر دستور ديگري در اينجا نوشت شود
Exit Sub
    Else
        MsgBox "نه را فشار داديد"
Exit Sub
        End If
    End If
موفق باشید میر

bagheri65

  • کاربر تازه‌وارد
  • *
  • ارسال: 20
  • جمع امتیازها: +0/-0
پاسخ : نمایش پیغام پاپ آپ در اکسل
« پاسخ #2 : 19 شهریور 1399 - 15:35 »
خطا در کد ارسالی
اگه ممکنه روی فایل اکسل تست کنید و ارسال
با تشکر

majid_mx4

  • مدیران انجمن
  • *
  • ارسال: 1905
  • جمع امتیازها: +685/-7
پاسخ : نمایش پیغام پاپ آپ در اکسل
« پاسخ #3 : 21 شهریور 1399 - 09:42 »
با سلام

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


دستورات را در یک شیت جدید بدون دستورات اضافی دیگر امتحان کنید .

موفق باشید میر

bagheri65

  • کاربر تازه‌وارد
  • *
  • ارسال: 20
  • جمع امتیازها: +0/-0
پاسخ : نمایش پیغام پاپ آپ در اکسل
« پاسخ #4 : 21 شهریور 1399 - 13:35 »
سلام
فقط همین کد رو قرار دادم بازم بخش اول که نوشتمR5 رو خطا میده
اگه امکانش هست لطفا روی فایل اکسل قرار بدید
ممنون

lamp

دانلود فهرست + فصل اول کتاب توابع و فرمول نویسی اکسل

خبر: کامل ترین کتاب توابع و فرمول نویسی در اکسل ترجمه تیم فرساران


majid_mx4

  • مدیران انجمن
  • *
  • ارسال: 1905
  • جمع امتیازها: +685/-7
پاسخ : نمایش پیغام پاپ آپ در اکسل
« پاسخ #5 : 21 شهریور 1399 - 22:48 »
با عرض پوزش

لطفا در خانه D3 فرمول زیر را وارد کنید.

=IFERROR(VLOOKUP(A3,Sheet2!A1:B6,2,FALSE),"No")موفق باشید میر

bagheri65

  • کاربر تازه‌وارد
  • *
  • ارسال: 20
  • جمع امتیازها: +0/-0
پاسخ : نمایش پیغام پاپ آپ در اکسل
« پاسخ #6 : 29 شهریور 1399 - 08:33 »
سلام
باز روی کد خطا میده
میتونم خواهش کنم روی فایل اکسل اجرا کنید
با تشکر

majid_mx4

  • مدیران انجمن
  • *
  • ارسال: 1905
  • جمع امتیازها: +685/-7
پاسخ : نمایش پیغام پاپ آپ در اکسل
« پاسخ #7 : 29 شهریور 1399 - 22:34 »
با سلام

بله ، میتوانید فایل ضمیمه را بررسی نمایید.

عدد کد را تغییر دهید ماکرو عمل خواهد کرد
موفق باشید میر

bagheri65

  • کاربر تازه‌وارد
  • *
  • ارسال: 20
  • جمع امتیازها: +0/-0
پاسخ : نمایش پیغام پاپ آپ در اکسل
« پاسخ #8 : 30 شهریور 1399 - 08:25 »
خیلی ازتون ممنونم
فقط میشه کاری کرد که روی عدد بالا صفر پیغام بده زیر صفر نه

majid_mx4

  • مدیران انجمن
  • *
  • ارسال: 1905
  • جمع امتیازها: +685/-7
پاسخ : نمایش پیغام پاپ آپ در اکسل
« پاسخ #9 : 30 شهریور 1399 - 11:43 »
لطفا فایل ضمیمه را بررسی نمایید.

برای تست کد 218 را وارد نمایید.
موفق باشید میر

lamp

دانلود فهرست + فصل اول کتاب توابع و فرمول نویسی اکسل

خبر: کامل ترین کتاب توابع و فرمول نویسی در اکسل ترجمه تیم فرساران


bagheri65

  • کاربر تازه‌وارد
  • *
  • ارسال: 20
  • جمع امتیازها: +0/-0
پاسخ : نمایش پیغام پاپ آپ در اکسل
« پاسخ #10 : 30 شهریور 1399 - 13:09 »
خیلی ازتون ممنونم
فقط یه چی من عذر میخوام
میشه فقط پیغام نمایشی باشه
فقط یک پیام بله متوجه شدم
و بستن بیاد
الان چند بار پیغام میاد
فقط یک پیام باشه

bagheri65

  • کاربر تازه‌وارد
  • *
  • ارسال: 20
  • جمع امتیازها: +0/-0
پاسخ : نمایش پیغام پاپ آپ در اکسل
« پاسخ #11 : 30 شهریور 1399 - 15:46 »
حل شد ممنون