1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

VBA help needed [paid]

Discussion in 'Hire a Freelancer' started by Hunwarrior, Dec 14, 2011.

  1. Hunwarrior

    Hunwarrior Jr. VIP Jr. VIP Premium Member

    Joined:
    May 12, 2010
    Messages:
    1,027
    Likes Received:
    859
    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.
     
  2. Hunwarrior

    Hunwarrior Jr. VIP Jr. VIP Premium Member

    Joined:
    May 12, 2010
    Messages:
    1,027
    Likes Received:
    859
    noone?
     
  3. freeufcdotinfo

    freeufcdotinfo Power Member

    Joined:
    Jun 12, 2008
    Messages:
    685
    Likes Received:
    155
    Could you post the code you have problems with - I may be able to help
     
  4. Hunwarrior

    Hunwarrior Jr. VIP Jr. VIP Premium Member

    Joined:
    May 12, 2010
    Messages:
    1,027
    Likes Received:
    859
    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"