Office - APIs SOLO para la ejecucion de Excel x64

   
Vista:
Imágen de perfil de JoaoM

APIs SOLO para la ejecucion de Excel x64

Publicado por JoaoM (15 intervenciones) el 29/11/2014 19:51:55
Tengo esta declaración que encontre en la WEB y no se exactamente para que fin se usa, cual es su finalidd o si SOLO ES UN EJEMPLO.

Segun el titulo dice: Using Conditional Compilation Attributes "Usando atributos de compilación condiciona"
desde aqui http://msdn.microsoft.com/en-us/library/ee691831%28office.14%29.aspx#odc_office2010_Compatibility32bit64bit_Comparing32BitSystemsto64BitSystems

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
#if VBA7 then    ' VBA7 
Declare PtrSafe Function SHBrowseForFolder Lib "shell32.dll" _
  Alias "SHBrowseForFolderA" (lpBrowseInfo As BROWSEINFO) As Long
 
Public Type BROWSEINFO
  hOwner As LongPtr
  pidlRoot As Long
  pszDisplayName As String
  lpszTitle As String
  ulFlags As Long
  lpfn As LongPtr
  lParam As LongPtr
  iImage As Long
End Type
 
#else    ' Downlevel when using previous version of VBA7
 
Declare Function SHBrowseForFolder Lib "shell32.dll" _
  Alias "SHBrowseForFolderA" (lpBrowseInfo As BROWSEINFO) As Long
 
Public Type BROWSEINFO
  hOwner As Long
  pidlRoot As Long
  pszDisplayName As String
  lpszTitle As String
  ulFlags As Long
  lpfn As Long
  lParam As Long
  iImage As Long
End Type
 
#end if
Sub TestSHBrowseForFolder ()
    Dim bInfo As BROWSEINFO
    Dim pidList As Long
 
    bInfo.pidlRoot = 0&
    bInfo.ulFlags = &H1
    pidList = SHBrowseForFolder(bInfo)
End Sub

Tengo varios libros con macros creadas en office x86 y quiero usar los mismos libros en Office x64

Se que hay APIs para tal fin pero n ose cuales son.

Quiero API o APIs SOLAMENTE para PODER USAR dichos libros en Office x64 sin que me mande algun mensaje
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder