Excel 2010 _64

[valerij]

Переставил офис 2010_64.
В Excel, в моей проге, вылезла ошибка.
Как мне её исправить, что бы и в Excel 2003, также работала.
Ну не переходить же обратно в 86?

Declare Function GetSystemMetrics Lib "user32.dll" (ByVal nIndex As Long) As Long
Public x As Integer
Public y As Integer

Пишет
Compile error:
The code in this project must be updated for use on 64-bit systems. Please review and update Declare statements and then mark them with the PtrSafe attribute.

[doober]

Валера,тем в инете валом по этому вопросу

[valerij]

Сообщение от doober

Валера,тем в инете валом по этому вопросу

Действительно, я за был
Всё ОК!
Спасибо.

[valerij]

Сообщение от doober

Валера,тем в инете валом по этому вопросу

А принёс на работу, там ХР и не работает.

Declare PtrSafe Function GetSystemMetrics Lib "user32.dll" (ByVal nIndex As Long) As Long

Ответа нет?

[doober]

Part 2
Валера,гугль все знает.

Самая первая строка результата

[EducatedFool]

А это, если нужен ответ на русском языке:
http://excelvba.ru/articles/WinAPI

Поскольку у Валеры все равно ничего не заработает, пока не дашь ему готовый код,
вот решение проблемы:

#If VBA7 Then    '  Office 2010
    Declare PtrSafe Function GetSystemMetrics Lib "user32.dll" (ByVal nIndex As Long) As Long
#Else    '  Office 2003-2007
    Declare Function GetSystemMetrics Lib "user32.dll" (ByVal nIndex As Long) As Long
#End If

[valerij]

Сообщение от EducatedFool

Поскольку у Валеры все равно ничего не заработает, пока не дашь ему готовый код,
вот решение проблемы:

#If VBA7 Then    '  Office 2010
    Declare PtrSafe Function GetSystemMetrics Lib "user32.dll" (ByVal nIndex As Long) As Long
#Else    '  Office 2003-2007
    Declare Function GetSystemMetrics Lib "user32.dll" (ByVal nIndex As Long) As Long
#End If

Это точно, я же уже давно...
Так по мелочам, думаю друзья помогут!!

Только тут ошибка, красным.

[EducatedFool]

Только тут ошибка, красным.

какая ошибка?
у тебя разве выскакивает сообщение об ошибке?


не выскакивает ошибка, и все работает? - ну и пользуйся
(какая разница, каким цветом эти строки кода...)

[valerij]

Сообщение от EducatedFool

ну и пользуйся
(какая разница, каким цветом эти строки кода...)

Понял.
Во как, думал раз красным...

Игорь!!!!!!!!!!!!!!!
С П А С И Б О!!!

---------------
| ^^пиво^^ \\|""\\_,_
|___________||___|__|)
(@)(@)""*|(@)(@)**(@)