كيفية فتح Internet Explorer وكيفية فتح موقع ويب في Internet Explorer باستخدام Excel VBA

كيفية فتح Internet
Explorer وكيفية فتح موقع ويب في Internet Explorer باستخدام Excel
VBA

بعد أن قُمنا في المقال السابق بتجريف بيانات
الويب باستخدام لغة Excel VBA، سنقوم في هذا المقال بذكر خطوات فتح Internet
Explorer باستخدام Excel VBA، وأيضًا خطوات فتح موقع ويب في Internet Explorer
باستخدام VBA.

أولًا.. كيفية فتح Internet Explorer باستخدام Excel VBA

الخطوة 1): قم بتهيئة المتغير في الإجراءات الفرعية كما هو معروض في الكود التالي:

Sub test()

Dim ie As New InternetExplorer

Dim doc As New HTMLDocument

الخطوة 2): لفتح Internet Explorer باستخدام VBA، اكتب “i.e. visible=true”
واضغط على F5.

Sub test()

Dim ie As New InternetExplorer

Dim doc As New HTMLDocument

Ie.visible=true

ستبدو الوحدة على النحو التالي:

ثانيًا.. كيفية فتح موقع ويب في Internet Explorer باستخدام VBA

فيما يلي خطوات فتح موقع الويب في مستكشف
الإنترنت باستخدام VBA:

الخطوة 1): بمجرد أن تتمكن من الوصول إلى Internet Explorer باستخدام Excel VBA، فإن
الخطوة التالية سوف تتضمن الوصول إلى موقع ويب باستخدام VBA. ويتم تسهيل ذلك بواسطة Navigate Attribute، حيث يجب أن يمر عنوان URL كعلامات
اقتباس مزدوجة في السمة. اتبع الخطوات التالية كما هو معروض.

Sub test()

Dim, ie As New InternetExplorer

Dim doc As New HTMLDocument

Dim ecoll As Object

ie.Visible = True

ie.navigate”http://demo.guru99.com/test/web-table-element.php”

Do

DoEvents

Loop Until ie.readyState = READYSTATE_COMPLETE

الخطوة 2): اضغط على F5 لتنفيذ الماكرو. سيتم فتح صفحة الويب التالية كما هي معروضة:

الآن، أصبح ماكرو Excel جاهزًا فيما يتعلق بأداء
وظائف التجريف. وستعرض الخطوة في المقال القادم كيف يمكن
استخراج المعلومات من Internet Explorer باستخدام VBA.

 شاهد أيضًا: صيغ الدالة CHOOSE واستخدامها في
برنامج Microsoft Excel

وفي نهاية المقال، نتمنى أن نكون قد أفدناكم بما
يخص هذا الجزء من البرمجة باستخدام برنامج Excel، ونضرب لكم موعدًا جديدًا
مستقبلًا مع المزيد من المقالات.