Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

VBA - Summenfunktion bei variabler Zeilenanzahl

Mitglied: sejosc

sejosc (Level 1) - Jetzt verbinden

28.08.2006, aktualisiert 29.08.2006, 14783 Aufrufe, 2 Kommentare

Hallo zusammen,

ich habe wieder eine kleine Frage bzgl. VBA. Ich habe hier Tabellen vorliegen, die eine unterschiedliche Anzahl an Zeilen besitzen. Nun möchte ich aber in jeder Spalte unter der letzten Zeile die Werte aller darüberliegenden Zeilen summieren lassen.

Ich habe bereits ein Makro, das die Zeilen zählen kann. Doch leider komme ich damit nicht voran, da ich am Ende nicht nur die Ergebnissumme in der Zelle stehen haben möchte, sondern auch die Funktion.

Es kann nämlich sein, dass nachträglich noch Werte geändert werden müssen.

Mein momentaner Code sieht so aus:


'Zeilen zählen
Dim zeilen As Integer
Range("I1").Select
zeilen = Selection.CurrentRegion.Rows.Count

'Summenfunktion einbauen
Cells(zeilen + 1, 9).Select
ActiveCell.FormulaR1C1 = "=SUM(R[-27]C:R[-1]C)"


Allerdings habe ich hier als zu summierenden Bereich einen festen Wert. Dieser muss aber variabel sein, da ja die Zeilenanzahl nicht immer gleich ist.

Falls noch fragen sind, einfach hier posten!

Vielen Dank im voraus!

Sebastian Schäfer

PS.: Sorry für die "\"...ich habe keine Ahnung, wie ich die weg bekommen kann. Ich hoffe, das stört nicht allzu sehr
Mitglied: 8644
28.08.2006 um 15:28 Uhr
Hi,

versuchs mal so:

01.
Dim zeilen As Integer
02.

03.
    zeilen = Range("I65536").End(xlUp).Row
04.
    Range("I65536").End(xlUp).Offset(1, 0).Select
05.
    ActiveCell.Value = "=SUM(I1:I" + CStr(zeilen) + ")"
Psycho
Bitte warten ..
Mitglied: sejosc
29.08.2006 um 11:52 Uhr
Vielen Dank!

Genau das habe ich gesucht, funktioniert wunderbar!

Gruß,

Sebastian Schäfer
Bitte warten ..
Ähnliche Inhalte
Datenbanken
Syntaxfehler VBA
gelöst Frage von Dr.CornwallisDatenbanken6 Kommentare

Liebe Gemeinde, ich bräuchte Hilfe beim folgenden VBA Code(für Button in Access): Könnte mir bitte jemand erklären was ich ...

Microsoft Office
VBA Automatisierung
gelöst Frage von clockingMicrosoft Office3 Kommentare

Hallo Community, freut mich euch beigetreten zu sein. Ich werde auf folgendes Problem in allen großen Sprachen im WWW ...

VB for Applications
VBA Programmierung
Frage von specialuserVB for Applications4 Kommentare

Hallo zusammen, der Wert aus Zelle L30 und N30 soll ins wb2 kopiert werden funktionier so weit auch ganz ...

VB for Applications
VBA . PasteSpecial
gelöst Frage von ActaresVB for Applications8 Kommentare

Hallo VBA Sezialisten, In sache VBA bin ich noch ein Anfänger und ich versuche aus eine Excel Sheet Inhalte ...

Neue Wissensbeiträge
Windows 7

Windows 7 u. Server 2008 (R2) SHA-2-Update kommt am 12. März 2019

Information von kgborn vor 12 StundenWindows 73 Kommentare

Kleine Info für die Admins der oben genannten Maschinen. Ab Juli 2019 werden Updates von Microsoft nur noch mit ...

Firewall
PfSense 2.5.0 benötigt doch kein AES-NI
Information von ChriBo vor 2 TagenFirewall2 Kommentare

Hallo, Wie sich einige hier erinnern werden hat Jim Thompson in diesem Aritkel beschrieben, daß ab Version 2.5.0 ein ...

Internet
Copyright-Reform: Upload-Filter
Information von Frank vor 3 TagenInternet1 Kommentar

Hallo, viele Menschen reden aktuell von Upload-Filtern. Sie reden darüber, als wären es eine Selbstverständlichkeit, das Upload-Filter den Seitenbetreibern ...

Google Android

Blokada: Tracking und Werbung unter Android unterbinden

Information von AnkhMorpork vor 3 TagenGoogle Android1 Kommentar

In Ergänzung zu meinem vorherigen Beitrag: Blokada efficiently blocks ads, tracking and malware. It saves your data plan, makes ...

Heiß diskutierte Inhalte
Backup
Wo installiert man Veeam bei SoHo?
Frage von EDVMan27Backup16 Kommentare

Hallo, nachdem ich die neue Veeam CE bei mir getestet habe, wollte ich es einmal bei einem Kunden testen. ...

Hyper-V
Intel MSC Raid 5 Rebuild
Frage von DannysHyper-V16 Kommentare

Hallo Community, Ich habe einen Modul Server von Intel in Betrieb. Dort ist eine Festplatte aus dem Raid 5 ...

Netzwerkmanagement
Richtfunknetzwerk mit vielen Hops stabiler gestalten
Frage von turti83Netzwerkmanagement16 Kommentare

Hallo, in meinem Dorf habe ich vor ca. einem Jahr ein Backbone aufgebaut um die Nachbarschaft mit Internet zu ...

Windows Server
DFSR - Dateireplikationseinstellung - Festplattenauslastung zu hoch - optimale Einstellungsfrage
Frage von Kamelle01Windows Server12 Kommentare

Hallo liebe Mitglieder, ich habe einen Windows Server 2016 mit 4TB 7200U 256MB SATA Festplatten in RAID10 und einem ...