Zeilen per VBA kopieren

[Tyler]

Hallo schauan

Habe dein Konstrukt mal getestet...
Und Ja, =A springt mit auf Zeile2, nur tut er mir leid ich habe keine Idee wie ich mir das in der Formel zu nutzen machen kann.  :20:

LG
Tyler

[schauan]

Hallöchen,
Das war eine Idee zur Frage vom Gast. Allerdings musst Du entscheiden, ob Du so eine Formel auf dem Blatt unterbringen kannst.

[Tyler]

Guten Morgen,

Ich denke nicht...
Ich muss irgendwie der Makro sagen in Welcher Zeile der wert wieder ausgegeben werden soll.
Da durch das Zeilen einfügen die Offset einstellung den wert nun in der falschen Zeile wieder geben.

Grüße
Tyler

[Frogger1986]

Sollen nur die Werte kopiert werden oder soll die Formatierung auch mit?? Bleit die Mappe mit den Bezugswerten geschlossen oder darf diese geöffnet werden??

[Frogger1986]

hallo

Versuche mal das (lässt sich dann für die anderen Bereiche anpassen! (Code in Mappe "Test")! Wenn es ein bestimmtes Tabellenblatt sein muss in "Mappe Test" dann bitte "Activesheet" Genen Sheets(" name das Tabellenblatt das es sein soll ") austauschen.. 

Code:

Sub datenrein()


ThisWorkbook.ActiveSheet.Range("E8:X8").FormulaLocal = "='C:\Ordner\Dateien\[Mappe1.xlsx]Tabelle1'!D5"
ThisWorkbook.ActiveSheet.Range("E8:X8").Copy
ThisWorkbook.ActiveSheet.Range("E8:X8").PasteSpecial xlPasteValues
Application.CutCopyMode = False


End Sub

[Tyler]

Hey Frogger

Danke werde ich ausprobieren. 

Gruß 
Tyler