Tabellenblattname in Zelle A1 anzeigen
Stefanglander
ich habe hie reinen Code-Schnipsel den ich gerne umändern möchte aber mal wieder nicht weiß wie.
Im Moment wird der Tabellenname in der aktiven Zelle beim betätigen der Button angezeigt.
Wie muss ich den Code ändern, dass er in der Zelle B3 angezeigt wird ?
Sub TabName()
With ActiveCell
.Value = ActiveSheet.Name
With .Font
.Underline = xlUnderlineStyleSingle
.Bold = True
End With
End With
End Sub
Stefan