Sub Lisää()
'
' Lisää Makro
'
'
'
Sheets("Taul1").Select
Range("I19:K19").Select
Selection.Copy
Sheets("Taul2").Select
Rows("2:2").Select
Selection.Insert Shift:=xlDown
Range("A2").Select
Sheets("Taul1").Select
Application.CutCopyMode = False
Range("A1").Select
End Sub
eli kun excel ei ole jaettu ei suorita tuota toimintoa vaan ilmoittaa että Run-time error '1004', Luokan Range menetelmä Insert epäonnistui.
Miksei jaetussa muodossa toimi?
Run-time error '1004'
bablobubla
1
411
Vastaukset
jos komentopainike ajaa koodin, niin kokeile laittaa sen ominaisuuksissa arvo TakeFocusOnClick =FALSE ja testaa toimiiko sitten?
kyllä koodisi toimii ihan OK mun koneella- se vaan joskus voi olla noin, että alkaa yllättäen tökkiä koodi. Yksi syy voi olla suojattu taulukko... ja toi ekaksi mainittu kohdistus syy
allaolevalla koodilla pitäs kyllä toimia
Sub Lisää()
Sheets("Sheet2").Rows("2:2").Insert Shift:=xlDown
Sheets("Sheet1").Range("I19:K19").Copy Sheets("Sheet2").Range("A2")
Sheets("Sheet1").Range("A1").Select
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Useita puukotettu Tampereella
Mikäs homma tämä nyt taas on? "Useaa henkilöä on puukotettu Tampereen keskustassa kauppakeskus Ratinan lähistöllä." ht2154118Kuka rääkkää eläimiä Puolangalla?
Poliisi ampui toistakymmentä nälkiintynyttä eläintä Puolangalla Tilalta oli ollut karkuteillä lähes viisikymmentä nälkii652624Asiakas iski kaupassa varastelua tehneen kanveesiin.
https://www.iltalehti.fi/kotimaa/a/33a85463-e4d5-45ed-8014-db51fe8079ec Oikein. Näin sitä pitää. Kyllä kaupoissa valtava3932381- 472313
Meneeköhän sulla
oikeasti pinnan alla yhtä huonosti kuin mulla? Tai yhtä huonosti mutta jollain eri tyylillä? Ei olisi pitänyt jättää sua321541Muutama kysymys ja huomio hindulaisesta kulttuurista.
Vedakirjoituksia pidetään historiallisina teksteinä, ei siis "julistuksena" kuten esimerkiksi Raamattua, vaan kuten koul5161323Jos ei tiedä mitä toisesta haluaa
Älä missään nimessä anna mitään merkkejä kiinnostuksesta. Ole haluamatta mitään. Täytyy ajatella toistakin. Ei kukaan em951306- 561287
- 751253
Jumala puhui minulle
Hän kertoi sinusta asioita, joiden takia jaksan, uskon ja luotan. Hän kuvaili sinua minulle ja pakahduin onnesta kuulles1251176