Nom onglet excel et cellule

Salut, je confirme que le standard de l'application Excel ne permet pas se genre d'option. Ca passe obligatoirement par du VBA.

Pour Excel 2003, on pourrait utiliser ça :

Sub TabNameA1()
 
    Dim Feuille As Worksheet
 
        For Each Feuille In Worksheets
             If Feuille.Range("A1") <> "" Then
             Feuille.Name = Feuille.Range("A1").Value
      End If
   Next Feuille
 
End Sub

MERCI a toi
J'essaye de suite  

De rien.
Tiens moi au jus !

Salut

Alors je viens de testé !
Je l'inscrit dans le code de la premiere feuil et hop ca marche . . .Génial  

Mon souci maintenant c'est que lorsque la valeur A1 change le nom de mon onglet ne suit pas ! ! ! c'est balo ! ! !  

Pourquoi il ne prend pas ?


en tous les cas merci de votre aide, je cherche pas moi meme depuis plus d'une semaine mais je n'ai aucune notion de vba, j'apprends sur le "tas" comme ont dit ! ! !
Alors merci bcp d'avoir contribué a mon évolution sur le sujet

Salut,

Il ne te le prends pas car la vérification ne se fait que lorsque tu lance ton programme.

Plusieurs possibilités :

Soit tu ajoutes un raccourci à la macro et tu l'exécutes à chaque fois que tu as besoin de rafraîchir.

Soit tu met un "timer" et là bonjour le travail.  

Je plainsante vu que je suis nouveau sur tom's guide et que j'ai besoin de points.  

Sub Auto_open()
Dim nbs As Integer
'L'application ExecutionTimer se lancera toutes les 0 heure, 0 minute et Interval seconde
   Interval = nbs = 1
   Application.OnTime Now + TimeSerial(0, 0, 1), "ExecutionTimer"
End Sub
 
 
Sub ArretTimer()
 On Error Resume Next
   Application.OnTime Lheure, "ExecutionTimer", , False
End Sub
 
 
Sub ExecutionTimer()
 
    Dim Feuille As Worksheet
 
        For Each Feuille In Worksheets
        If Feuille.Range("A1") <> "" Then
        Feuille.Name = Feuille.Range("A1").Value
   End If
   Next Feuille
 
Lheure = Now + TimeSerial(0, 0, 1)
   Application.OnTime Lheure, "ExecutionTimer"
End Sub

Bon cerise sur le gâteau, j'ai rajouté et un timer pour que le code s'exécute sur dès que tu fais une modification et un auto_open pour que le programme se lance tout seul à l'ouverture de ton fichier. Le tout servi sur un plateau.

salut  


MERCI tu es trop fort toi  

Je t'adore . . . si ce second VBA fonction aussi bien que le premier alors Chapeau bas !



encore merci, merci merci merci pour ton aide.

Penses à basculer ensuite ton sujet en résolu et choisi la meilleure réponse.