توضیحات کامل در مورد فایل
دانلود ماکرو اکسل برای دریافت نماد های بورس (دیدبان بازار بورس ایران)
امروز در این پست برای شما کاربران عزیز وبسایت فایل سحرآمیز یک ماکرو اکسل برای دریافت نماد های بورس (دیدبان بازار بورس ایران) را آماده دانلود قرار داده ایم.
نمونه تصویر
معرفی کد
این ماکرو با استفاده از تکنولوژی XMLHTTP متصل میشود و اطلاعات نمادها را از منبع رسمی دریافت میکند. سپس دادهها بهصورت ساختاریافته در یک شیت جدید ایجاد شده و همراه با عنوان ستونها، قالببندی، رنگبندی و فیلتر آماده استفاده میشوند.
ویژگیها و امکانات
-
حذف و ایجاد خودکار شیت دادهها
قبل از هر اجرا، شیت قدیمی حذف و شیت جدید با نامTSETMC_Data
ساخته میشود. -
دریافت دادهها بهصورت لحظهای
استفاده از شیءMSXML2.XMLHTTP
برای ارتباط مستقیم با سرور TSETMC و دریافت متن خام دادهها. -
ساخت جدول ستونی منظم
ایجاد هدرهای کامل شامل:-
شناسه، کد، نام نماد، عنوان، کد عددی، تاریخ، قیمتها، حجم معاملات، EPS و ...
-
-
قالببندی و زیباسازی
-
رنگ پسزمینه سطر هدر آبی تیره با متن سفید
-
رنگآمیزی سطرهای زوج با رنگ ملایم برای خوانایی بیشتر
-
تنظیم خودکار عرض ستونها
-
فعالسازی فیلتر ستونها
-
-
امکان بروزرسانی سریع با یک کلیک
اضافهشدن یک دکمه "بروزرسانی" داخل شیت که با کلیک بر روی آن، دادهها مجدد از سرور دریافت و جایگزین میشوند. -
کد پویا برای دکمه
کد رویداد کلیک دکمه بهصورت خودکار به ماژول شیت اضافه میشود تا کاربر نیاز به ویرایش دستی کد نداشته باشد.
نحوه استفاده
-
اکسل را باز کنید و با کلیدهای
Alt + F11
وارد محیط VBA شوید. -
یک ماژول جدید ایجاد کرده و کد را در آن قرار دهید.
-
در قسمت Trust Center اکسل، اجازه اجرای کدهای VBA را فعال کنید.
-
ماکرو
GetTSETMC_ToExcel_Fast_Fix
را اجرا کنید. -
شیت
TSETMC_Data
بهطور خودکار ساخته و دادهها بارگذاری میشوند. -
برای بروزرسانی دادهها، از دکمه بروزرسانی داخل شیت استفاده کنید.
نکات مهم
-
برای عملکرد صحیح، باید دسترسی اینترنت فعال باشد.
-
به دلیل تغییرات احتمالی در ساختار دادههای سایت، ممکن است نیاز به بروزرسانی کد باشد.
-
اجرای کد در اکسل نیازمند فعالسازی Microsoft XML v6.0 Reference در VBA نیست چون از CreateObject استفاده شده، اما فعالسازی آن سرعت را کمی بهبود میدهد.
برای شما کاربران عزیز پیشنهاد دانلود داده می شود.