İptal Edildi

Convert Microsoft Code to MAC

I need a Visual Studio Code converted to a Mac Code. I need to be able to paste into VB.

Sub tt()

On Error GoTo errorhandler

Dim ie As InternetExplorer

Set ie = New InternetExplorer

With ie

.navigate "[login to view URL]"

.Visible = False

While .Busy Or .readyState <> READYSTATE_COMPLETE: DoEvents: Wend

End With

lrw = Range("C1048576").End(xlUp).Row

frw = Range("A1048576").End(xlUp).Row + 1

For i = frw To lrw

Select Case [login to view URL]

Case "affidavit of heirship"

nm = Cells(i, "K")

zip = Cells(i, "O")

Case "foreclosure"

nm = Cells(i, "M")

zip = Cells(i, "Q")

Case "probates"

nm = Cells(i, "L")

zip = Cells(i, "P")

Case "substitute trustee"

nm = Cells(i, "L")

zip = Cells(i, "P")

End Select

[login to view URL]("form-control autocomplete-lastname-defer")(0).Value = nm

[login to view URL]("form-control autocomplete-city")(0).Value = zip

[login to view URL]("search-form-button-submit btn btn-md btn-primary")(0).Click

With ie

While .Busy Or .readyState <> READYSTATE_COMPLETE: DoEvents: Wend

End With

[login to view URL] Now() + TimeValue("0:00:02")

[login to view URL]("btn btn-primary link-to-details")(0).Click

With ie

While .Busy Or .readyState <> READYSTATE_COMPLETE: DoEvents: Wend

End With

[login to view URL] Now() + TimeValue("0:00:03")

Set p = [login to view URL]("h2")

For Each pp In p

If InStr(1, [login to view URL], "Phone Numbers") >= 1 Then

Set q = [login to view URL]

r = [login to view URL]("detail-box-content")(0).innerText

ar = Split(r, Chr(10))

For j = 0 To UBound(ar)

If Len(ar(j)) > 5 And InStr(1, ar(j), "Show") < 1 Then

ar2 = Split(ar(j), " - ")

If Cells(i, "A") = "" Then

Cells(i, "A") = Trim(ar2(0))

Else

Cells(i, "A") = Cells(i, "A") & "," & Trim(ar2(0))

End If

End If

Next j

Exit For

End If

Next

eml = [login to view URL]("detail-box-email")(0).innerText

arr = Split(eml, Chr(10))

For j = 0 To UBound(arr)

If Len(arr(j)) > 5 And InStr(1, arr(j), "Show") < 1 Then

If Cells(i, "B") = "" Then

Cells(i, "B") = Trim(arr(j))

Else

Cells(i, "B") = Cells(i, "B") & "," & Trim(arr(j))

End If

End If

Next j

[login to view URL]("form-control")(5).Click

' [login to view URL] = True

' [login to view URL]

Next i

errorhandler:

If [login to view URL] = 91 Then

MsgBox "Capcha issue found on website, the code will now exit.", vbCritical

[login to view URL] = True

Else

[login to view URL]

MsgBox "Processing Complete !", vbInformation

End If

End Sub

Beceriler: Mac OS, PHP, Yazılım Mimarisi, VB.NET, Visual Basic

Daha fazlasını gör: convert microsoft sql bak, convert microsoft publisher brochure pdf document, convert microsoft word forms pdf, open visual studio code from command line windows, open visual studio code from terminal mac, install vscode mac, vs code, code command not found mac, open visual studio code from command line mac, mac code app, open visual studio code from terminal ubuntu, convert vb6 code crystal reports net, convert microsoft works word, convert microsoft works document miscrosoft word, convert clipper code visual fox pro, convert vb6 code mac compatible, convert embed code video, convert microsoft works document word, code changes convert microsoft jvm sun jvm, convert code mac

İşveren Hakkında:
( 0 değerlendirme ) Stafford, United States

Proje NO: #19332772

Bu iş için 2 freelancer ortalamada $168 teklif veriyor

xinglong717

Hi, How are you today? I have just read your job description carefully and I am very interesting in your job. I am a senior Excel,VBA,C,C++ ,C# developer with 10 years experiences and I have developed many program of Daha Fazla

1 gün içinde %bids___i_sum_sub_32%%project_currencyDetails_sign_sub_33% USD
(50 Değerlendirme)
5.4
Ivan927

Hello! I am very interested in your post project. i am really looking for this kind of project for a long time in freelancer since i have rich experience on it. I think this project is very suitable for me and i am Daha Fazla

1 gün içinde %bids___i_sum_sub_32%%project_currencyDetails_sign_sub_33% USD
(11 Değerlendirme)
4.7