Find a Application Fullname, through VBA, eg: chrome.exe'Fullname

[drom]

Hi and thanks in advance!

I my PC, Chrome.exe file application is located within the folder:

• C:\Program Files (x86)\Google\Chrome\Application\chrome.exe
  • So My chrome.exe FullName is:
    • C:\Program Files (x86)\Google\Chrome\Application\chrome.exe

But in some computers is located on:

• C:\Program Files\Google\Chrome\Application\

So I would like to find chrome.exe full path in a PC (mine, yours...)


ps: At persent I am getting the Chrome fullname, going through every Folder/File I have in my Drives...

• \Subfolders\ Files

But this is taking to long, and ovbiously is not a good aproach (Works but the way is not good)

Any Help

 

[John_w]

If Chrome is the default application for a specific file type, for example .htm or .html files, you can find its full file name by using one of the methods described by @Jaafar Tribak in this thread:

(FindExecutable) - (AssocQueryString) - (IAssocHandler Interface)

In an attempt to answer this question and aftter searching this subject in the last few days, I found that the FindExecutable API function doesn't always work for finding the (.exe) associated with a specific document file. This API function works consistently when applied to some file...

www.mrexcel.com

 

[drom]

Looks like doing this works Fine

Dim WSHShell As Object:               Set WSHShell = CreateObject("WScript.Shell")
Dim wChromePath As String'            Chrome.exe
    wChromePath = WSHShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\chrome.exe\")
    Shell (wChromePath & " -url -newtab " & rCell.Hyperlinks(1).Address) 'hl)

In my PC Chrome is not the default application for htm files

• Anyway I will use @Jaafar Tribak in some other jobs!