Office: (Office 365) Werte der letzten Zelle einer Spalte in mehreren Tabellenblättern ermitteln

Helfe beim Thema Werte der letzten Zelle einer Spalte in mehreren Tabellenblättern ermitteln in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; Hallihalllo, Ich sitze gerade an meine Bachelorarbeit und muss mittels VBA ein Auswertungsprogramm für erhobene Daten erarbeiten. Ich suche schon ewig... Dieses Thema im Forum "Microsoft Excel Hilfe" wurde erstellt von Hefezopf, 28. Juli 2021.

  1. Hefezopf Neuer User

    Werte der letzten Zelle einer Spalte in mehreren Tabellenblättern ermitteln


    Hallihalllo,

    Ich sitze gerade an meine Bachelorarbeit und muss mittels VBA ein Auswertungsprogramm für erhobene Daten erarbeiten. Ich suche schon ewig im Internet nach dem passenden Code und konnte ihn bis jetzt nicht finden.
    Ich habe bereits einen Code gefunden welcher es mir ermöglicht, beliebig viele erhobene Datentagestabellen in einer Arbeitsmappe zu öffnen. Jedoch stehe ich nun vor dem Problem, dass ich gerne den letzten Wert einer gewissen Spalte mit den in anderen Tabellen in der gleichen Spalte und ebenfalls der letzte Wert addieren möchte.
    Also ich möchte quasi den letzten Wert in Spalte B mit dem letzten Wert in der nächsten Tabelle in Spalte B addieren und dies für beliebig viele Tabellen.

    Sorry für das umständliche beschreiben, ich hoffe man verseht es halbwegs.
    Vielen Dank schonmal im Voraus.

    Liebe Grüße Leo
     
    Hefezopf, 28. Juli 2021
    #1
  2. Hajo_Zi
    Hajo_Zi Erfahrener User
    für Spalte A
    LoLetzte = IIf(IsEmpty(Cells(Rows.Count, 1)), Cells(Rows.Count, 1).End(xlUp).Row, Rows.Count)
    Cells(12,5)=Cells(12,5)+Cells(LoLetzte,1)

    Werte der letzten Zelle einer Spalte in mehreren Tabellenblättern ermitteln GrußformelWerte der letzten Zelle einer Spalte in mehreren Tabellenblättern ermitteln Homepage
     
    Hajo_Zi, 28. Juli 2021
    #2
    1 Person gefällt das.
  3. Hefezopf Neuer User
    Hallo Hajo,
    Vielen Dank für die super schnelle Antwort.

    Der Code läuft ohne Fehlermeldung durch, jedoch gibt er als ein falsches Ergebnis aus . Ich bin mir leider nicht sicher woran es liegen könnte. Ich glaube es läuft nur die Tabelle durch in der man das Makro ausführt. Bei mir ist es so das ich beispielsweise 8 Tabellen in einer Arbeitsmappe habe. 7 Tabellen sind mit Werten gefüllt und in der 8ten soll der addierte Wert der letzten Zellenwerten einer Spalte (aus den jeweiligen 7 Tabellen) ausgegeben werden.

    Liebe Grüße Leo
     
    Hefezopf, 28. Juli 2021
    #3
  4. Hajo_Zi
    Hajo_Zi Erfahrener User

    Werte der letzten Zelle einer Spalte in mehreren Tabellenblättern ermitteln

    Du hast schon die Richtige Tabelle davor geschrieben?

    nur wenige schauen auf Deinen Rechner und sehen die Datei.
    Ich möchte gerne den Fehler im Original sehen.

    Ich baue keine Datei nach. Die Zeit hat schon jemand investiert.

    Ein Nachbau sieht meist anders aus als das Original. <B>Darum sollte das Original verlinkt werden.</b>

    Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten
    Hinweis - Anonymisierung und Pseudonymisierung von Beispielmappen - MS-Office-Forum
    änderrn.
    Der Name einer hochgeladenen Mappe wird im Beitrag automatisch angezeigt, sodass es bei Verwendung von aussagekräftigen Namen leichter fällt, sie später im Ablageordner wiederzufinden und sie gedanklich einem bestimmten Thema zuzuordnen. Namen wie Muster*, Test*, Mappe*, Beispiel*, Fehler*, Kalender* usw. sind so allgemein, dass eine Zuordnung zu einem Thema unmöglich gemacht wird.
    Es sollte ein aussagekräftiger Name sein.

    Benutze hier im Forum die Funktion zum hochladen. Falls Du die nicht benutzen möchtest beachte, von unsicheren Servern wie z.B. www.file-upload.net lade ich keine Datei runter. (lt. Einschätzung meines Virenprogramms)3

    Bilder lade ich mir nicht runter, da Excel damit nichts anfangen kann.

    Bilder statt Datei | Excel ist sexy!

    Hochgeladene Bilder können zwar als solche in Excel importiert werden, sind jedoch bei der Lösung von Problemen nicht sehr hilfreich, da man die eigentlichen Daten nicht ohne große und zeitraubende Umwege direkt in die Tabelle übertragen kann.

    Das ist nur meine Meinung zu dem Thema.

     
    Hajo_Zi, 28. Juli 2021
    #4
    1 Person gefällt das.
  5. Hefezopf Neuer User
    Okay ich hab jetzt mal eine Arbeitsmappe sehr vereinfacht nachgebaut um das Prinzip zu verdeutlichen.
    In der Arbeitsmappe soll in Tabelle 1 der Wert ausgegeben werden, welcher sich aus den untersten Werten der Tabelle 2,3,4,5 ergibt.

    Danke für die Mühen.

    Liebe Grüße Leo
     
    Hefezopf, 28. Juli 2021
    #5
  6. Hajo_Zi
    Hajo_Zi Erfahrener User
    Code:
    Option Explicit
    
    Sub addition_letzter_zellwerte()
        Dim Loletzte As Long
        Dim WsTabelle As Worksheet
        For Each WsTabelle In Worksheets
            If WsTabelle.Name <> "Tabelle1" Then
                With WsTabelle
                    Loletzte = IIf(IsEmpty(.Cells(Rows.Count, 1)), .Cells(Rows.Count, 1).End(xlUp).Row, .Rows.Count)
                    Cells(1, 1) = Cells(1, 1) + .Cells(Loletzte, 1)
                End With
            End If
        Next WsTabelle
    End Sub
    
     
    Hajo_Zi, 28. Juli 2021
    #6
    1 Person gefällt das.
  7. Hefezopf Neuer User
    Vielen vielen Dank für die Arbeit .
    Klappt einwandfrei.
     
    Hefezopf, 28. Juli 2021
    #7
