Thema Datum  Von Nutzer Rating
Antwort
27.09.2010 19:35:57 Manfred
NotSolved
28.09.2010 17:44:46 Severus
NotSolved
30.09.2010 09:01:13 Manfred
NotSolved
30.09.2010 13:53:01 Severus
NotSolved
30.09.2010 16:02:48 Manfred
NotSolved
01.10.2010 04:17:24 Severus
NotSolved
01.10.2010 11:05:08 Manfred
NotSolved
Blau Aw:Aw:Aw:Aw:Aw:Aw:Aw:VBA Excel2003 Datenimport
02.10.2010 02:41:43 Severus
NotSolved
02.10.2010 09:21:56 Manfred
NotSolved
02.10.2010 21:50:30 Severus
NotSolved
05.10.2010 18:52:48 Manfred
NotSolved
05.10.2010 19:41:52 Severus
NotSolved

Ansicht des Beitrags:
Von:
Severus
Datum:
02.10.2010 02:41:43
Views:
862
Rating: Antwort:
  Ja
Thema:
Aw:Aw:Aw:Aw:Aw:Aw:Aw:VBA Excel2003 Datenimport
Manfred schrieb am 01.10.2010 11:05:08:

Severus schrieb am 01.10.2010 04:17:24:

Hi Mani,

den Namen in Sheets() kann man entweder als Namen, z.B. das übliche "Tabelle1" verwenden oder den Blattindex, also numerisch 1, 2, 3 etc. Der Index richtet sich dabei nach der Position des Blattes in der Arbeitsmappe. (Wichtig bei ausgeblendeten Arbeitsblättern, also wenn Blatt 1,2,4 und 6 sichtbar sind, 3 und 5 aber ausgeblendet: Dann hat das dritte sichtbare Blatt den Index 4)
Der Ausruf heißt also entweder

.Sheets("Tabelle1") oder
.Sheets(1)

Severus


Leider funktioniert es immernoch nicht, egal ob ich Sheets oder Worksheets schreibe oder ("Tabelle1") oder (1) ...alle Kombinationen führennicht zum Ziel und ich weis auch nciht wie genau ich den Fehler finden soll, kannst du mir da vielleicht noch ein bisschen weiterhelfen...
DAnke schonmal für deine Mühe

greetz Mani



Also nochmal: Wir haben eine Arbeitsmappe1 mit dem Quellblatt und eine Arbeitsmappe2 als Ziel.

workbooks("arbeitsmappe1.xls").Sheets(1).Copy After:=Workbooks("arbeitsmappe2").Sheets(1)
Workbooks("arbeitsmappe2").Sheets(2).Name = "Zielsheetname"

Severus

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
27.09.2010 19:35:57 Manfred
NotSolved
28.09.2010 17:44:46 Severus
NotSolved
30.09.2010 09:01:13 Manfred
NotSolved
30.09.2010 13:53:01 Severus
NotSolved
30.09.2010 16:02:48 Manfred
NotSolved
01.10.2010 04:17:24 Severus
NotSolved
01.10.2010 11:05:08 Manfred
NotSolved
Blau Aw:Aw:Aw:Aw:Aw:Aw:Aw:VBA Excel2003 Datenimport
02.10.2010 02:41:43 Severus
NotSolved
02.10.2010 09:21:56 Manfred
NotSolved
02.10.2010 21:50:30 Severus
NotSolved
05.10.2010 18:52:48 Manfred
NotSolved
05.10.2010 19:41:52 Severus
NotSolved