Makro solidworks - Otwieranie łącza htm

Macro
1

Witam, szukam kodu, dzięki któremu po kliknięciu na mój przycisk otworzy się mój link .htm w internecie. Ale nie mogę go znaleźć.

2

Witam

Spróbuj czegoś takiego:

Sub Main()
    On Error GoTo Error_CauseAnError

    Dim swApp As SldWorks.SldWorks
    Set swApp = Application.SldWorks

    Dim prog As String
    prog = "C:\Program Files\Mozilla Firefox\firefox.exe"

    Dim strArgument As String
    strArgument = "https://www.lynkoa.com/"
    
    Dim RetVal
    RetVal = Shell("""" & prog & """ """ & strArgument & """", vbNormalFocus)
    
Exit_CauseAnError:
    Exit Sub
Error_CauseAnError:
    MsgBox ("L'accès au programme " & prog & " est impossible.")
    
End Sub

Zamiana wartości prog i strArgument na wartości, które Ci odpowiadają, prog to ścieżka programu, którego chcesz używać do przeglądania Internetu, a strArgument to ścieżka do pliku, który chcesz otworzyć w przeglądarce.

Pozdrowienia

5 polubień
3

Dziękuję d.roger jest idealny :) 

4

@ D.Roger

Zawsze na bieżąco, jeśli chodzi o makra, jesteś cenną pomocą.

Niech moc będzie z tobą

3 polubienia