De: Laurent Longre <laurent.longre@free.fr>
Objet: Re: Enhanced Data Form, Donn&eacute;s Grille am&eacute;lior&eacute;
Date : lundi 21 août 2000 19:18


http://www.j-walk.com/ss/excel/files/dataform.htm

J. Walkenbach n'a apparemment pas pens&eacute; à prendre en compte la
possibilit&eacute; que cette macro soit install&eacute; sur des versions non-US
d'Excel.

Pour pouvoir l'utiliser, faire Alt-F8, taper ShowDataform dans la zone
"Nom de la macro" et cliquer sur "Ex&eacute;cuter".

Ou alors, construire une nouvelle macro XLA avec le code suivant dans le
module ThisWorkbook, puis l'installer par Outils -> Macros
compl&eacute;mentaires.

Private Sub Workbook_AddinInstall()
  With Application.AddIns("Enhanced Data Form")
    If Not .Installed Then .Installed = True
  End With
  With Application.CommandBars(1)
    With .FindControl(ID:=30011).Controls.Add _
    (Before:=.FindControl(ID:=860, Recursive:=True).Index + 1)
      .Caption = "Grille am&eacute;lior&eacute;"
      .OnAction = "ShowDataForm"
    End With
  End With
End Sub

Private Sub Workbook_AddinUninstall()
  Application.CommandBars(1).FindControl(ID:=30011) _
    .Controls("Grille am&eacute;lior&eacute;").Delete
  Application.AddIns("Enhanced Data Form").Installed = False
End Sub

Cette macro ajoute une commande "Grille am&eacute;lior&eacute;" juste en-dessous de
Donn&eacute;s -> Grille, qui lance le programme de J.Walk. Je l'ai reproduite
dans le fichier ci-joint.

Pour avoir une version totalement francis&eacute; de cette macro, je crois que
le mieux est de s'adresser à l'auteur lui-même (comme elle est
prot&eacute;g&eacute;!)... en lui proposant &eacute;ventuellement de faire la traduction
gratos pour lui!

Laurent

Cl&eacute;ment Marcotte a &eacute;crit :
> 
> Sans rien promettre, serait-il possible d'avoir la macro en question; soit
> par courriel, soit par une adresse Internet.
> 
> Merci.
> 
> --
> Cl&eacute;ment Marcotte
> "Être vraiment patient, c'est être patient quand vous ne pensiez plus qu'il
> &eacute;tait possiblement concevable de l'être."
> - L&eacute;onard de Vinci
> "Daniel Fieux" <Daniel.Fieux@aricia.fr> a &eacute;crit dans le message news:
> B5C6ED68.6640%Daniel.Fieux@aricia.fr...
> > Quelqu'un aurait-il d&eacute;jà eu l'id&eacute; ing&eacute;nieuse de franciser la macro
> > compl&eacute;mentaire de John Walkenbach qui  remplace le formulaire de la
> commande
> > Donn&eacute;s Grille par un autre beaucoup plus fonctionnel ?
> > Ou bien quelqu'un aurait-il cr&eacute;&eacute; quelque chose de similaire ?
> > Merci
> > 