VBA help needed [paid]

Hunwarrior

Senior Member
Joined
May 12, 2010
Messages
1,035
Reaction score
876
Hi guys,

I have a VBA script to do some IE automatization. I want to do it threading (in different browsers), and i need help opening a new tab/browser

Can someone guide me on skype? It should be fairly quick for the right person understandig VBA.

Will pay instant on PP.
 
Code:
Dim surl As String
Dim ded As Variant
Dim db As Database
Dim rs As Recordset
Dim archiv As Recordset
Dim sw, ie, x

Set db = CurrentDb
Set rs = db.OpenRecordset("email")
Set archiv = db.OpenRecordset("tmp")

Set sw = CreateObject("Shell.Application")
For Each ie In sw.Windows
    If TypeName(ie.Document) = "HTMLDocument" Then
        x = 1
        GoTo oda
    Else: x = 0
    End If
Next
oda:
If x = 0 Then Set ie = New InternetExplorer
ie.Visible = True

this opens a IE. i need it "if there is a IE running open a new IE or new tab"
 
Back
Top