Moikka
Alla oleva makro toimii hyvin eli se kopioi esim. taulukon ja siirtää sen 15 riviä alemmaksi mutta seuraavan kopioinnin jälkeen taulukoiden väliin ei jää yhtään riviä.
Haluaisin makron jatkavan kopiointia sillä tavalla että jokaisen taulukon väliin jää esim. 20 tyhjää riviä. Millä tavalla se onnistuisi muuttamalla tätä makroa vai onko helpompia tapoja olemassa?
Sub CopyToEnd()
Range("A1:E10").Select
Selection.Copy
Selection.End(xlDown).Offset(1, 0).Select
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub
Sub InsertAtRow15()
Range("A1:E10").Select
Selection.Copy
Rows("15:15").Select
Selection.Insert Shift:=xlDown
Application.CutCopyMode = False
End Sub
Kopiointi makro apua
Dillon87
2
228
Vastaukset
http://www.kundepuu.com/viewtopic.php?f=155&t=500
Keep EXCELing
@Kunde- Dillon87
Kiitos Kunde!! Koodi toimii täydellisesti!
Ketjusta on poistettu 1 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Duunarit hylkäsivät vasemmistoliiton, siitä tuli feministinaisten puolue
Pääluottamusmies Jari Myllykoski liittyi vasemmistoliittoon, koska se oli duunarien puolue. Sitä samaa puoluetta ei enää2335307Olen väsynyt tähän
En osaa lopettaa ja koen huonoa omaatuntoa tästä. Kaikki on muutenkin turhaa ja tekemisesi sattuvat. Tunteita on vain hy465180Oppiiko vasemmistolaiset valehtelun jo kotonaan?
Sillä vasemmistolaiset/äärivasemmistolaiset valehtelee ja keksii asioita omasta päästään todella paljon. Esim. joku vas2202854Seuraava hallituspohja - Kokoomus, kepu, persut + KD
Kokoomus saa ainakin 20% kannatuksen ensi vaaleissa, keskusta sanoisin noin 15%, persut todennäköisesti enemmän, ehkä 171452430- 652032
- 701840
- 2081704
Miksi et voi tutustua minuun irl?
Vastaa yleisellä tasolla/ympäripyöreästi, jos pelkäät tunnistamisia.1841343Muistakaa persut, että TE petitte, ei kokoomus
Miksikö kukaan ei arvostele kokoomusta? No sen vuoksi, että kokoomus noudattaa vaalilupauksiaan. Sen sijaan TE persut,81234Martina tienaa itse rahansa
Ei tarvitse anella elättäjältään rahaa, ruokaa ja laukkuja.3201191