Hey alle zusammen, ich möchte über eine Pivot-Tabelle Wartungsdaten auswerten, dies funktioniert auch bis auf einen kleinen optischen Makel perfekt. Die Daten werden über SAP in einer Exeltabelle erzeugt. Diese Daten lese ich über VBA per Button aus und sortiere sie in meiner Tabelle. Mein Problem ist nun da ich nicht weiß wie groß Zeilen in meiner Tabelle benötigt werden lese ich die ganze Range von Spalte A-Q ein. Was mir aber in meiner Pivot-Tabelle einen Eintrag mit "blank" erzeugt. Der vermutlich relevante Codeschnipsel ist: Set ext_wb = Workbooks.Open(ThisWorkbook.Path & "\Source.xlsm")
ext_wb.Sheets("Source").Range("A:Q").Copy
ThisWorkbook.Sheets("Source").Range("A1").PasteSpecial
Ist es möglich diesen so anzupassen, dass das Programm weiß bis zu welcher Zeile Einträge vorhanden sind und so auch nur diese kopiert und einträgt? Oder liegt der Fehler wo anders? Könnt ihr mir bitte helfen. Gruß Yannick |