wrote:la stessa macro in vba apre questo file .html

Ci mostri il codice che apre il file html?

Come primo tentativo, dai l'istruzione

AppActivate "Excel"

subito dopo il metodo Followhyperlink. E vediamo cosa succede 🙂

Ho cercato a lungo, ho trovato una soluzione un po' forzata ma sembra funzionare.

Incolla il codice in un modulo.

Dentro c'è anche una piccola sub di test che ho usato per prova e che ne dimostra l'utilizzo (chiaramente è impostata per il mio pc, apre un file html nella cartella test sul mio desktop, non offendo la tua intelligenza per dirti cosa devi modificare).

Option Explicit

'Update 20140909
'https://www.extendoffice.com/documents/excel/2030-keep-excel-window-on-top.html
#If Win64 Then
    Public Declare PtrSafe Function SetWindowPos _
        Lib "user32" ( _
            ByVal hwnd As LongPtr, _
            ByVal hwndInsertAfter As LongPtr, _
            ByVal x As Long, ByVal y As Long, _
            ByVal cx As Long, ByVal cy As Long, _
            ByVal wFlags As Long) _
    As Long
#Else
    Public Declare Function SetWindowPos _
        Lib "user32" ( _
            ByVal hwnd As Long, _
            ByVal hwndInsertAfter As Long, _
            ByVal x As Long, ByVal y As Long, _
            ByVal cx As Long, ByVal cy As Long, _
            ByVal wFlags As Long) _
    As Long
#End If

Public Const SWP_NOSIZE = &H1
Public Const SWP_NOMOVE = &H2
Public Const HWND_TOPMOST = -1
Public Const HWND_NOTOPMOST = -2

Sub ShowXLOnTop(ByVal OnTop As Boolean)
    Dim xStype As Long
    #If Win64 Then
        Dim xHwnd As LongPtr
    #Else
        Dim xHwnd As Long
    #End If
    If OnTop Then
        xStype = HWND_TOPMOST
    Else
        xStype = HWND_NOTOPMOST
    End If
    Call SetWindowPos(Application.hwnd, xStype, 0, 0, 0, 0, SWP_NOSIZE Or SWP_NOMOVE)
End Sub

Sub SetXLOnTop()
    ShowXLOnTop True
End Sub

Sub SetXLNormal()
    ShowXLOnTop False
End Sub

'PER TEST
Sub test()
    ThisWorkbook.FollowHyperlink "file:///c:\users\franz\desktop\test\online.html"
    SetXLOnTop
End Sub

Perfettamente funzionante, la ringrazio.   

Buona giornata