2014-08-15から1日間の記事一覧

ExcelVBAで動いているExcelが32bitか64bitか判断する

#ifで Function GetExcelProcessBit() As String #If Win64 Then GetExcelProcessBit = "64" #Else GetExcelProcessBit = "32" #End If End Function

ExcelVBAで動いているWindowsが32bitか64bitか判断する

Function GetProcessBit() As String Dim colItems As Object Dim itm As Object Set colItems = CreateObject("WbemScripting.SWbemLocator").ConnectServer.ExecQuery("Select * From Win32_OperatingSystem") GetOSProcessBit = "32" For Each itm In col…