Thema Datum  Von Nutzer Rating
Antwort
Rot Summierer
15.06.2018 09:04:32 Gast35955
NotSolved
15.06.2018 09:20:06 Gast14283
NotSolved
15.06.2018 09:28:10 Gast23912
NotSolved
15.06.2018 09:34:33 Gast99491
NotSolved
15.06.2018 09:35:33 Gast81692
NotSolved
15.06.2018 09:55:54 Gast16041
NotSolved
15.06.2018 10:11:54 Gast76520
NotSolved
15.06.2018 10:08:45 RPP63
NotSolved
15.06.2018 10:19:12 Gast82276
NotSolved
15.06.2018 12:42:23 Gast2082
Solved
15.06.2018 15:40:24 RPP63
NotSolved
31.08.2018 11:21:37 Marius
NotSolved

Ansicht des Beitrags:
Von:
Gast35955
Datum:
15.06.2018 09:04:32
Views:
1205
Rating: Antwort:
  Ja
Thema:
Summierer
Hallo ich habe folgenden Code, der immer Abschnittsweise 5 werte aus Tabelle1, Spalte 1 zusammenzählen soll. Allerdings gibt er ab i=2 nur noch 0 aus. Wo ist mein Fehler ? Sub LoopSumme() Worksheets("Tabelle1").Activate x = 0 y = 0 Dim i As Integer For i = 0 To 10 x = (7 * i) y = (7 * i) Summe = WorksheetFunction.Sum(Range(Cells(12 + x, 1), Cells(16 + y, 1))) Worksheets("Tabelle2").Activate last = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row + 1 Cells(last, 1).Value = Summe Next 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 Summierer
15.06.2018 09:04:32 Gast35955
NotSolved
15.06.2018 09:20:06 Gast14283
NotSolved
15.06.2018 09:28:10 Gast23912
NotSolved
15.06.2018 09:34:33 Gast99491
NotSolved
15.06.2018 09:35:33 Gast81692
NotSolved
15.06.2018 09:55:54 Gast16041
NotSolved
15.06.2018 10:11:54 Gast76520
NotSolved
15.06.2018 10:08:45 RPP63
NotSolved
15.06.2018 10:19:12 Gast82276
NotSolved
15.06.2018 12:42:23 Gast2082
Solved
15.06.2018 15:40:24 RPP63
NotSolved
31.08.2018 11:21:37 Marius
NotSolved