XL 2019 Variable non definie

[snoopy07]

Bonsoir le forum

Je suis entrain de passer un tableur qui est en XLS en XLSM
le probleme que je rencontre c est en xls il marche correctement
mais quand je le met en XLSM il bug
une fois les inscription fini au moment du tirage au sort des parties il dit que la variable F1 est non definie

J ai chercher dans tous le vba du fichiers XLS et je ne trouve pas de variable pour F1
Je bloque sur cette variable qui a mon avis doit être simple a trouver
pouvez vous m expliquer comment résoudre ce petit problème
pourquoi ca marche sur le XLS et pas sur le XLSM

Cordialement
Snoopy07

 

[Dranreb]

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.

 

[snoopy07]

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

 

[Dranreb]

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

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 !

 

[soan]

@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

 

[Dranreb]

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.

 

[soan]

@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

 

[snoopy07]

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

 

[Dranreb]

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

 

[snoopy07]

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

 

[snoopy07]

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

 

[Dranreb]

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.

 

[snoopy07]

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

 

[Dranreb]

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

 

[snoopy07]

re
merci pour tous vos conseils

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