پاپ آپ popup

[Amir Ghasemiyan]

سلام
فایل پیوست اجرا نمیشه

سلام دوست عزيز
شما چرا پسوند فايل رو تغيير داديد؟
پسوند فايل xls هست و با همين پسوند اجرا ميشه

[میثم مقدم نیا]

دوست عزیز به هنگام اجرای فایل احتمالا نوار زرد رنگی بالای صفحه ( حدودا زیر تب های بالایی اکسل ) مشاهده می کنید که دکمه enable editing ( احتمالا این باشه یا چیزی شبیه به این ) بعد مشکلتون حل میشه.

استاد جسارت نباشه من چند ساله با شماها کار میکنم اینا دیگه میدونم
به هنگام اجرای فایل پیغام خطا میده و یک فایل خالی باز میشه
اگه این فایل در سیستم شما اجرا میشه لطفا با پسوند Xlsm ذخیره و دوباره آپلود کنید ممنون از شما اساتید بزرگم

[mokaram]

دوست عزیز به هنگام اجرای فایل احتمالا نوار زرد رنگی بالای صفحه ( حدودا زیر تب های بالایی اکسل ) مشاهده می کنید که دکمه enable editing ( احتمالا این باشه یا چیزی شبیه به این ) بعد مشکلتون حل میشه.

[میثم مقدم نیا]

در قسمت کدنویسی vb کپی نمایید و هر موقع نیاز داشتید آن ماکرو را فراخوانی کنید

سلام
فایل پیوست اجرا نمیشه

[ahwaznoname]

لطفا یمشه از ابتدا توضیح بدید ؟

[iranweld]

در قسمت کدنویسی vb کپی نمایید و هر موقع نیاز داشتید آن ماکرو را فراخوانی کنید

[ahwaznoname]

با تشکر
لطفا دقیقتر بفرمائید که کدهای مورد نظر رو کجا باید وارد کرد ؟ ماکرو در وی بی ؟ لطفا با تصویر نمایش دهید .

[iranweld]

با سلام

برای پاپ آپ از کدهای ذیل استفاده کنید

Sub LunchBreak()

Dim strMsg As String
Dim obj As Object

Set obj = CreateObject("WScript.Shell")

Const TIMEOUT = 1
Beep
strMsg = obj.Popup("انجام شد!", TIMEOUT, "پيغام سيستم")

End Sub 

[ahwaznoname]

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