ImageToXcel hata veriyor

[Erdal]

Merhabalar
Arşivimi karıştırırken Ivan F. Moala'nın resim işleme programını buldum. Ama çalıştırdığımda hata veriyor.
Acaba ustalarımız bir bakabilir mi? Saygı ve selam ile ...

 

[Erdal]

Almış olduğum hatayı ekledim.

 

[dost]

Merhaba,

#If Win64 Then
   Private Declare PtrSafe Function GetTempPath Lib "kernel32" _
        Alias "GetTempPathA" (ByVal nBufferLength As Long,  ByVal lpBuffer As String) As Long
#Else
   Private Declare Function GetTempPath Lib "kernel32" _
        Alias "GetTempPathA" (ByVal nBufferLength As Long,  ByVal lpBuffer As String) As Long
#End If

NOT: Diğer Function'ların hepsini aynı mantıkla yaparsınız.

 

[Erdal]

Merhaba,

#If Win64 Then
   Private Declare PtrSafe Function GetTempPath Lib "kernel32" _
        Alias "GetTempPathA" (ByVal nBufferLength As Long,  ByVal lpBuffer As String) As Long
#Else
   Private Declare Function GetTempPath Lib "kernel32" _
        Alias "GetTempPathA" (ByVal nBufferLength As Long,  ByVal lpBuffer As String) As Long
#End If

NOT: Diğer Function'ların hepsini aynı mantıkla yaparsınız.

İlginiz için teşekkürler. Söylediğinizi yapmaya çalışacağım. Takıldığım yerde danışabilir miyim acaba? VBA konusuna çok hakim değilim de. Saygı ve selam ile ...