Thema Datum  Von Nutzer Rating
Antwort
25.11.2015 11:36:52 Gast69722
NotSolved
25.11.2015 12:13:25 BigBen
NotSolved
Rot Import ab bestimmter Zelle starten
25.11.2015 13:35:07 Gast60456
NotSolved
25.11.2015 14:20:02 BigBen
NotSolved
25.11.2015 14:39:15 Gast49925
NotSolved
26.11.2015 09:14:47 Gast72228
NotSolved

Ansicht des Beitrags:
Von:
Gast60456
Datum:
25.11.2015 13:35:07
Views:
747
Rating: Antwort:
  Ja
Thema:
Import ab bestimmter Zelle starten

Hey,

 

erst mal danke!

Ich weiß gerade nicht wo das im Code dann passieren soll.

 Sub Schaltfläche2_Klicken()
Dim wsZiel As Worksheet
Dim wsQuelle As Worksheet

'Zielblatt = aktive Datei, aktives Blatt
    Set wsZiel = ActiveWorkbook.ActiveSheet
    
'Quellblatt = Datei, Blatt 1
    Set wsQuelle = Workbooks.Open(Filename:="C:\Users\bia5le\Desktop\TEST123.xlsx").Worksheets(1)
'Kopieren
    wsQuelle.Cells.Copy Destination:=wsZiel.Cells
'Quelle schließen
    wsQuelle.Parent.Close
    Set wsQuelle = Nothing
    Set wsZiel = Nothing


End Sub

hab das mal eingefügt vor und nach

Set wsZiel = ActiveWorkbook.ActiveSheet

aber das funkt nicht so.


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
25.11.2015 11:36:52 Gast69722
NotSolved
25.11.2015 12:13:25 BigBen
NotSolved
Rot Import ab bestimmter Zelle starten
25.11.2015 13:35:07 Gast60456
NotSolved
25.11.2015 14:20:02 BigBen
NotSolved
25.11.2015 14:39:15 Gast49925
NotSolved
26.11.2015 09:14:47 Gast72228
NotSolved