Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Range mehrmals nebeneinander Kopieren |
12.09.2022 10:11:07 |
Eric |
|
|
|
12.09.2022 10:18:48 |
Mase |
|
|
|
12.09.2022 10:34:33 |
volti |
|
|
|
12.09.2022 10:38:52 |
Eric |
|
|
|
12.09.2022 10:32:34 |
volti |
|
|
|
12.09.2022 10:37:52 |
Gast39229 |
|
|
|
12.09.2022 10:41:20 |
volti |
|
|
|
12.09.2022 10:43:53 |
Eric |
|
|
|
12.09.2022 11:08:43 |
volti |
|
|
|
12.09.2022 11:21:48 |
Eric |
|
|
|
12.09.2022 11:32:57 |
volti |
|
|
|
12.09.2022 11:55:04 |
Eric |
|
|
Von:
Eric |
Datum:
12.09.2022 10:11:07 |
Views:
844 |
Rating:
|
Antwort:
|
Thema:
Range mehrmals nebeneinander Kopieren |
Hey Leute, ich hab ein kleines Problem, ich habe eine Range in der Werte stehen und die möchte mehrmals nebeneinander kopieren(um in einem Diagramm mehrere Zyklen darzustellen), der Wert wird richtig übergeben und der Code geht die For-Schleife auch dementsprechend oft durch (durch einzelschritte überprüft). Mein Problem ist das die kopierte Range nur einmal Rechts neben die bestehenden Werte kopiert wird und nicht beim nächsten durchlauf der schleife wieder in die erste freie spalte gepastet wird. Kann mir da jemand helfen?
Danke im Voraus
Option Explicit
Dim zyklen As Variant
Private Sub CommandButton1_Click()
Dim index As Integer
For index = 0 To zyklen
Range("B14:K20").Copy
Cells(14, Range("B14:K20").Columns.Count + 2).PasteSpecial Paste:=xlPasteValues
Next index
Unload UserForm1
End Sub
|
- 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
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- 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
|
Range mehrmals nebeneinander Kopieren |
12.09.2022 10:11:07 |
Eric |
|
|
|
12.09.2022 10:18:48 |
Mase |
|
|
|
12.09.2022 10:34:33 |
volti |
|
|
|
12.09.2022 10:38:52 |
Eric |
|
|
|
12.09.2022 10:32:34 |
volti |
|
|
|
12.09.2022 10:37:52 |
Gast39229 |
|
|
|
12.09.2022 10:41:20 |
volti |
|
|
|
12.09.2022 10:43:53 |
Eric |
|
|
|
12.09.2022 11:08:43 |
volti |
|
|
|
12.09.2022 11:21:48 |
Eric |
|
|
|
12.09.2022 11:32:57 |
volti |
|
|
|
12.09.2022 11:55:04 |
Eric |
|
|