Здравствуйте !!!

 Стоит следущая задача,  когда на экселевском листе делаешь ВЕРТИКАЛЬНУЮ ПРОКРУТКУ надо чтобы сработал этот код :

   ActiveWindow.FreezePanes = False

   Rows("3:3").Select

   ActiveWindow.FreezePanes = True

 а когда на экселевском листе делаешь ГОРИЗОНТАЛЬНУЮ ПРОКРУТКУ надо чтобы сработал этот код :

   ActiveWindow.FreezePanes = False

   Columns("B:B").Select

   ActiveWindow.FreezePanes = True


 Сам я пробую решить эту задачу спомощью WinAPI функций , но пока как-то безуспешно