CommandButton random statu

[cromano]

Hello,
Firstly I want to apologize English is not my native language I use Google Translate to describe my problem.
I have a file created in Office 2007. This file contains several buttons (move in the document, copy table, highlighted, etc ...). We went to Word 2013 and nothing is running ... The color code has changed ... it is good that has been corrected...
But I'm stuck on a random problem... When I use a button and then I move in document certain button changes to "design mode" on the other remains in normal mode... so I use a button that is in normal mode and that there was some button in design mode switches to normal mode and get it into their design mode... All this randomly, finally I board found no logic to these changes...
Does anyone has an idea?
Cédric Romano

Bonjour,
Tout d’abord je tiens à m’excuser l’anglais n’étant pas ma langue d’origine j’utilise Google Translate pour vous décrire mon problème.
J’ai un fichier créé sous Office 2007. Ce fichier contient plusieurs boutons (déplacement dans le document, copie de tableau, surbrillance, etc…). Nous sommes passé à Word 2013 et plus rien en marche… Les code couleur ont changé… ça c’est bon cela à été corrigé…
Mais la je bloque sur un problème aléatoire… Lorsque j’utilise un bouton puis je me déplace dans le document certain bouton passe en « mode création » d’autre reste en mode normal… j’utilise alors un bouton qui est en mode normal et voilà que certain bouton qui était en mode création passe en mode normal et d’autre se mettent en mode création… Tout ceci de manière aléatoire, enfin je n’ais pas trouvé de logique à ces changements…
Quelqu’un a-t-il une idée ?


Cédric Romano</SPAN>

[jpb103]

Neat problem Cédric. I too have had some problems with command buttons, though not this problem specifically. I would recommend making a new document, formatting it appropriately with command buttons and such so that it looks like the original, and then pasting the code from the old document into the new one. I realize that if the file in question is large, this may not be the best option for you. At the very least, this procedure would help narrow down where the problem lies.

[cromano]

I found how to generate the problem ... This is when I use a displacement in the document that the problem occurs. I used two displacement method:
- Using section
- Using the index tables

Both choices produce the same result: some switches to pseudo edition. I can move the buttons, the properties are not available in the format of the form most tabs are grayed out ...

Someone has an idea?

J'ai trouvé comment générer le problème... C'est lorsque j'utilise un déplacement dans le document que le problem survient. J'ai utilisé deux méthode de déplacement :
- En utilisant les section
- En utilisant l'index des tableaux
Les deux choix produis le même résultat : certain passe en mode de pseudo edition. Je peux déplacer les boutons, les propriétés ne sont pas accessible, dans le format de la form la plupart des onglets sont grisée...
Quelqu'un a une idée ?

[jpb103]

Can you post the code?

[cromano]

For the section move metod:
My first click make this code :

Private Sub Autre_Click()
     Selection.GoTo What:=wdGoToSection, Which:=wdGoToFirst, Count:=6, Name:=""
End Sub

Next click this code :

Private Sub PhyRetour_Click()
     Selection.GoTo What:=wdGoToSection, Which:=wdGoToFirst, Count:=1, Name:=""
End Sub

For the index table metod :
My first click make this code :

Private Sub PsyRetour_Click()
     DeclarationVariable
     ThisDocument.Tables(EntetePageI).Cell(1, 2).Select
     Selection.Move
End Sub

Next click this code :

Private Sub Hebergement_Click()
     DeclarationVariable
     ThisDocument.Tables(PGAHebergement).Cell(7, 1).Select
     Selection.Move
End Sub

With this two metod, after the second click the button always go "edition" mode

[cromano]

I tried to uninstall any update Word / office except the KB2881035 that you can not uninstall "standard", the problem is still present

[cromano]

My last update... I have make a document with 3 section in new page and y have use CommandButton on section 1 and 3.

The CommandButton1 instruction is :

 Private Sub CommandButton1_Click()
    Selection.GoTo What:=wdGoToSection, Which:=wdGoToFirst, Count:=3, Name:=""
End Sub

 The CommandButton2 instruction is :
 Private Sub CommandButton1_Click()
    Selection.GoTo What:=wdGoToSection, Which:=wdGoToFirst, Count:=1, Name:=""
End Sub

The bug occured... in file attach the document...

[jpb103]

I can't seem to generate an error of any kind in this file.