Discussion :

[cuterate]

bonjour,
j'ai fait une macro (qui fonctionnait bien jusqu'à présent) afin de nommer l'onglet en fonction d'un choix fait par un opérationnel dans une liste déroulante

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
Sub Nom_onglet()
 
If Range("d7").Value = "Code magasin" Then
ActiveSheet.Name = Range("a1").Value
Else: ActiveSheet.Name = Range("d7").Value
End If
 
End Sub

Je ne comprends pas pourquoi depuis hier soir 19h30 cette macro ne fonctionne plus, ni le if ni le else
je ne me souviens pas d'avoir fait une modification dans le fichier

quelqu'un a une idée de ce qui pourrait la perturber ?
sachant que c'est un code à 4 chiffres qui est renvoyé pour renommer l'onglet en cours, et que ce chiffre provient d'un TCD (j'avais d'abord pensé à un problème de format...)

Merci de votre aide

[AlexL.]

Bonjour cuterate,

peux-tu nous fournir le nom qui coince ainsi que l'erreur renvoyée ?

[cuterate]

Tous les codes magasins coincent
ils sont de type 0144 ou 1508 etc...
ainsi que quand je choisi "code magasin" pour remettre mon nom d'onglet à 0


Erreur d'éxécution 1004
erreur définie par l'application ou l'objet

[AlexL.]

Peux-tu nous joindre une partie du classeur ?

[mekap]

Tu ne chercherais pas à renommer la feuille comme une autre qui porte déjà le même nom ??
soit Code Magasin, soit ton code à 4 chiffres ?

[cuterate]

J'ai essayé de réduire au max le fichier, je ne sais pas si c'est du à la macro mais j'arrive pas à supprimer les onglets qui ne vous serviront pas ...
je les ai vidé au moins....


non sinon pour le nom de l'onglet il a toujours un nom à l'origine soit un numéro de 1à 30 selon la position de l'onglet et ensuite l'opérationnel choisi dans une liste son magasin et l'onglet est renommé automatiquement....normalement....

voir fichier joint onglet 0144 ou onglet 2 ou onglet 3 ...

.....
je n'arrive pas à vous l'envoyer en format zip ...