Clever-Excel-Forum

Hallo zusammen

Ich würde gerne per Makro-Schaltfläche eine Spalte aus einem Excel-File in ein Anderes kopieren.
Mein jetziger Makro sieht bis jetzt so aus:

Code:
Sub ArtNr_holen()

Dim arr() As Variant

' einlesen

arr = Workbooks("Servername/Weinkartentool_Weinsteckbrief 26.11.2019.xlsx").Worksheets("1").Range("A:A")

' ausgeben

Workbooks("Servername/produkttabelle.xlsm").Worksheets("1").Range("A:A") = arr

End Sub

Dieser funktioniert jedoch leider nicht. (Laufzeitfehler 9)
Hätte jemand eine Idee wie es funktionieren könnte?

Grüsse

Hallöchen,

Zitat:Workbooks("Servername/produkttabelle.xlsm")

ein Slash kann unmöglich in einem Dateinamen stehen. Versuche, eine neue Textdatei mit dem Namen A/B.txt anzulegen ...
Der Pfad zu einer Datei wird nicht in der Liste der offenen Dateien verwendet.

Einen funktionierenden Code für Deine Aktion kannst Du z.B. mit dem Makrorekorder aufzeichnen. Den kannst Du mit Deinem vergleichen und siehst die Problemstellen.

Falls Du Daten in eine geschlossene Datei schreiben willst, wird das etwas komplexer. Schaue Dir dazu dieses Tutorial an:
ADO und Excel

18398

schauan