لینک کوتاه : https://magicfile.ir/?p=4585
دانلود نمونه برنامه اکسل ماکرو برای ذخیره و خواندن داده‌ها به فرمت XML
امروز در این پست برای شما کاربران عزیز وبسایت فایل سحرآمیز یک نمونه برنامه اکسل ماکرو برای ذخیره و خواندن داده‌ها به فرمت XML را آماده دانلود قرار داده ایم.
این کد شامل دو بخش اصلی است: بارگذاری داده از فایل XML به اکسل و ذخیره داده از اکسل به فایل XML.
تابع LoadDataFromXML
این تابع داده‌ها را از یک فایل XML به یک صفحه جدید در اکسل وارد می‌کند.
مراحل کار:
-
کاربر یک فایل XML را انتخاب می‌کند.
-
یک شیء XML جدید ایجاد می‌شود.
-
فایل XML بارگذاری می‌شود.
-
یک صفحه جدید با نام "ImportedXMLData" ایجاد می‌شود.
-
داده‌ها از گره‌های XML خوانده شده و در سلول‌های اکسل قرار می‌گیرند.
-
پیام موفقیت نمایش داده می‌شود.
نکات مهم:
-
از کتابخانه MSXML2 برای پردازش XML استفاده شده است.
-
ساختار XML باید شامل گره‌های
Rowو زیرگره‌های آن باشد. -
اگر خطایی در بارگذاری XML رخ دهد، پیغام خطا نمایش داده می‌شود.
تابع SaveDataToXML
این تابع داده‌ها را از صفحه اکسل به یک فایل XML ذخیره می‌کند.
مراحل کار:
-
کاربر محل ذخیره فایل XML را انتخاب می‌کند.
-
یک شیء XML جدید ایجاد می‌شود.
-
داده‌ها از صفحه "Sheet1" خوانده می‌شوند.
-
آخرین سطر و ستون دارای داده پیدا می‌شود.
-
برای هر سطر یک گره
Rowو برای هر سلول یک گرهColumnXایجاد می‌شود. -
فایل XML ذخیره می‌شود.
-
پیام موفقیت نمایش داده می‌شود.
نکات مهم:
-
داده‌ها از صفحه "Sheet1" خوانده می‌شوند (اگر وجود داشته باشد).
-
ساختار XML ایجاد شده شامل یک گره ریشه
Rootو گره‌هایRowبرای هر سطر است. -
هر سلول به عنوان یک گره فرزند با نام
Column1,Column2و ... ذخیره می‌شود.
کاربرد کلی
این کد برای تبادل داده بین اکسل و سیستم‌های دیگر که از XML پشتیبانی می‌کنند مفید است. می‌توان از آن برای:
-
وارد کردن داده از نرم‌افزارهای دیگر به اکسل
-
صادر کردن داده از اکسل برای استفاده در نرم‌افزارهای دیگر
-
ایجاد پشتیبان از داده‌های اکسل در فرمت XML
-
تبادل داده با وب سرویس‌ها یا برنامه‌های تحت شبکه
برای استفاده از این کد، باید آن را در ماژول یک فایل اکسل با قابلیت ماکرو قرار دهید و دو دکمه فرم ایجاد کنید که رویدادهای کلیک آنها به این توابع متصل شوند.
نمونه تصویر در زمان اجرا
برای شما کاربران عزیز پیشنهاد دانلود داده می شود.
