Страницы: 1
RSS
Проблема запуска макроса в 64битной Win7, Office 2010! Help.
 
Товарищи вот запускаю файл с макросами и на строке "Declare Function SetWindowPos Lib "user32" " вылазиет ошибка.. что то про 64 разрядную Win пишет.. что делать ? что изменить что бы все заработало?  
Отрывок из кода с проблемной строкой:  
 
 
Option Explicit  
 
Type PIVAL  
  rval As Single  
  istat As Long  
  timedate As Long  
End Type  
 
'----- declarations used to make a window "always on top" -----  
'courtesy of Microsoft  
Declare Function SetWindowPos Lib "user32" (ByVal h&, ByVal hb%, ByVal x%, ByVal y%, ByVal cx%, ByVal cy%, ByVal f%) As Integer  
Global Const SWP_NOMOVE = 2  
Global Const SWP_NOSIZE = 1  
Global Const FLAGS = SWP_NOMOVE Or SWP_NOSIZE  
Global Const HWND_TOPMOST = -1  
Global Const HWND_NOTOPMOST = -2
 
Попробуйте так:  
Declare PtrSafe Function SetWindowPos Lib "user32" (ByVal h&, ByVal hb%, ByVal x%, ByVal y%, ByVal cx%, ByVal cy%, ByVal f%) As Integer
 
Вместо Long пропишите LongLong должно заработать...
 
неужели сложно было воспользоваться поиском...  
 
http://answers.microsoft.com/ru-ru/office/forum/office_2010-excel/%D0%BA%D0%B0%D0%BA-http://answers.microsoft.com/ru-ru/office/forum/office_2010-excel/%D0%BA%D0%B0%D0%BA-%D0%BF%D1%80%D0%B0%D0%B2%D0%B8%D0%BB%D1%8C%D0%BD%D0%BE-%D0%B4%D0%B5%D0%BA%D0%BB%D0%B0%D1%80%D0%B8%D1%80%D0%BE%D0%B2­%D0%B0%D1%82%D1%8C-setwindowlong-%D0%B8/c0b5696d-e043-e011-9767-d8d385dcbb12%D0%BF%D1%80%D0%B0%D0%B2%D0%B8%D0%BB%D1%8C%D0%BD­%D0%BE-%D0%B4%D0%B5%D0%BA%D0%BB%D0%B0%D1%80%D0%B8%D1%80%D0%BE%D0%B2­%D0%B0%D1%82%D1%8C-setwindowlong-%D0%B8/c0b5696d-e043-e011-9767-d8d385dcbb12
 
Как-то криво ссылка вставилась...  
 
http://answers.microsoft.com/ru-ru/office/forum/office_2010-excel/%D0%BA%D0%B0%D0%BA-%D0%BF%D1%80%D0%B0%D0%B2%D0%B8%D0%BB%D1%8C%D0%BD%D0%BE-%D0%B4%D0%B5%D0%BA%D0%BB%D0%B0%D1%80%D0%B8%D1%80%D0%BE%D0%B2­%D0%B0%D1%82%D1%8C-setwindowlong-%D0%B8/c0b5696d-e043-e011-9767-d8d385dcbb12
 
кароче сделал еще проще что бы все макросы не переписывать, снес Office 2010 64bit и поставил 32bit :)
Страницы: 1
Читают тему
Наверх
Loading...