ich muss folgendes (für euch wohl triviales) Problem lösen und bin noch ein ziemlicher VBA Noop.
Ich habe zwei Arbeitsblätter in der selben Excel Mappe.
Ein Arbeitsblatt ist eine Kostenabfrage aus dem System, das andere Blatt (Statistikblatt) wird dazu genutzt, um mit den Daten aus der Kostenabfrage quartalsmäßig eine Geschäftsstatistik zu erstellen.
Hierbei müssen die Spalten F,R,Z,AD,AH und AL aus dem Blatt mit der Kostenabfrage in das "Statistikblatt" kopiert werden.
Jedoch betrifft das Kopieren nicht alle Zellen, sondern lediglich die folgenden: 36,41,62,68,88,83,94 und 113.
Im Statistikblatt sollen die abgefragten Daten dann spaltenweise eingetragen werden (beginnend in Reihe B)
B1=F36 C1=R36
B2=F41 C2=R41 etc....
Meine kläglichen Versuche waren bis jetzt:
Sub Kopieren ()
Sheets("Kosten2Q").Range("F36,F41,F62,F68,F88,F83,F94,F113").Copy
Sheets("Statistikblatt").Select
Sheets("Statistikblatt").Paste Destination: = Worksheets("Statistikblatt").Range("B2:B9")
End Sub
Hierbei bekomme ich jedoch immer die Fehlermeldung: Run-Time Error 9, Subscript out of Range.Das dürfte doch eigentlich zu machen sein, komischerweise habe ich nichts wirklich wertvolles in den Forensammlungen gefunden.
Ich danke Euch vorab vielmals für jegliche Hilfe,
Beste Grüße,
Tobias