Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
26.04.2024 16:05:28
PivotChart-Stapeldiagramm erstellen
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
644to648
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
644to648
644to648
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Daten in IE schreiben - variabel

Daten in IE schreiben - variabel
29.07.2005 10:07:46
Galenzo
Hallo,
mit der Anweisung
oIE.Document.all.Vorname.Value = "galenzo"
kann ich Daten in einen offenen Internet Explorer schreiben.
Mein Problem nun: wie kann ich die Feldbezeichnung variabel halten, um diese Anweisung für mehrere Felder nutzen zu können? Ich dachte so an die Definition einer Stringvariable - das Problem ist aber die richtige Syntaxx.

oIE.Document.all.Vorname..Value
oIE.Document.all.Nachname..Value
oIE.Document.all.Adresse..Value
oIE.Document.all.Stadt..Value
Danke & Grüße

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Daten in IE schreiben - variabel
29.07.2005 11:56:25
bst
Hallo Galenzo,
versuch's vielleicht mal so:
oIE.Document.all.item("Vorname").Value
vielleicht hilft Dir auch sowas weiter:
set Elemente = oDoc.getElementsByName("Vorname")
Ich habe das aber auch nur 'probiert', kenne mich da also nicht wirklich aus...
Siehe vielleicht auch: http://msdn.microsoft.com/library/default.asp?url=/workshop/author/dhtml/reference/objects/obj_document.asp
cu, Bernd
--
Option Explicit

' Extras-Verweise:
' - M$ Internet Controls
' - M$ HTML Object Library

Const SuchURL = "http://www.google.de/"

Sub LeseSeite()
   Dim shWindows As SHDocVw.ShellWindows
   Dim oIE As SHDocVw.InternetExplorer
   Dim oDoc As HTMLDocument
   Dim Element As Object
   Dim i As Long
   
   Set shWindows = New SHDocVw.ShellWindows
   Application.EnableEvents = False
   
   For Each oIE In shWindows
      If oIE.LocationURL = SuchURL Then
         Set oDoc = oIE.Document
         For Each Element In oDoc.all
            i = i + 1
            Cells(i, 1).Value = Element
            Cells(i, 2).Value = TypeName(Element)
            On Error Resume Next
            Cells(i, 3).Value = Element.Name
            On Error GoTo 0
         Next
         i = i + 1
         For Each Element In oDoc.getElementsByName("meta")
            i = i + 1
            Cells(i, 1).Value = Element
            Cells(i, 2).Value = TypeName(Element)
            Cells(i, 3).Value = Element.Name
         Next
      End If
   Next
   
   Application.EnableEvents = True
End Sub

Anzeige
Danke
01.08.2005 10:21:36
Galenzo
werd' ich mal so testen. Vielen dank.

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige