OVH Cloud OVH Cloud

à mon tour

11 réponses
Avatar
RGI
Bonjour

cette formule fonctionne
Sub defilement()
Dim i As String
i = xlDialogOpen
Application.Dialogs(i).Show
End Sub

comment puis-je faire pour remplacer xlDialogOpen de ce code par la
valeur d'une cellule ayant pour valeur "xlDialogOpen"

si je fais i = [a132] vba m'indique une erreur d'incompatibilité de type

Merci

Salutations

RGI

1 réponse

1 2
Avatar
RGI
le but de cette demande et de faire défiler les différentes BDD afin
d'en connaître le n° d'index et le nom de l'argument (constante)

encore merci

je vais me débrouiller autrement :-)

RGI


*Bonjour RGI*,

Je ne sais pas ! Ce que je sais, c'est pour pour vba, xlDialogOpen est
une constante qui vaut 1 et dans ta cellule, xlDialogOpen est un texte
qui reste du texte
Merci de répondre

Oui ça je pense que je l'avais compris
ce que je ne comprends pas c'est pourquoi je dois passer par le code
de Alain Cros pour arriver à obtenir ce 1

Salutations

RGI

*Bonjour RGI*,
xlDialogOpen est tout simplement une constante excel qui a la valeur 1.


Bonjour à vous tous

ça n'a pas l'air de vous inspirer ?

ce code fonctionne
Sub defilement()
Dim i As String
i = xlDialogOpen
Application.Dialogs(i).Show
End Sub

comment puis-je faire pour remplacer xlDialogOpen de ce code par la
valeur d'une cellule ayant pour valeur "xlDialogOpen"

si je fais i = [a132] vba m'indique une erreur d'incompatibilité
de type

Merci

Salutations

RGI









1 2