1 над всеми окнами или только в икселе?  
 
2 object.Accelerator [= String](или на странице свойств)

а как сделать так чтобы на форме была кнопка свернуть в заголовке?

форма в немодальном режиме и так поверх окон иксель  
 
а сворачивание или ontop - это надо уже свои окна создавать  
 
не windows os, конечно, но с использованием евонного API

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _    
     (ByVal lpClassName As String, _    
     ByVal lpWindowName As String) As Long    
Private Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, _    
     ByVal hWndInsertAfter As Long, _    
     ByVal X As Long, ByVal Y As Long, _    
     ByVal cx As Long, ByVal cy As Long, _    
     ByVal wFlags As Long) As Long    
Private Const HWND_NOTOPMOST = -2    
Private Const HWND_TOPMOST = -1    
Private Const SWP_NOMOVE = &H2    
Private Const SWP_NOSIZE = &H1    
 
Вот сам нашел. Может кому-нибудь понадобится.  
 
 
Private Sub UserForm_Activate()    
Dim hWnd As Long    
  hWnd = FindWindow(vbNullString, Me.Caption)    
      Call SetWindowPos(hWnd, HWND_TOPMOST, 100, 0, 100, 0,WP_NOMOVE Or SWP_NOSIZE)    
 
'*******Форма в нормальное положение**************    
'       Call SetWindowPos(hWnd, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE)    
'**********************************************    
End Sub

Сергей. Прошу!)

Panic, спасибо. Насчет горячих - когда рекордером пишешь макрос у тебя ведь есть возможность назначить этому макросу горячие клавиши. Так? Если подвесишь свой записанный макрос на кнопки формы - они и горячими будут управляться. Вроде так.

Я выделил кнопку, свойства, акселератор и там указал желаемую букву.

а можно каким-то образом убрать из формы которая поверх всех окон убрать кнопки свернуть и закрыть?

Для того, чтобы убрать заголовок формы, достаточно скопировать весь нижеприведённый код в модуль нужной формы.    
   
Private Declare Function FindWindow _    
       Lib "user32.dll" Alias "FindWindowA" ( _    
       ByVal lpClassName As String, _    
       ByVal lpWindowName As String) As Long    
Private Declare Function GetWindowLong _    
       Lib "user32.dll" Alias "GetWindowLongA" ( _    
       ByVal hWnd As Long, _    
       ByVal nIndex As Long) As Long    
Private Declare Function SetWindowLong _    
       Lib "user32.dll" Alias "SetWindowLongA" ( _    
       ByVal hWnd As Long, _    
       ByVal nIndex As Long, _    
       ByVal dwNewLong As Long) As Long    
Private Declare Function DrawMenuBar Lib "user32.dll" ( _    
       ByVal hWnd As Long) As Long    
 
Private Sub UserForm_Initialize()    
   Dim ihWnd As Long, iStyle As Long    
 
   ihWnd = FindWindow(vbNullString, Me.Caption)    
   iStyle = GetWindowLong(ihWnd, -16&)    
   SetWindowLong ihWnd, -16&, iStyle And Not &HC00000    
   DrawMenuBar ihWnd    
End Sub

как лучше создать форму, вручную или макросом? може геометрия формы и ее содержимого изменяться при открытии на разных машинх?

Спасибо всем, очень полезная информация.