Thema Datum  Von Nutzer Rating
Antwort
06.02.2013 21:36:27 Sino
NotSolved
08.02.2013 12:52:00 Holger
NotSolved
11.02.2013 09:39:34 Max
NotSolved
11.02.2013 17:41:17 Gast5352
NotSolved
11.02.2013 19:33:46 Gast74981
NotSolved
12.02.2013 00:12:26 Sino
NotSolved
Rot Import aus anderer Excel Datei
12.02.2013 11:52:37 Max
NotSolved

Ansicht des Beitrags:
Von:
Max
Datum:
12.02.2013 11:52:37
Views:
962
Rating: Antwort:
  Ja
Thema:
Import aus anderer Excel Datei

klar geht das. du  machst eine if bedingung und wenn die erfüllt ist, selectiertst du einen bestimmten bereich und kopierst ihn. bist doch schon auf dem besten weg.

falls die datenmenge gering ist kannst du auch auf das copy verzichten und direkt die einzelnen zellen ansprechen.

If sheets("z2").range("B1") = "bb" then
For i = 1 To 30
    For j = 1 To 12
        Workbooks("EXCELMAPPE").Worksheets("EXVELBLATT").Cells(i, j).Copy                                       'Zelle aus Blatt Hauptprojekt wird kopiert
        Workbooks("EXCELMAPPE2").Worksheets("EXCELBLATT2").Cells(i, j).PasteSpecial Paste:=xlPasteValues       'Wert aus Zelle einfügen
    Next j
Next i
end if

Denke aber an: 

Application.ScreenUpdating = False

sonst läuft das selbst bei kleineren Datenmengen ziemlich langsam


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
06.02.2013 21:36:27 Sino
NotSolved
08.02.2013 12:52:00 Holger
NotSolved
11.02.2013 09:39:34 Max
NotSolved
11.02.2013 17:41:17 Gast5352
NotSolved
11.02.2013 19:33:46 Gast74981
NotSolved
12.02.2013 00:12:26 Sino
NotSolved
Rot Import aus anderer Excel Datei
12.02.2013 11:52:37 Max
NotSolved