ایجاد متن متحرک در تکست باکس

[~M*E*H*D*I~]

با سلام خدمت دوستان

آیا در طراحی فرم امکان این هست متن پیش فرضی که در تکست باکس نوشته میشه متحرک باشه مثل افکت هایی که با جاوا اسکریپت تو طراحی سایت ایجاد می کنند

[~M*E*H*D*I~]

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

[~M*E*H*D*I~]

با سلام خدمت دوستان

خوب مثل اینکه کسی نتونست کمک کنه خوشبختانه خودم به جواب رسیدم برای استفاده فایل رو پیوست کردم می تونید ببینید در صورت امکان ایده ای هم دارید بهش اضافه کنید

[khakzad]

سلام
خسته نباشید.خیلی جالب بود.
ببینید اینی که بنده می گم، شدنی هست؟
بجای اینکه اون متن 5 بار اجرا بشه که در واقع شمارندش همون y هست. می تونیم از این استفاده کنیم که هر 10 ثانیه این ماژول اجرا بشه؟
Application.OnTime Now + TimeValue("00:00:10"), "Macro1"
یعنی بجای ماکرو 1 در واقع همون harkat رو بذاریم؟

[khakzad]

اقای وطن پرست، زحمت آموزش ما هم اضافه شده به کاراتون، شرمنده و ممنون :blush:لطف می کنید ی توضیحی هم راجع به timer بدین؟
و اون شرط timer<delay
ممنون میشم

[hr]
الان این فایل و ببینید
هر 10 ثانیه ماکرو فیلترینگ رو اجرا می کنه.قبلا درستش کرده بودم
اما الان هرکاری کردم.نتونستم اینجا اجراش کنک.که هر چند ثانیه این harekat رو اجرا کنه:dodgy:

[~M*E*H*D*I~]

سلام
خواهش می کنم اختیار دارید ، راستش اون کدی که دادید من نتونستم استفاده کنم منظورتون اینه که حلقه y رو حذف کنم کلا، در مورد شرط خوب شرط باید داینامیک باشه اون( البته 2 بار به delay مقدار داده شده هر دو بار باید .2 ثانیه بهش اضافه بشه که تاخیر ایجاد کنه بین 2 اجرا برای بهتر اجرا شدن) اما timer باید از یه چیزی کوچکتر باشه که با یک بار برقراری شرط متوقف نشه ، چون به تایمر اضافه میشه delay از جنس تایمر با .2 ثانیه تاخیر هست مثلا بجای delay بذارید 100000 البته این چیز واضحهی هست شاید من منظور شمارو متوجه نشدم درست [hr]


اقای وطن پرست، زحمت آموزش ما هم اضافه شده به کاراتون، شرمنده و ممنون :blush:لطف می کنید ی توضیحی هم راجع به timer بدین؟
و اون شرط timer<delay
ممنون میشم

[hr]
الان این فایل و ببینید
هر 10 ثانیه ماکرو فیلترینگ رو اجرا می کنه.قبلا درستش کرده بودم
اما الان هرکاری کردم.نتونستم اینجا اجراش کنک.که هر چند ثانیه این harekat رو اجرا کنه:dodgy:


ماکروی شمارو اجرا میکنم اتفاقی نمیفته چرا؟؟:huh:

[hr]


سلام
خواهش می کنم اختیار دارید ، راستش اون کدی که دادید من نتونستم استفاده کنم منظورتون اینه که حلقه y رو حذف کنم کلا، در مورد شرط خوب شرط باید داینامیک باشه اون( البته 2 بار به delay مقدار داده شده هر دو بار باید .2 ثانیه بهش اضافه بشه که تاخیر ایجاد کنه بین 2 اجرا برای بهتر اجرا شدن) اما timer باید از یه چیزی کوچکتر باشه که با یک بار برقراری شرط متوقف نشه ، چون به تایمر اضافه میشه delay از جنس تایمر با .2 ثانیه تاخیر هست مثلا بجای delay بذارید 100000 البته این چیز واضحهی هست شاید من منظور شمارو متوجه نشدم درست [hr]


اقای وطن پرست، زحمت آموزش ما هم اضافه شده به کاراتون، شرمنده و ممنون :blush:لطف می کنید ی توضیحی هم راجع به timer بدین؟
و اون شرط timer<delay
ممنون میشم

