VBA - Εκκίνηση / Κλείσιμο των σελίδων στον Internet Explorer

Αυτό το demo επιτρέπει:

  • Για να ανοίξετε μια παρουσία του Internet Explorer
  • Για να ανοίξετε μια σελίδα (URL στο κελί)
  • Αναπληρώστε από άλλη σελίδα.
  • Σημειώστε ότι έχει επίσης χρονοδιακόπτη

Προϋποθέσεις

Προσθέστε την αναφορά:

  • Microsoft Internet Controls
  • Στο πρόγραμμα επεξεργασίας VBA >> Εργαλεία >> Αναφορά και επιλέξτε 'Microsoft Internet Controls'

Η μακροεντολή

 (A), (), (), (), (), (), (), A5] Καθυστέρηση = Φύλλα ("Feuil1") [G8] .Value Αν Καθυστέρηση = 0 Κατόπιν Καθυστέρηση = 15 Ρύθμιση IE = New InternetExplorer IE.Visible = True On Error GoTo IEfermerOuErreur ' Ο χρόνος (Wait ralenti les autres appli) Έναρξη = Χρονοδιακόπτης + Καθυστέρηση "για 15 δευτερόλεπτα Ενώ ο Χρονοδιακόπτης <Έναρξη DoEvents Wend Next Cel" Fermer le navigateur IE.Quit IEfermerOuErreur: Ρύθμιση IE = Καμία εφαρμογή Application.DisplayAlerts = True End Sub 

Σημείωση: Αυτή η μακροεντολή μπορεί να λειτουργήσει σε άλλη εφαρμογή του Office αλλά θα πρέπει να εισαγάγετε τη διεύθυνση URL

Κατεβάστε

Επίδειξη: Βιβλίο εργασίας Excel 97-2003: εδώ

Λειτουργεί στο Excel 2007

Προηγούμενο Άρθρο Επόμενο Άρθρο

Οι Καλύτερες Συμβουλές