Thema:

Werte der letzten Zelle einer Spalte in mehreren Tabellenblättern ermitteln

Die Seite wird geladen...
  1. Werte der letzten Zelle einer Spalte in mehreren Tabellenblättern ermitteln - Similar Threads - Werte Zelle Spalte

  2. Benötige Hilfe zu Formel

    in Microsoft Excel Hilfe
    Benötige Hilfe zu Formel: Wie in der Beispiel Tabelle hier benötige ich folgendes: [ATTACH] Wenn kein x in der Spalte gefunden werden sollte, über der das heutige datum steht, soll nichts passieren. Vielen Dank im Voraus...
  3. Wenn Wert in Spalte, dann kopiere bestimmte Zellen

    in Microsoft Excel Hilfe
    Wenn Wert in Spalte, dann kopiere bestimmte Zellen: Hallo zusammen Ich versuche einen Planer zu erstellen. Dazu müsste ich folgende Formel/ Makro erstellen, kann dies jedoch mit meinen Excelkünsten nicht: Falls der Wert in Spalte "A" "1" hat,...
  4. In Spalte erste Leere Spalte dann Wert/Text ausgeben

    in Microsoft Excel Hilfe
    In Spalte erste Leere Spalte dann Wert/Text ausgeben: Hallo, schon mal Danke für die Hilfe =) Ich würde gern in meiner kleinen Datenbank, nach einem Eintrag eines Kunden, die letzte Kundennummer des eingetragene Kunden in einer Zelle ausgeben...
  5. Wenn Zellen A-C farbig, Wert in Spalten F-H ändern

    in Microsoft Excel Hilfe
    Wenn Zellen A-C farbig, Wert in Spalten F-H ändern: Hallo ihr fleissigen Helfer, wenn in den Spalten A-C Zellen gelb markiert sind, sollen in den Spalten F-H vor den Wert 01.01.eingetragen werden. Zum Beispiel: A1 Wert 1000 gelb markiert dann F1...
  6. Wert aus Zelle B kopieren wenn in Spalte M ein X

    in Microsoft Excel Hilfe
    Wert aus Zelle B kopieren wenn in Spalte M ein X: Hallo und Moin Moin zusammen. Ich versuche seit gestern ein Problem zu lösen nur leider bisher ohne Erfolg. Ich möchte aus dem Tabellenblatt "Geräte Daten", wenn in Spalte M ein X steht, das der...
  7. Werte in zwei Spalten vergleichen und dritte Zelle kopieren

    in Microsoft Excel Hilfe
    Werte in zwei Spalten vergleichen und dritte Zelle kopieren: Hallo, seit zwei Tagen suche ich die Foren ab ohne Erfolg. Suche Hilfe. Innerhalb einer Tabelle habe ich in Spalte A 3024 Einträge welche Inhalte besitzen die auch gleich sein könnten. In...
  8. den zuletzt eingetragenen Wert aus einer Spalte in eine Zelle übernehmen

    in Microsoft Excel Hilfe
    den zuletzt eingetragenen Wert aus einer Spalte in eine Zelle übernehmen: Seit langem habe ich mal wieder ein Problem, das ich hoffentlich mit eurer Hilfe gelöst bekomme. Ich möchte immer den zuletzt eingetragenen Wert aus einer Spalte in eine Zelle übernehmen. Ich habe...
Schlagworte:
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.
    Information ausblenden