Verknüpfung ganzer Spalten

02/04/2009 - 12:04 von Tom Sousa | Report spam
Hallo allerseits,

ich bekomme regelmàßig eine Exceltabelle mit etwa 25 Spalten. Nun muss ich
jedesmal die Spalten in eine ganz bestimmte andere Rheienfolge bringen, um
daraus eine CSV-Datei zu erstellen, die in meine Datenbank importierbar
ist.

Ich suche eine Lösung, die mir eine Vereinfachung bringt.

Nun kann man den Inhalt eines Feldes in einem anderen Feld darstellen in
dem man z.B. "¡" notiert. Ich frage mich ob eine solche Zuordnung auch
mit Spalten möglich ist. Beispielsweise die Spalte D Von Tabellenblatt 1 in
der Spalte A des Tabellenblatts 2 darzustellen.

Ist solches möglich?
 

Lesen sie die antworten

#1 Andreas Killer
02/04/2009 - 12:37 | Warnen spam
On 2 Apr., 12:04, Tom Sousa wrote:

ich bekomme regelmàßig eine Exceltabelle mit etwa 25 Spalten. Nun muss ich
jedesmal die Spalten in eine ganz bestimmte andere Rheienfolge bringen, um
daraus eine CSV-Datei zu erstellen, die in meine Datenbank importierbar
ist.

Ich suche eine Lösung, die mir eine Vereinfachung bringt.

Nun kann man den Inhalt eines Feldes in einem anderen Feld darstellen in
dem man z.B. "¡" notiert. Ich frage mich ob eine solche Zuordnung auch
mit Spalten möglich ist. Beispielsweise die Spalte D Von Tabellenblatt 1 in
der Spalte A des Tabellenblatts 2 darzustellen.

Ist solches möglich?


IMHO nein. Allerdings ist es sehr einfach ein Makro zu erstellen
welches Dir diese Umstellung abnimmt.

Andreas.

Sub Test()
Dim S As Worksheet
'Bildschirmupdate aus (zum Testen auskommentieren!)
Application.ScreenUpdating = False
'Das aktuelle Tabellenblatt merken = Blatt1
Set S = ActiveSheet
'Ein neues Blatt erzeugen = Blatt2
Sheets.Add
With S
'Kopiere Blatt1 Spalte A nach Blatt2 Spalte B
.Columns("A").Copy Columns("B")
'Kopiere Blatt1 Spalte B nach Blatt2 Spalte F
.Columns("B").Copy Columns("F")
End With
'Bildschirmupdate ein
Application.ScreenUpdating = True
End Sub

Ähnliche fragen