OVH Cloud OVH Cloud

showdataform

5 réponses
Avatar
claude
bonjour à tous
pour modifier un tableau, je voudrais afficher le formulaire (excel XP)

l'enrregistreur de macro me donne

Range("une_cellule_de_mon_tableau").Select
ActiveSheet.ShowDataForm

quand j'exécute la macro, j'obtiens une erreur

?????????
que faire ?
merci d'avance
claude

5 réponses

Avatar
Sabatier \(pseudo\)
Bonjour,
Par défaut Excel utilise une plage
nommée "Base_de_données" (mot réservé)
commençant en A1...

si cette plage n'est pas définie, il faut la définir au
moins une fois
ou bien la redefinir à chaque fois(cas de plusieurs
grilles sur la meme feuille)

Sub doclaude()
Range("une_cellule_de_mon_tableau").CurrentRegion.Name
= "base_de_données"
ActiveSheet.ShowDataForm

End Sub


-----Message d'origine-----
bonjour à tous
pour modifier un tableau, je voudrais afficher le
formulaire (excel XP)


l'enrregistreur de macro me donne

Range("une_cellule_de_mon_tableau").Select
ActiveSheet.ShowDataForm

quand j'exécute la macro, j'obtiens une erreur

?????????
que faire ?
merci d'avance
claude


.



Avatar
claude
bonjour
merci pour le coup de main et pour l'explication
en pratique, j'ai un peu transformé, la macro tel quel ne marchait pas
j'ai nommé mon tableau "base_de_données", puis je détruis le nom après

Sub doclaude()
Range("a6").CurrentRegion.Select
ActiveWorkbook.Names.Add Name:="base_de_données", RefersToR1C1:=Selection
ActiveSheet.ShowDataForm
ActiveWorkbook.Names("base_de_données").Delete
Range("a1").Activate
End Sub

merci beaucoup
claude
Avatar
sabatier
je n'aurais pas dit autrement, sans pseudo, au grand jour, lumière parmi
les lumières...
jps

Sabatier (pseudo) a écrit:
Bonjour,
Par défaut Excel utilise une plage
nommée "Base_de_données" (mot réservé)
commençant en A1...

si cette plage n'est pas définie, il faut la définir au
moins une fois
ou bien la redefinir à chaque fois(cas de plusieurs
grilles sur la meme feuille)

Sub doclaude()
Range("une_cellule_de_mon_tableau").CurrentRegion.Name
= "base_de_données"
ActiveSheet.ShowDataForm

End Sub



-----Message d'origine-----
bonjour à tous
pour modifier un tableau, je voudrais afficher le


formulaire (excel XP)

l'enrregistreur de macro me donne

Range("une_cellule_de_mon_tableau").Select
ActiveSheet.ShowDataForm

quand j'exécute la macro, j'obtiens une erreur

?????????
que faire ?
merci d'avance
claude


.






Avatar
sabatier
beau subterfuge, claude (ne cherche pas la CPT, geedee, y en a pas et
puis les tiennes, je ne les ai pas comprises, alors...)
jps

claude a écrit:
bonjour
merci pour le coup de main et pour l'explication
en pratique, j'ai un peu transformé, la macro tel quel ne marchait pas
j'ai nommé mon tableau "base_de_données", puis je détruis le nom après

Sub doclaude()
Range("a6").CurrentRegion.Select
ActiveWorkbook.Names.Add Name:="base_de_données", RefersToR1C1:=Selection
ActiveSheet.ShowDataForm
ActiveWorkbook.Names("base_de_données").Delete
Range("a1").Activate
End Sub

merci beaucoup
claude





Avatar
Clément Marcotte
Est-ce que cela veut dire que le prochain souper du MPFE aura deux
maîtres-chantres ? :-)