Thema Datum  Von Nutzer Rating
Antwort
Rot Tabellenblätter vereinigen problem
26.12.2023 11:53:54 morrow23
NotSolved
27.12.2023 00:51:59 Gast65824
NotSolved

Ansicht des Beitrags:
Von:
morrow23
Datum:
26.12.2023 11:53:54
Views:
208
Rating: Antwort:
  Ja
Thema:
Tabellenblätter vereinigen problem

Hallo Forum, ich möchte gerne mehrere Tabellenblätter in einer Tabelle vereinigen. Mit dem folgenden Code klappt das schon mal. Allerdings wird die Tabelle nicht in der nächsten leeren Zeile, sondern viel weiter unten bei ca. 1054 eingesetzt.  Was habe ich da im Code falsch gemacht?

 

Sub Tabellenblaetter_Vereinigen()
 
Dim Sh As Worksheet
 
'Schleife über alle Tabellenblätter
For Each Sh In Worksheets
 
    'Bestimmte Tabellenblätter überspringen
    If (Sh.Name <> "Master" And Sh.Name <> "Drop*" And Sh.Name <> "Dashboard") Then
     
        'Daten kopieren und einfügen
        Sh.UsedRange.Offset(11).Resize(Sh.UsedRange.Rows.Count - 1).Copy
        Meister.Cells(Rows.Count, 1).End(xlUp).Offset(1).PasteSpecial
     
    End If
Next Sh
 
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 Tabellenblätter vereinigen problem
26.12.2023 11:53:54 morrow23
NotSolved
27.12.2023 00:51:59 Gast65824
NotSolved