Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
24.04.2024 17:19:09
Anzeige
Archiv - Navigation
1016to1020
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
Spalten kopieren
16.10.2008 18:00:42
André
Habe schon früher große Hilfe in diesem Forum erhalten und hoffe Ihr könnt mir auch diesmal weiterhelfen. Danke im Voraus!
Ich habe eine Tabelle A10 bis D20. Wenn ich ein Button drücke soll die Spalte D in die Spalte F kopiert werden. Bis jetzt kein Problem aber in der Zelle M2 steht eine Zahl (1 bis 15 ist möglich). Wenn da die 1 steht soll die Spalte D in die Spalte F kopiert werden, wenn bei M2 eine 2 steht soll die Spalte D nach G, bei einer 3 nach H usw., bis bei der 15 der Inhalt der Spalte D in die Spalte T kopiert werden soll.
Ich hoffe Ihr könnt mir helfen.
Gruß André

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spalten kopieren
16.10.2008 18:08:00
Chris
Servus André,
probier mal:

Sub tt()
Dim i As Long
If Range("M2") = "" Then Exit Sub
If Not IsNumeric(Range("M2")) Then
Exit Sub
Else
If Range("M2").Value  15 Or Range("M2").Value Like "*,*" Then
Exit Sub
Else
i = Range("M2").Value
Columns(4).Copy Cells(1, 5 + i)
End If
End If
End Sub


Gruß
Chris

AW: Spalten kopieren
16.10.2008 19:03:52
André
Cool das funktioniert ja einwandfrei!
Danke Chris, vielen vielen Dank!
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige