[ 엑셀 VBA ] 크롬 브라우저 버전 정보 확인하기

크롬 브라우저의 버전 정보를 확이하는 VBA 코드입니다.

 

728x90

 직접 크롬 버전 확인하기

 

크롬 브라우저의 버전 정보를 직접 확인하는 방법입니다.

크롬 브라우저 설정 창을 열고

Chrome정보를 누르면 현재 내 크롬 브라우저의 정보를 알 수 있습니다.

 

 레지스트리에 저장된 브라우저 버전 정보 경로 알아내기

 

위 정보가 내 컴퓨터의 어디엔가 저장돼있을까 하고

먼저 레제스트리 편집기를 열고

그냥 찾아보았습니다.

 

아래 경로의 version에 버전정보가 있습니다.

컴퓨터\HKEY_CURRENT_USER\Software\Google\Chrome\BLBeacon

 

Edge 브라우저의 정보도 찾아보니 아래에 경로에 있네요.

컴퓨터\HKEY_CURRENT_USER\Software\Microsoft\Edge\BLBeacon

 

반응형

 VBA로 내 크롬브라우저 정보 확인하기

 

먼저 VBA를 실행한 다음

도구 → 참조에서

Windows Script Host Object Model을 추가합니다.

 

아래는 전체 코드입니다.

Sub test()
    Set WSShell = CreateObject("Wscript.Shell")
    
    Chrome_version = WSShell.RegRead("HKEY_CURRENT_USER\Software\Google\Chrome\BLBeacon\version")
    
    Debug.Print Chrome_version
End Sub

결과 : 130.0.6723.70

 

먼저 레지스트리를 읽기 위해 Wscript.Shell 객체를 생성합니다.

 

그다음 RegRead() 함수를 사용해

해당 레지스트리의 값을 읽어옵니다.

 

위에서 크롬 브라우저의 버전 정보를 가지고 있는

레지스트리 경로를 확인했으므로

해당 경로를 넣어줍니다.

 

맨 앞에 "컴퓨터\"이 부분은 제외하고 경로를 넣으신 다음

레지스트리 이름인 version까지 포함하셔야 합니다.

 

이렇게 하면 현재 크롬 브라우저의 버전 정보를 확인할 수 있습니다.

물론 동일한 방법으로 엣지 브라우저의 버전 정보도 확인이 가능합니다.

 

만약 버전 정보의 일부만 가지고 오고 싶다면

해당 버전 정보는 "."로 구분되어 있으므로

다음과 같이 코드를 작성하면 

해당 버전의 맨 앞에 130만 가지고 올 수 있습니다.

Sub test()
    Set WSShell = CreateObject("Wscript.Shell")
    
    Chrome_version = WSShell.RegRead("HKEY_CURRENT_USER\Software\Google\Chrome\BLBeacon\version")
    
    main_version = Split(Chrome_version, ".")
    
    Debug.Print main_version(0)
End Sub

※ VBA 셀레니움(Selenium) 사용을 위한 크롬 드라이버 자동 설치 : VBA 크롬 드라이버(Chromedriver) 자동설치

여기를 방문하시면 더 많은 엑셀 관련 자료를 확인할 수 있습니다.

엑셀 공부하기
VBA 공부하기