Im Loop neue Objekte erzeugen
11.07.2013 22:59:36
Stephan
ich habe ein Makro mit dem ich ein Web Objekt erzeuge und damit arbeite.
Dim ohttp As Object
Set ohttp = CreateObject("Microsoft.XMLHTTP")
Jetzt möchte ich eine Liste Abarbeiten und für jeden Eintrag in der Liste ein neues Objekt erzeugen.
z.B.
ohttp1
ohttp2
...
So geht es wohl nicht.
Dim i As Integer
For i = 1 To 5
Dim ohttp & i As Object
Next
Wie bekomme ich das hin ?