Зміст
Мова програмування Visual Basic для додатків (VBA) дозволяє програмістам Microsoft Office розширити оригінальні можливості Excel. Прикладом цього є програма VBA, яка може вводити інформацію про обліковий запис у веб-сторінку та надсилати цю інформацію. Цей шаблон є ієрархією віртуальних об'єктів, які охоплюють програмовані функції Excel. Надсилання імені користувача та пароля на веб-сайт з VBA зберігає користувача від незручності введення інформації вручну.
Інструкції
Ви можете робити дивовижні речі в Excel (Photos.com/Photos.com/Getty Images)-
Відкрийте Excel і відкрийте вікно коду VBA, натиснувши Alt + F11.
-
Двічі клацніть елемент, який відображає "Ця робоча книга" на панелі навігації в лівій частині екрана. Це відкриє вікно для введення кодів у поточну книгу.
-
Введіть або вставте програму нижче у вікно, яке з'явиться. Ця програма викликає оператор VBA "AppActivate", щоб спрямувати поточний запис програми (Excel) у ваш браузер. Оператор "SendKeys" надсилає введену інформацію, дані облікового запису та пароль для увімкнутого браузера. Текст "{TAB}" і "~" представляють клавіші "Tab" і "Enter". У заяві "Застосування" повідомляється, що Excel швидко призупиняє роботу, щоб дозволити Windows і часу браузера обробити те, що було набрано, і надіслати його.
Public Sub SendPassword () AppActivate "NTNAME", True SendKeys "YourUserName", True Application.Wait 1000 SendKeys "{TAB}", True SendKeys "SUA_SENHA", True Application.
-
Замініть текст "NAVIGATION_NAME" на назву веб-переглядача (наприклад, "Firefox", "Internet Explorer" або "Google Chrome"), які ви будете використовувати для доступу до облікового запису веб-сторінки. Замініть текст "YOUR_USERNAME" та "SUA_SENHA" інформацією про доступ до облікового запису, яка потрібна на сторінці.
-
Відкрийте веб-сторінку, до якої потрібно отримати доступ.
-
Натисніть одну з операцій у підпрограмі "SendPassword" і натисніть "F5", щоб повернути підпрограму. Windows відновить фокус до веб-переглядача, який увімкнено вашою програмою. Ваша програма буде вводити та надсилати інформацію про доступ до облікового запису, який ви ввели в код.
-
Вставте наступну ревізію в першу програму нижче програми, яка вже знаходиться у вікні розробки VBA. Ця версія "sendPassword" не буде вводити інформацію облікового запису для вашого коду, а значення в робочому листі поточної книги. Головною перевагою цього є зручність зміни інформації для входу. Дані, що зберігаються на робочому аркуші, зручніше змінювати, ніж коди програмування.
Public Sub sendPasswordStoredInWorksheet () Dim login, pword, app app = ActiveSheet.Cells (1, 1) .Value login = ActiveSheet.Cells (2, 1) .Value pword = ActiveSheet.Cells (3, 1). Справжній вхід для SendKeys, True Application.Wait 1000 SendKeys "{TAB}", правильне слово SendKeys, True Application.Wait 1000 SendKeys "~", True
End Sub
-
Введіть назву веб-переглядача та реєстраційну інформацію, яка містилася в коді першої версії програми, у перші три клітинки першого листа робочої книги Excel.
-
У браузері вийдіть із облікового запису сайту, до якого звернулася ваша перша програма, і поверніться на сторінку входу до сайту. Запустіть нову версію програми, використовуючи інструкції на кроці 6. Сеанс цього облікового запису почнеться, як на кроці 6.