Thema Datum  Von Nutzer Rating
Antwort
Rot Blattnamen aus Tabelle übernehmen
08.03.2021 15:35:15 Alexander Raeder
NotSolved
08.03.2021 16:44:41 Gast21849
NotSolved
08.03.2021 16:59:35 volti
NotSolved
20.03.2021 14:47:34 Alexander
NotSolved
08.03.2021 17:26:03 xlKing
NotSolved
20.03.2021 14:58:24 Alexander
NotSolved
08.03.2021 18:18:12 Werner
NotSolved
08.03.2021 19:17:32 volti
NotSolved
20.03.2021 15:04:26 Alexander
NotSolved

Ansicht des Beitrags:
Von:
Alexander Raeder
Datum:
08.03.2021 15:35:15
Views:
173
Rating: Antwort:
  Ja
Thema:
Blattnamen aus Tabelle übernehmen

Hallo Excel- und VBA-Experte,

es geht um folgende Herausforderung: Ich habe mir persönlich in Excel ein kleines Buchhaltungsprogramm gestrickt. Das hätte ich zwar auch einfacher irgendwo anders herbekommen, hatte aber Spaß dran, es zu bauen. Die gesamte Arbeitsmappe besteht aus insgesamt 26 Arbeitsblättern, der größte
Teil davon sind die verscheidenen Konten. Ich habe mir schon einige Makros gestrickt, die z. B. die Umsätze der einzelnen Konten nach beschriebenen Zeilen filtert (alos ohne leere), damit beim Ausdruck nur die beschriebenen Zeilen angesprochen werden. Am Ende funktioniert dass alles recht stabil und befüllt auch die Jahresendbilanzen perfekt.

Wenn ich allerdings den Namen eines Tabellenblattes ändern will/muss, dann muss ich den neuen Blattnamen in allen Makros anpassen, was zwar kein so großen Problem, aber am Ende eher unbequem und fehlerbehaftet ist. Ich habe nun folgende Idee bzw. Vorstellung: Ich würde gerne den Blattnamen für das Makro aus einer Tabelle in einem ganz bestimmten Auswahlblatt übernehmen, in dem die bestehenden Blattnamen in einer Liste aufgeführt werden. Ändert sich jetzt ein Blattname, dann müsste ich den nur noch in der Tabelle und nicht mehr in allen Makros ändern.

Sub sortieren()

'

' Filter1 Makro

'

 

'

    Sheets("Kasse").Select

    ActiveSheet.Unprotect

    ActiveSheet.Range("$A$3:$A$1503").AutoFilter Field:=1, Criteria1:="<>"

    Range("A1").Select

End Sub

Ich stelle mir nun vor, dass ich den Wunsch, in das Blatt "Kasse" zu gelangen, über die Auswahlliste realisieren kann, die im Blatt Auswahl vorhanden ist (z. B. Sheets("=B14 Blatt Auswahl")..Gibt es diese Möglichkeit überhaupt und wenn ja, wie müsste das Makro aussehn? Ich bin kein VBA-Spezialist und habe mir die Makros durch Aufzeichnungen gestrickt. Ich verwende Office 2007 in Windows 10 64bit.

Schon jetzt vielen Dank für jede Hilfe

Alexander


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
Rot Blattnamen aus Tabelle übernehmen
08.03.2021 15:35:15 Alexander Raeder
NotSolved
08.03.2021 16:44:41 Gast21849
NotSolved
08.03.2021 16:59:35 volti
NotSolved
20.03.2021 14:47:34 Alexander
NotSolved
08.03.2021 17:26:03 xlKing
NotSolved
20.03.2021 14:58:24 Alexander
NotSolved
08.03.2021 18:18:12 Werner
NotSolved
08.03.2021 19:17:32 volti
NotSolved
20.03.2021 15:04:26 Alexander
NotSolved