Débogage d'une macro de sélection d'onglet

[Vilain]

Bonjour à tous

J'ai fais il y a quelques temps une macro simple pour sélectionner un onglet.
En voulant simplement changé les noms pour l'inclure sur tous les postes, je l'ai planté et ne parviens pas à régler le problème. Quelqu'un pour m'aider ?

Merci d'avance à tous les génies de ce forum ! 🙂

 

[Compte Supprimé 979]

Re : Débogage d'une macro de sélection d'onglet

Salut Gillus69,

Plusieurs choses
1) tu n'alimentes pas ton Combobox donc tu ne peux rien sélectionner
Dan ton USF

Private Sub UserForm_Initialize()
  Dim Sht As Worksheet
  For Each Sht In ThisWorkbook.Sheets
    Me.Onglet.AddItem Sht.Name
  Next Sht
End Sub

2) ton bouton OK porte le nom de "Ok_materiel"
Or, le code qui se trouve dans ton USF est pour "ok_Sélection_onglet_"

En mode édition de ton USF, il suffit de faire un clique droit sur le bouton OK et Code

A+

 

[VDAVID]

Re : Débogage d'une macro de sélection d'onglet

Bonjour Gillus,
Tes codes ne sont pas là où il faut,
J'ai remis les codes au bon endroit et ta macro marche parfaitement !
Bonne journée

EDIT : Bonjour Bruno, 🙂 encore trop rapide pour moi !

 

[Vilain]

Re : Débogage d'une macro de sélection d'onglet

Salut Bruno,

Un mois sans faire de macro et me voila quasiment repartie de 0... Quel dommage.

Merci pour ce petit coup de pouce.
Je ne vois pas de problème concernant l'alimentation de ma combobox. J'ai juste changé le nom de mon bouton ok et cela semble fonctionner correctement.

A plus

 

[Guest]

Re : Débogage d'une macro de sélection d'onglet

Bonjour,

Hello Bruno🙂


Unload Sélection_onglet
La Fenêtre est déchargée de la mémoire

Pour immédiatement après
Sélection_Onglet.Hide
La fenêtre est rechargée en mémoire et cachée

A+

 

[Vilain]

Re : Débogage d'une macro de sélection d'onglet

Merci pour votre aide à tous, j'ai un nouveau petit problème.
Cette macro était destiné à tout mes fichiers et à tout mon service mais mon entreprise semble bloquer l'accès aux classeurs de macros personnelles. Donc seul solution : rajouter un bouton d'accès à ce fichier qui lance la macro. Il faut donc que j'insère une ligne supplémentaire pour fermer ce fichier à la fin de l'éxécution de ma macro. J'ai donc rajouté la ligne :
Workbooks("Sélection onglet.xlsm").Close False
J'ai cependant l'erreur suivante : "Erreur définie par l'application ou par l'objet"
Comment y remédier ?
Merci pour votre aide

 

[Compte Supprimé 979]

Re : Débogage d'une macro de sélection d'onglet

Re,

Juste comme ça

mon entreprise semble bloquer l'accès aux classeurs de macros personnelles

Cela me semble peut probable, il ne me semble pas que ce soit paramétrable dans les GPO

A+

 

[Vilain]

Re : Débogage d'une macro de sélection d'onglet

Je n'ai que que les options suivantes lors de l'enregistrement de ma macro :
-Tous les classeurs ouverts
-Ce classeur
-Sélection onglet.xlsm

Je travaille dans un très grand groupe aux données très confidentielles, autant te dire que tous les accès sont contrôlés de manière stricte, j'ai même du me "battre" pour pouvoir accéder à ce forum...

 

[Compte Supprimé 979]

Re : Débogage d'une macro de sélection d'onglet

Re,

Tu n'es pas le seul à travailler dans un très grand groupe (plus de 200.000 collaborateurs, plus de 14.000 dans ma branche)
Reste à savoir ce que ton groupe appel "données très confidentielles" y'en a qui sont paranos ...

Un accès à internet via un proxy, n'a rien à voir à un accès a un fichier en local voir sur serveur
Les droits ne sont pas gérés de la même façon

A+

 

[Vilain]

Re : Débogage d'une macro de sélection d'onglet

Je ne peux pas vraiment te répondre, je ne suis pas assez calé à ce sujet.
Par contre, quand je dis données très confidentielles, je suis en dessous de la vérité 😛
En tout cas je ne parviens toujours pas à régler mon erreur, je joins le fichier selon son avancement actuel.

Merci encore pour le temps passé à m'aider à régler mes "petits problèmes"

ps : je n'ai pas l'erreur si je lance la macro à partir du fichier lui-même, mais seulement si je la lance à partir d'un autre fichier, c'est à dire en utilisant le bouton qui m'ouvre ce fichier lance la macro puis referme le fichier (j'espère être clair).

Edit : oups, mauvaise pièce jointe. Changement effectué

 

[Staple1600]

Re : Débogage d'une macro de sélection d'onglet

Bonjour

Grande
Confidentialité
En es-tu sur?
Techniquement, rien n'est moins certain ...

 

[Vilain]

Re : Débogage d'une macro de sélection d'onglet

Staple il faut que tu m'explique la...

 

[Compte Supprimé 979]

Re : Débogage d'une macro de sélection d'onglet

Re,

Tu peux Essayer un truc du style

Set Wbk = Workbooks.Open "C:\Exemple.xlsm"
Wbk.Close SaveChanges:=False

Attribuer le nom du classeur à un objet et tu fermes ensuite cet objet, donc le classeur

A+

 

[Compte Supprimé 979]

Re : Débogage d'une macro de sélection d'onglet

Grande
Confidentialité
En es-tu sur?
Techniquement, rien n'est moins certain ...

Cher Maitre 🙂 notre Gillus69, travaille dans la défense nationale ... alors chuttttteeee ....

A+

PS : Gillus69, ce n'est que de l'humour 😱

 

[Vilain]

Re : Débogage d'une macro de sélection d'onglet

Non Bruno, et heureusement... 😛