Afficher grille dans excel

Résolu/Fermé
cbauf Messages postés 4297 Date d'inscription lundi 31 mars 2008 Statut Contributeur Dernière intervention 22 juin 2022 - 8 avril 2009 à 23:52
cbauf Messages postés 4297 Date d'inscription lundi 31 mars 2008 Statut Contributeur Dernière intervention 22 juin 2022 - 9 avril 2009 à 21:29
Bonjour,

J'ai un petit soucis :
J'essaie d'afficher la grille sous excel 200
ceci a l'aide d'une magros
Sub VA_A_zone_grill_MC()
'
' VA_A_zone_grill_MC Macro
' Macro enregistrée le 08.04.2009 par xxx
'

'
    Application.Goto Reference:="ZONE_GRILLE_MC"
    ActiveSheet.ShowDataForm
End Sub


Comme mon tableau est plus grand que 32 champs
j'ai du délimité avec un zone nommée :="ZONE_GRILLE_MC"

En activant la routines à l 'aide d'un bouton
j'ai un message d'erreur
"Champs trop nombreux pour la grille"

Alors que :

si je me place dans cette zone est que je passe par le menus ►Données►Grille
Excel me l'affiche san problème !

Y'a-t-il une solution ?

Merci d'avance
A voir également:

1 réponse

pilas31 Messages postés 1825 Date d'inscription vendredi 5 septembre 2008 Statut Contributeur Dernière intervention 24 avril 2020 643
9 avril 2009 à 17:43
Bonjour,

J'ai fait des tests et effectivement ActiveSheet.ShowDataForm ne se comporte pas de la même manière que la commande manuelle. Par défaut il prend une plage de données dont le nom doit être "Database" en version anglaise et "Base_de_données" en version française d'Excel.
En clair il ne tient pas compte de ta plage "ZONE_GRILLE_MC" et il prend toute la première ligne comme grille ce qui lui fait trop de champs.

Donc deux solutions soit tu supprimes des champs en entête de feuille soit tu renommes ta plage en "Base_de_données"

A+
1
cbauf Messages postés 4297 Date d'inscription lundi 31 mars 2008 Statut Contributeur Dernière intervention 22 juin 2022 783
9 avril 2009 à 21:29
Salut pilas31,

Merci de ta réponse..qui me résoud le Blem (+1)

En rennomant ma "ZONE_GRILLE_MC" en ► "Base_de_données" (version FR)
et changement de nom fait dans la routine

Tout fonctionne à merveillesss ;DD*
0