Thema Datum  Von Nutzer Rating
Antwort
14.03.2017 15:28:39 Nick
NotSolved
14.03.2017 17:29:59 BigBen
NotSolved
15.03.2017 07:57:45 Nick
NotSolved
Blau Tabellenblätter umbenenn und Name aus Zelle lesen (Excel2010)
 16.03.2017 19:23:20 BigBen
NotSolved
15.03.2017 08:32:20 Gast88691
NotSolved

Ansicht des Beitrags:
Von:
BigBen		 Datum:
16.03.2017 19:23:20		 Views:
705		 Rating:
     
Antwort:
  Ja
Thema:
Tabellenblätter umbenenn und Name aus Zelle lesen (Excel2010)

Hallo,

habe den VBA-Code angepasst:

Sub TablesRename()
    Dim wsh As Worksheet
    Dim tabOneB2 As Range
    Dim tabOneB3 As Range
    For Each wsh In ActiveWorkbook.Worksheets
        If tabOneB2 Is Nothing Then
            Set tabOneB2 = wsh.Range("B2")
            Set tabOneB3 = wsh.Range("B3")
        Else
            ' andere Tabs umbenennen
            wsh.Name = "Text" & wsh.Range("B5").Value & "_" & Left(wsh.Range("B1").Value, 8) & "_" & tabOneB2.Value & tabOneB3.Value
        End If
    Next
End Sub

LG, BigBen

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
14.03.2017 15:28:39 Nick
NotSolved
14.03.2017 17:29:59 BigBen
NotSolved
15.03.2017 07:57:45 Nick
NotSolved
Blau Tabellenblätter umbenenn und Name aus Zelle lesen (Excel2010)
 16.03.2017 19:23:20 BigBen
NotSolved
15.03.2017 08:32:20 Gast88691
NotSolved