Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
552to556
552to556
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Addition mit Hilfe eines Makros

Forumthread: Addition mit Hilfe eines Makros

Addition mit Hilfe eines Makros
25.01.2005 14:23:45
Oliver
Hallo
Unter foldendem Link habe ich mein Problem in ein Excel-File geschrieben.
Habe mal ein wenig selber mit VBA herumgepröbelt aber leider fehlt mir noch die nötige Know-How um dies selbständig zu erledigen.
https://www.herber.de/bbs/user/16817.xls
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Addition mit Hilfe eines Makros
25.01.2005 15:07:46
Roland
Hallo Oliver,
versuchs mal so:

Sub Aufaddieren()
Dim i As Integer
For i = 1 To 255
If Application.WorksheetFunction.Sum(Columns(i)) > 0 Then
Cells(Cells(65536, i).End(xlUp).Row + 1, i).Value = _
Application.WorksheetFunction.Sum(Columns(i))
End If
Next
End Sub

Feedback wäre nett :-)
Gruß
Roland
Anzeige
AW: Addition mit Hilfe eines Makros
25.01.2005 15:41:45
Oliver
Wow vielen Dank für den Code habe momentan gerade keine Zeit aber werde Ihn
sicherlich noch heute oder aber spätestens Morgen testen und versuchen Ihn zu verstehen.
Vielen herzlichen Dank.
Gruss
Oliver
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige