Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
860to864
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
860to864
860to864
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

860to864: Spalten übernehmen

Spalten übernehmen
11.04.2007 14:12:16
Ronny Meyer

Hallo Excel Experten,
ich exportiere daten aus SAP in eine Excel Liste. Diese daten möchte ich nun in excel weiterverarbeiten. Konkret möchte ich ein Tool erstellen mit dem man ein Material-, Lieferanten- und Beschaffungsportfolio erstellen kann. Aus den beiden erstgenannten ergibt sich das letztere. Teil der Aufgabenstellung ist es das Tool so zu erstellen, dass mit wenigen Handgriffen die Auswertung vorgenommen werden kann. Der Datenexport aus SAP stellt die Grundlage dar. Grundsätzlich hat die Export Tabelle immer die gleiche Form, lediglich die Werte und die Anzahl der Positionen (Zeilen) unterscheiden sich. Wie kann ich eine Excel Tabelle erstellen, die sich automatisch aus der SAP Export Tabelle die relevanten Spalten zieht?
BSP. Übernehme immer aus tabelle 1 die Spalte 1 und 2.

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spalten übernehmen
12.04.2007 21:26:37
Gerd L
Hallo (Leidensgenosse) Ronnie,
wie heißt bei Dir die SAP-Export-Exceldatei ?
Gruß
Gerd
AW: Spalten übernehmen
13.04.2007 11:23:03
Ronny Meyer
Hallo gerd.
ich erstelle diese datei über
System Liste Sichern Lokale Datei
und kann dann sagen unter welchem namen und an welchem ort die Datei gespeichert werden soll. Wichtig ist das ich die Datie mit .xls speichere.
Diese Datei wird dann von zeit zur zeit erneuert und eine zweite Excel soll darauf zugreifen.

AW: Spalten übernehmen
14.04.2007 12:59:08
Gerd L
Hallo Ronnie,
zum Beispiel so.


Sub test()
With ThisWorkbook.Worksheets(1).Range("A1:B65536")
.FormulaArray = "='c:\Eigene Dateien\[Quelle.xls]Tabelle1'!A1:B65536"
.Value = .Value
End With
End Sub


Gruß
Gerd

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige