Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

membre introuvable

6 réponses
Avatar
PascalBar
Bonjour
Sous 2007

J'ai un formulaire et sur le:

Private Sub UserForm_Initialize()

et ensuite:

Me.ComboBox1.RowSource = "Clients"
Me.Cbo2.RowSource = "Produits"
Me.ListBox1.RowSource = "tempfact2"
Me.Controls("NumFact").RowSource = "Compteur"

Clients, Produits, tempfact2 sont des zones nommées dynamiques avec
par exemple:

=DECALER(Clients!$A$2;;;NBVAL(Clients!$A:$A)-1)

Compteur est nommé par

=LigneFactures!$I$4
et dans I4 j'ai
=NBVAL(Date)
Ou date est nommée dynamique par:
=DECALER(LigneFactures!$A$2;;;NBVAL(LigneFactures!$A:$A)-1)

Le souci est le suivant
sur
Me.Controls("NumFact").RowSource = "Compteur"

Excel me renvoit membre introuvable????

Merderais-je quelque part???
Merci

Pascal

6 réponses

Avatar
LE TROLL
Bonjour,

Toujours réinventer, tu as une solution ici :

http://irolog.free.fr/irolog_vente/facturier_v/facturier.htm

Cordialement ;o)
-
Logiciels, romans, contacts : http://irolog.free.fr
_______________________
.
.


"PascalBar" a écrit dans le message de
news:
Bonjour
Sous 2007

J'ai un formulaire et sur le:

Private Sub UserForm_Initialize()

et ensuite:

Me.ComboBox1.RowSource = "Clients"
Me.Cbo2.RowSource = "Produits"
Me.ListBox1.RowSource = "tempfact2"
Me.Controls("NumFact").RowSource = "Compteur"

Clients, Produits, tempfact2 sont des zones nommées dynamiques avec par
exemple:

ÞCALER(Clients!$A$2;;;NBVAL(Clients!$A:$A)-1)

Compteur est nommé par

=LigneFactures!$I$4
et dans I4 j'ai
=NBVAL(Date)
Ou date est nommée dynamique par:
ÞCALER(LigneFactures!$A$2;;;NBVAL(LigneFactures!$A:$A)-1)

Le souci est le suivant
sur
Me.Controls("NumFact").RowSource = "Compteur"

Excel me renvoit membre introuvable????

Merderais-je quelque part???
Merci

Pascal




Avatar
michdenis
Bonjour,

Il y a une raison pourquoi tu ne peux pas utiliser ceci :

Me.Controls("NumFact").RowSource = "date"




"PascalBar" a écrit dans le message de groupe de discussion :

Bonjour
Sous 2007

J'ai un formulaire et sur le:

Private Sub UserForm_Initialize()

et ensuite:

Me.ComboBox1.RowSource = "Clients"
Me.Cbo2.RowSource = "Produits"
Me.ListBox1.RowSource = "tempfact2"
Me.Controls("NumFact").RowSource = "Compteur"

Clients, Produits, tempfact2 sont des zones nommées dynamiques avec
par exemple:

ÞCALER(Clients!$A$2;;;NBVAL(Clients!$A:$A)-1)

Compteur est nommé par

=LigneFactures!$I$4
et dans I4 j'ai
=NBVAL(Date)
Ou date est nommée dynamique par:
ÞCALER(LigneFactures!$A$2;;;NBVAL(LigneFactures!$A:$A)-1)

Le souci est le suivant
sur
Me.Controls("NumFact").RowSource = "Compteur"

Excel me renvoit membre introuvable????

Merderais-je quelque part???
Merci

Pascal
Avatar
PascalBar
michdenis a écrit :
Bonjour,

Il y a une raison pourquoi tu ne peux pas utiliser ceci :

Me.Controls("NumFact").RowSource = "date"




"PascalBar" a écrit dans le message de groupe de discussion :

Bonjour
Sous 2007

J'ai un formulaire et sur le:

Private Sub UserForm_Initialize()

et ensuite:

Me.ComboBox1.RowSource = "Clients"
Me.Cbo2.RowSource = "Produits"
Me.ListBox1.RowSource = "tempfact2"
Me.Controls("NumFact").RowSource = "Compteur"

Clients, Produits, tempfact2 sont des zones nommées dynamiques avec
par exemple:

ÞCALER(Clients!$A$2;;;NBVAL(Clients!$A:$A)-1)

Compteur est nommé par

=LigneFactures!$I$4
et dans I4 j'ai
=NBVAL(Date)
Ou date est nommée dynamique par:
ÞCALER(LigneFactures!$A$2;;;NBVAL(LigneFactures!$A:$A)-1)

Le souci est le suivant
sur
Me.Controls("NumFact").RowSource = "Compteur"

Excel me renvoit membre introuvable????

Merderais-je quelque part???
Merci

Pascal



J'ai essayé cela me renvoir toujours membre introuvable???
Avatar
michdenis
L'expression "Date" est une expression réservée
en vba pour la fonction "Date" de même que
dans la feuille de calcul.

Il faut mieux se tenir loin de ces expressions pour
soit définir des noms pour les plages nommées ou
pour des variables en VBA. Question de ne pas
confondre Excel.

Dans ce code
Me.Controls("NumFact").RowSource = "Date" 'ou autre nom
si le nom du contrôle "NumFact" n'existe pas, Excel
retourne le type de message que tu obtiens
"membre introuvable"

Sinon, il n'y a pas de raison d'obtenir une erreur !
Avatar
PascalBar
michdenis a écrit :
L'expression "Date" est une expression réservée
en vba pour la fonction "Date" de même que
dans la feuille de calcul.

Il faut mieux se tenir loin de ces expressions pour
soit définir des noms pour les plages nommées ou
pour des variables en VBA. Question de ne pas
confondre Excel.

Dans ce code
Me.Controls("NumFact").RowSource = "Date" 'ou autre nom
si le nom du contrôle "NumFact" n'existe pas, Excel
retourne le type de message que tu obtiens
"membre introuvable"

Sinon, il n'y a pas de raison d'obtenir une erreur !







Je sais et pourtant numfact existe
Avatar
FS
Bonsoir,

> Me.Controls("NumFact").RowSource = "Compteur"
> Excel me renvoit membre introuvable????

Le contrôle nommé "NumFact" est-il bien un contrôle qui a une propriété
RowSource (combobox ou listbox) ? Le message d'erreur semble dire que non.

FS
--
Frédéric SIGONNEAU
Modules et modèles pour Excel :
http://frederic.sigonneau.free.fr/

PascalBar a écrit :
Bonjour
Sous 2007

J'ai un formulaire et sur le:

Private Sub UserForm_Initialize()

et ensuite:

Me.ComboBox1.RowSource = "Clients"
Me.Cbo2.RowSource = "Produits"
Me.ListBox1.RowSource = "tempfact2"
Me.Controls("NumFact").RowSource = "Compteur"

Clients, Produits, tempfact2 sont des zones nommées dynamiques avec
par exemple:

ÞCALER(Clients!$A$2;;;NBVAL(Clients!$A:$A)-1)

Compteur est nommé par

=LigneFactures!$I$4
et dans I4 j'ai
=NBVAL(Date)
Ou date est nommée dynamique par:
ÞCALER(LigneFactures!$A$2;;;NBVAL(LigneFactures!$A:$A)-1)

Le souci est le suivant
sur
Me.Controls("NumFact").RowSource = "Compteur"

Excel me renvoit membre introuvable????

Merderais-je quelque part???
Merci

Pascal