Ist es möglich nach erreichen vom Zeilenmaximum ein neues Blatt mit dem abgerufenen Inhalt...

Hallo Claus,

super, vielen Dank es funktioniert genau so wie ich es haben wollte. Ich wollte nur fragen ob der Inhalt von dem Blatt Stundenmeldungen gelöscht wird bevor die neue Übertragung beginnt? Weil wenn die Übertragung kürzer/weniger wäre als die alte, was würde
mit den unteren Zeilen der letzten Übertragung passieren?

Und ich wollte fragen ob es nicht möglich ist, alle bestehenden Blätter, auch Stundenmeldungen zu löschen, sodass nur das übertragene Monatsblatt immer drin wäre?

Hallo Matthias,

du kannst immer nur einen Tabellennamen haben. Deswegen gibt es auch nur ein Blatt "Formeln". Wenn es nicht existiert, wird es angelegt. Existiert es schon, wird vorhandener Inhalt gelöscht und die Formel neu geschrieben.

Mit freundlichen Grüßen

Claus

Hallo,

mit dem Formatpinsel oder indem du die Tabelle im ersten Blatt kopierst, im zweiten Blatt dann die entsprechende Startzelle selektierst und Einfügen => Inhalte einfügen => Formate wählst.

Mit freundlichen Grüßen

Hallo Wolfgang,



wie kopierst du das Blatt?

Eine Möglichkeit wäre Rechtsklick auf den Blattreiter => Verschieben/Kopieren => [x] Kopie erstellen. Dann sind die Kommentare auch drin.

Oder du kopierst die Daten, selektierst A1 auf den neuen Blatt und fügst sie ein. Mit weiterhin bestehender Markierung von A1 gehst du dann auf Einfügen => Inhalte einfügen => Kommentare



Mit freundlichen Grüßen

Claus

Die Verknüpfung spielt keine Rolle, das gilt für jede beliebige Datei:
<br />1) Referenziere die Objekte und lese die Daten wie üblich.
<br />Also "normalerwesie" sagt Du
Range("B1") = Range("A1")
und schreibst so den Inhalt aus A1 im aktiven Blatt in B1 im aktiven Blatt.
<br />Aus einem anderen Blatt musst Du nur das Objekt des Sheets davor tun
Range("B1") = Worksheets("Tabelle2").Range("A1")
<br />und schreibst so den Inhalt aus A1 aus Blatt "Tabelle2" in B1 im aktiven Blatt.
<br />Aus einer anderen Datei musst Du zusätzlich noch das Objekt des Workbooks davor tun
<br /> Range("B1") = Workbooks("PERSONAL.XLS").Worksheets("Tabelle2").Range("A1")
<br />und schreibst so den Inhalt aus A1 aus Blatt "Tabelle2" aus Datei "PERSONAL.XLS" in B1 im aktiven Blatt.
<br />2) Gar nicht.
<br />Deklarationen innerhalb von VBA-Prozeduren sind nicht zugänglich, sind immer PRIVATE.
<br />Nur global und als PUBLIC deklarierte Variablen können gelesen/geschrieben werden und dafür braucht es dann auch eine Referenz via VBA zu der Datei.
<br />Andreas.
<br />