[hr]
الان این فایل و ببینید
هر 10 ثانیه ماکرو فیلترینگ رو اجرا می کنه.قبلا درستش کرده بودم
اما الان هرکاری کردم.نتونستم اینجا اجراش کنک.که هر چند ثانیه این harekat رو اجرا کنه:dodgy:


ماکروی شمارو اجرا میکنم اتفاقی نمیفته چرا؟؟:huh:




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

[khakzad]

ممنون از توضیحات
الن تایمر ساعت کامپیوتر رو میده؟خروجیش چی هس؟
خط به خط که اجراش می کنم عدد خیلی بزرگی رو نشون میده!! نمیشناسم این timer رو:(
.....................
اره.سورت می کنه.مثلا یکی از a ]ا رو به b تندیل کنید.بعد 10 ثانیه مرتب میشه:)
برای منم اجذا نمیشه.اما اگه بشه، ی چیزی میشه به عنوان تبلیغ.همیشه داخل تکست فعاله.البته یا ی عدد بزرگ به y هم میشه این کارو کرد.اما خب اون کد بهتره

[~M*E*H*D*I~]

الان نمیدونم دلیل اجرا نشدنش چیه یعنی درست درکش نمی کنم باید روش فک کنم حتما راهی هست تایمر به ثانیه هست بزرگ یا کوچیک بودنش برای اجرا اهمیتی نداره مهم هم جنس بودن متغیر های شرط و داینامیک بودنش هست

[safaei.mehdi@mapnablade.com]

سلام
آيا ميشه فايل MarqueeTicker.xls كه با جاوا درست شده رو با vba هم درست كرد؟ طوري كه نياز نباشه دگمه اي رو فشار بديم و به محض باز شدن فايل، خود به خود به حركت در بياد؟ ممنون ميشم.

[~M*E*H*D*I~]

سلام
فایل رو پیوست کردم ببینید منظور شمارو درست متوجه شدم

[safaei.mehdi@mapnablade.com]

جناب آقاي وطن پرست
مرسي از فايلي كه گذاشتين. ولي منظور من اين بود كه تكست باكس به صورت خودكار اجرا بشه، نه اينكه توي يه سلول متن نوشته بشه و بعد متوقف بشه.
سپاسگذارم

[~M*E*H*D*I~]

سلام
بطور کلی شما هر چی رو میخوای با باز شدن فایل اجرا کنی از کد زیر استفاده کن
sub workbook_open()
call نام ماژول
end sub

[safaei.mehdi@mapnablade.com]

سلام
با عرض پوزش به علت تاخیر..از راهنمایی شما سپاسگذارم

[~M*E*H*D*I~]

سلام خدمت دوستان
تو فایل پیوست روش دیگری برای متحرک سازی متن در اکسل ارائه شده امیدوارم مفید واقع بشه(در داخل سل زرد رنگ مقداری وارد کنید و کلید مربوطه رو بزنید متن اجرا خواهد شد و با پاک کردن مقدار سل زرد رنگ حرکت متن متوقف خواهد شد)

[قاسم]

سلام خسته نباشي امكان قرار دادن متن به صورت متحرك وجود دارد؟

[~M*E*H*D*I~]

سلام خسته نباشي امكان قرار دادن متن به صورت متحرك وجود دارد؟


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

[reshehri]

ا تقدیم ادب و احترام خدمت دوستان ارجمند

همانند دستور Marquee در کد های HTML دستوری می خواستم که بتوان متنی را متحرک کرد همانند متن های بالای سایت اکسل ایران

متشکرم

[shamsololama]

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

فایل نمونه:
[attachment=1115]

[علی فاطمی]

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

3415

لطفا راهنمایی بفرمائید.
ممنون از توجه شما.

[~M*E*H*D*I~]

دو تا از فایل ها تو ارشیوم بود بقیه رو هم اگه پیدا کنم پیوست میکنم

[~M*E*H*D*I~]

سلام خدمت دوستان
تو فایل پیوست روش دیگری برای متحرک سازی متن در اکسل ارائه شده امیدوارم مفید واقع بشه(در داخل سل زرد رنگ مقداری وارد کنید و کلید مربوطه رو بزنید متن اجرا خواهد شد و با پاک کردن مقدار سل زرد رنگ حرکت متن متوقف خواهد شد)

مجددا پیوست شد

[علی فاطمی]

ممنون از توجه شما.