bowlingman
Gebruiker
- Lid geworden
- 17 okt 2007
- Berichten
- 433
Hallo,
Is het mogelijk om een bepaald gedeelte van een sheet te kopieren naar een andere sheet aan de hand van een button en een bepaalde celinhoud.
Momenteel doe ik dit in een ander prog op de volgende wijze, maar dit zijn steeds verschillende sheets (speeldagen)
In het nieuwe prog waar ik nu aan bezig ben staan alle speeldagen op 1 sheet
Meer uitleg van wat de bedoeling is staat in de file
Grtjs.
Armand
Is het mogelijk om een bepaald gedeelte van een sheet te kopieren naar een andere sheet aan de hand van een button en een bepaalde celinhoud.
Momenteel doe ik dit in een ander prog op de volgende wijze, maar dit zijn steeds verschillende sheets (speeldagen)
Code:
Sub Kopie()
Range("A1:AG11,A19:AG27,A35:AG43,A51:AG59").Copy
Workbooks.Open "C:\Users\Armand\Documents\Bowling 2017-2018\Metropool Liga\Mario\Speeldagen.xlsx"
ActiveWorkbook.Sheets("Blad2").Range("A1").PasteSpecial xlPasteValues
Application.Goto Cells(1)
Application.CutCopyMode = True
End Sub
Meer uitleg van wat de bedoeling is staat in de file
Grtjs.
Armand