title image


Smiley Re: Schutz Name Tabellenblätter in Excel-Mappe?
Hi,

ist vielleich primitiv, aber ich denke es funktioniert:







Option Explicit

Dim Blatt As String



Private Sub Worksheet_Activate()

Blatt = Me.Name

End Sub



Private Sub Worksheet_Deactivate()

If Me.Name <> Blatt Then Me.Name = Blatt

End Sub











Hilft Dir das weiter?



Gruß

Uwe

(:o)
Gruß Uwe (:o)

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: