Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
DiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWord
DirectoryUser Groups
Related Topics
Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ...

MS Office Forum / Word / Programming / May 2006

Tip: Looking for answers? Try searching our database.

A lot of KeyBindings

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
Peter Faulhaber - 30 May 2006 13:02 GMT
Hi All,

I defined a lot of keybindings. Only the first one is working. Any idea?

Sub Toetsen()

   CustomizationContext = ActiveDocument.AttachedTemplate
   KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyAlt, wdKeyT), KeyCategory:= _
       wdKeyCategoryMacro, Command:="Invoegen.Tip"
       
   CustomizationContext = ActiveDocument.AttachedTemplate
   KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyAlt, wdKeyW), KeyCategory:= _
       wdKeyCategoryMacro, Command:="Invoegen.Waarschuwing"
   
   CustomizationContext = ActiveDocument.AttachedTemplate
   KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyAlt, wdKeyI), KeyCategory:= _
       wdKeyCategoryMacro, Command:="Invoegen.Visionummer"
   
   CustomizationContext = ActiveDocument.AttachedTemplate
   KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyAlt, wdKeyH), KeyCategory:= _
       wdKeyCategoryMacro, Command:="Invoegen.Helpfunctie"

   CustomizationContext = ActiveDocument.AttachedTemplate
   KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyAlt, wdKeyR), KeyCategory:= _
       wdKeyCategoryMacro, Command:="Invoegen.Rapport"
             
End Sub
Helmut Weber - 30 May 2006 16:33 GMT
Hi Peter,

difficult to test because of localization issues.
For the last of your attempted key bindings,
I get the message, that Word cannot change
the function for the specified key.

All others work, though with English names for random commands,
which should work in any language.

I don't know, what english commands
are the equivalents for yours, Dutch apparently.

Signature

Gruß

Helmut Weber, MVP WordVBA (US-version)

"red.sys" & chr$(64) & "t-online.de"
Win XP, Office 2003 (US-Versions)

Peter Faulhaber - 30 May 2006 18:39 GMT
Hi Helmut,

The commands are indeed Dutch. After command:= " " are just the macroos for
keybindings.

They macro's are all there. I don't get any failure when compiling or
running this macro. Only the first keybinding is working. The other ones
aren't. When using F8, it is going smoothly no problem at all.

Any idea??

> Hi Peter,
>
[quoted text clipped - 8 lines]
> I don't know, what english commands
> are the equivalents for yours, Dutch apparently.

Rate this thread:






 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.