Thema Datum  Von Nutzer Rating
Antwort
Rot Summe über mehrere Tabellenblätter
08.10.2019 12:01:40 Fabian
NotSolved
08.10.2019 13:27:05 Gast73188
Solved
08.10.2019 15:05:17 Werner
NotSolved
08.10.2019 16:10:20 Mase
NotSolved
08.10.2019 16:22:15 Werner
NotSolved
08.10.2019 20:36:07 Mase
NotSolved
08.10.2019 20:47:21 Werner
NotSolved
08.10.2019 15:09:11 Fabian
NotSolved

Ansicht des Beitrags:
Von:
Fabian
Datum:
08.10.2019 12:01:40
Views:
44
Rating: Antwort:
  Ja
Thema:
Summe über mehrere Tabellenblätter

Hallo Leute,

der Fett und kursiv kenntlich gemachte code funktioniert nicht! Hat jemand eine Ahnung, was ich falsch mache?

Vielen Dank im Voraus

 

Sub Formel()

Dim f As Integer
For f = 1 To 12

Sheets(f).Select
Range("a1").FormulaLocal = "=summe(d1-e1-sheets(f-1).range("a1"))"

 Next f


End Sub


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • 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
  • Bitte markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
Rot Summe über mehrere Tabellenblätter
08.10.2019 12:01:40 Fabian
NotSolved
08.10.2019 13:27:05 Gast73188
Solved
08.10.2019 15:05:17 Werner
NotSolved
08.10.2019 16:10:20 Mase
NotSolved
08.10.2019 16:22:15 Werner
NotSolved
08.10.2019 20:36:07 Mase
NotSolved
08.10.2019 20:47:21 Werner
NotSolved
08.10.2019 15:09:11 Fabian
NotSolved