Thema Datum  Von Nutzer Rating
Antwort
Rot dynamisches Kopieren
 08.11.2016 09:48:20 Tobi
NotSolved

Ansicht des Beitrags:
Von:
Tobi		 Datum:
08.11.2016 09:48:20		 Views:
1200		 Rating:
     
Antwort:
  Ja
Thema:
dynamisches Kopieren
Hallo liebe VBA-Gemeinde! Mein Anliegen: Ich bin dabei eine VBA zu erstellen, bei der der Anwender eine Datei über "Datei öffnen..." auswählt und aus der dann etwas herauskopiert und ins aktive Workbook eingefügt werden soll. Die Daten befinden sich in der vom Anwender ausgewählten Datei immer an der selben Stelle ABER varrieren jedoch in der Zeilenlänge. Die Datei in der diese Zeilen eingefügt werden sollen muss sich entsprechend der Zeilenanzahl in der Quelldatei anpassen und entsprechend viele Zeilen zur Verfügung stellen, die das gleiche Format haben wie die erste Zeile der Zieldatei. Meine Syntax funktioniert bereits bis zum Kopiervorgang: Sub import_Domain() Dim FileName As Varian Dim wbTarget As Object, wbSource As Object Dim CRange As Range, PRange As Range FileName = Application.GetOpenFilename _ ("Micrsoft Excel-Dateien (*.xlsx),*.xlsx,*.xlsxm,*.xlsm") If FileName = False Then Exit Sub Set wbTarget = ActiveWorkbook Set wbSource = Workbooks.Open(FileName) End_sub Komme ab Set wbSource gedanklich einfach nicht weiter.

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 dynamisches Kopieren
 08.11.2016 09:48:20 Tobi
NotSolved