Excel 32 ou 64 bits

Re : Excel 32 ou 64 bits

Bonjour

avec ce petit bout de code
(attention les # sont indispensables)

Bien plus d'infos sur ce sujet chez Chip Pearson
Bitness And Office

Re : Excel 32 ou 64 bits

Bonjour et merci pour la piste :
j'ai résolu le problème comme suit :

Function ExcelBitsX() As Boolean
On Error GoTo MsgErreur
#If VBA7 And Win64 Then
ExcelBitsX = True
MsgBox ("Excel 64 Bits")
Range("TypeExcel") = "64"
#Else
ExcelBitsX = False
MsgBox ("Excel 32 Bits")
Range("TypeExcel") = "32"
Exit Function
#End If
MsgErreur:
MsgBox Err.Description
End Function

Bonne journée

Misange à dit:

Bonjour

avec ce petit bout de code
(attention les # sont indispensables)

Code:

Public Function Is64Bit() As Boolean 
#If VBA7 And Win64 Then     
Is64Bit = True 
#Else     
Is64Bit = False 
#End If End Function

Bien plus d'infos sur ce sujet chez Chip Pearson
Bitness And Office

Cliquez pour agrandir...