XL 2019 Variable non definie

Dranreb

XLDnaute Barbatruc

• 1 Avril 2021

• #16

Oui mais c'était le .xlsm où ça ne marchait plus, depuis il a joint le .xls. Mais de toute façon, comme je l'ai dit, j'y ai pensé parce que c'était la seule solution possible.

 

Vote positif 0 Vote négatif

S

snoopy07

XLDnaute Occasionnel

• 1 Avril 2021

• #17

re
si j ai compris c est le nom des feuilles qui sont pas bonnes
donc si je change cela
ca devrait peut etre marcher????????????

je vais essayer

bonne soirée
cordialement

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 1 Avril 2021

• #18

snoopy07 à dit:

si j ai compris c est le nom des feuilles qui sont pas bonnes

Cliquez pour agrandir...

Ben non ce n'est pas ça. Ce qui ne colle pas ce sont les noms des objet Worksheet de la rubrique Microsoft Excel Objets qui assument auprès de VBA la représentation de ces entités Excel que sont les feuilles, quels que soient leurs noms !

 

Vote positif 0 Vote négatif

S

soan

XLDnaute Barbatruc

Inactif

• 1 Avril 2021

• #19

@snoopy07

pour ta 1ère feuille par exemple, tu peux y faire référence :

* par son Nom "Equipes" : MsgBox Worksheets("Equipes").Range("D5")

* par son CodeName F1 : MsgBox F1.Range("D5")

* par son index 1 : MsgBox Worksheets(1).Range("D5")

dans les 3 cas, ça affiche le contenu de la cellule D5 de la 1ère feuille "Equipes"

---

tu peux même utiliser ces différentes notations abrégées :

MsgBox Worksheets("Equipes").[D5]

MsgBox [Equipes!D5]

MsgBox F1.[D5]

MsgBox Worksheets(1).[D5]

soan

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 1 Avril 2021

• #20

Alors CodeName est une propriété String en lecture qui reproduit le nom de l'objet Worksheet dans la rubrique Microsoft Excel Objets. Il ne faudrait pas confondre ce nom, qui est aussi la valeur de CodeName, avec la propriété CodeName elle même.

 

Vote positif 0 Vote négatif

S

soan

XLDnaute Barbatruc

Inactif

• 1 Avril 2021

• #21

@snoopy07

ATTENTION : j'ai oublié de préciser que si tu utilises l'index d'une feuille, celle-ci ne devra pas changer d'emplacement ! donc si par exemple tu utilises Worksheets(3) pour référencer la 3ème feuille du classeur, donc ici ta feuille "Classement", ça ne marchera plus si ensuite tu déplaces cette feuille "Classement" à gauche ou à droite de sa position actuelle ; donc au cas où tu utilises un index de feuille, sois vraiment très, très prudent ! (sinon rebelote ! )​

soan

 

Vote positif 0 Vote négatif

S

snoopy07

XLDnaute Occasionnel

• 2 Avril 2021

• #22

bonjour soan ,Dranreb et le forum

merci pour vos réponse

je essayer de mettre en pratique tous ça mais ce n est pas gagner
si je n y arrive pas je garderai le fichier au format XLs qui date de jerusalem

bonne journée
cordialement
Snoopy 07

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 2 Avril 2021

• #23

Bonjour
Tant qu'à faire si vous changez la 1ère propriété ((Name)) des objets de cette rubrique mettez leurs plutôt des nom mnémoniques commençant par Wsh. Remplacez Feuil8 par WshPartie4, ce sera plus clair dans le code que F8 puisqu'il a comme clé "4 ème partie" dans la collection Worksheets

 

Dernière édition: 2 Avril 2021

Vote positif 0 Vote négatif

S

snoopy07

XLDnaute Occasionnel

• 2 Avril 2021

• #24

bonjour
si je change la propriete name des objets
est ce qu il f aut que je modififie le vba

 

Vote positif 0 Vote négatif

S

snoopy07

XLDnaute Occasionnel

• 2 Avril 2021

• #25

re
j ai change la 1ère propriété ((Name)) des objets comme vous l avez dit


j ai toujours le meme problème quand le tirage des parties s effectue il y a une erreur


quand je clic sur ok
l usf se ferme normalement apres 3 seconde mais le tiage des partie ne s est pas effectuer
si dans la b TirageAleatoire j enleve
Dim F1 As Worksheet
Set F1 = Worksheets("Equipes")
Dim F2 As Worksheet
Set F2 = Worksheets("Equipes")
j ai le message variable non definies qui apparrait

comment résoudre ce petit problème

cordialement

 

Pièces jointes

• Essai 31 Concours de belote.xlsm

  170.5 KB · Affichages: 1

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 2 Avril 2021

• #26

Si vous utilisez directement dans les codes les objets VBA implantés par l'application hôte, vous n'avez plus ni à les déclarer ni à les initialiser ni à les chercher dans les collections. C'était ce que vous n'aviez pas compris dans votre .xls d'origine: F1 pouvait être utilisé directement dans tout le projet VBA sans y avoir été déclaré nulle part parce que c'était le nom d'un objet VBA permanent qu'Excel avait mis à sa disposition pour représenter une certaine feuille du classeur.

 

Vote positif 0 Vote négatif

S

snoopy07

XLDnaute Occasionnel

• 2 Avril 2021

• #27

re

ce n est pas moi qui est fait le tableur je l ai recuper sur un forum
je pense qu il faut modifier le SubTirageAleatoire pour que ca marche
mais je ne sais pas comment le modifier

si c est trop compliquer je garderai le tableurs au format XLS

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 2 Avril 2021

• #28

Je ne suis pas intervenu à ce titre dans cette discussion qui s'intitulait "Variable non définie".
Pour les problème de tirages aléatoires de participants à des compétitions je propose généralement des processus tirés de ce classeur

Édition: Je vien même d'en retouver un qui vous était destiné et que j'avais joint ici :

Demande d aide pour Modification d une macro pour tirage au sort

Bonjour le forum J ai trouver cette macro et je voudrais la modifier mais je ne sais pas comment faire c est une macro pour un tirage au sort pour un concours de belote qui se déroule en 4 tours sur la Feuil 1 les équipes sont en colonne A et le résultat du tirage se trouve en colonne D pour...

www.excel-downloads.com

 

Pièces jointes

• ListeAléat.xlsm

  330.6 KB · Affichages: 2

Dernière édition: 2 Avril 2021

Vote positif 0 Vote négatif

S

snoopy07

XLDnaute Occasionnel

• 2 Avril 2021

• #29

re
merci pour tous vos conseils

je clos le sujet et je vais garder le tableur au format XLS
Cordialement

 

Vote positif 0 Vote négatif