Thema Datum  Von Nutzer Rating
Antwort
Rot Verweis auf alle Tabellenblätter
 24.11.2013 23:07:07 Thomas
Solved
25.11.2013 19:46:58 Gast92372
NotSolved
27.11.2013 06:26:09 Thomas
NotSolved

Ansicht des Beitrags:
Von:
Thomas		 Datum:
24.11.2013 23:07:07		 Views:
1381		 Rating:
     
Antwort:
 Nein
Thema:
Verweis auf alle Tabellenblätter

Hallo,

ich brauche ein Makro, das mir alle Tabellenblätternamen in einer Spalte untereinander auflistet und dann einen absoluten Bezug z. B. zur Zelle A1 in der Spalte rechts daneben herstellt. Im Grunde funktioniert das folgende Makro, das ich geschrieben habe, nur ist der jeweilige Bezug eben nicht absolut.

Ich hoffe, dass ich mich verständlich ausdrucken konnte und dass jemand eine Lösung weiß. Vielen Dank schon im Voraus ;-)

Sub Objekte_auflisten()

Dim TBlatt As Worksheet

    For Each TBlatt In ActiveWorkbook.Sheets
        ActiveCell = TBlatt.Name
        ActiveCell.Offset(0, 1).Select
        ActiveCell.FormulaR1C1 = "=INDIRECT(RC[-1]&""!A1"")"
        ActiveCell.Offset(1, -1).Select
    Next TBlatt
    
End Sub

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 Verweis auf alle Tabellenblätter
 24.11.2013 23:07:07 Thomas
Solved
25.11.2013 19:46:58 Gast92372
NotSolved
27.11.2013 06:26:09 Thomas
NotSolved