Hallo Exelfreunde,
Ich Bitte euch, da ich dazu leider keine Lösung habe! und hoffe einer von euch kann mir dabei weiterhelfen!
Gruß Kalle
Ich möchte mit einem VBA Code in Makro1() bei Beginn der Zellinhalt aus der Spalte A, Zeile A8:A13 wieder in die gleiche Spalte A, aber in die Zeile A1:A6 kopiert wird.
Beim zweiten Klick mit dem Button sollte wiederum aus Spalte A, A8:A13 der Zelleninhalt von Zeile A8:A13 in die Spalte B, B1:B6 kopiert werden und nach diesem System sollte nach jedem neuen Klick, eine Spalte die Spalte A8:A13 ausgeben werden.
z.B: A-A, A-B, A-C, A-D, A-E usw. solange bis ich selber den Kopiervorgang beende.
Der Inhalt in der Spalte A, A8:A13 beinhaltet immer unterschietliche Zahlen., die durch den vorhandenen Code unten erzeugt werden, sie sollten dann immer nur eine Spalte weiter ausgegeben werden
Arbeitsblatt1 Tabelle1
Spalte
A --------- B --------- C usw
1--2
2--5
3--6
4--4
5--3
6--1
7
8---2
9---5
10--6
11--4
12--3
13--1
Butten1
‘Option Explicit ‘ dieser Code erzeugt die Spalte A, A8:A13 das funktioniert schon.
‘Sub-kopierenMakro1()
‘Range("E15").Value = Range("E15").Value + 1 ' ................ Zähler
‘Range("Is1:Is6").Copy ‘Range("A8").Select Copy ' Zelleninhalte A8-A13 ausgegeben
‘Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
‘False, Transpose:=False
‘Application.CutCopyMode = False
‘hier fehlt der Code zum Kopieren !!
'End Sub
|