Tarkoituksenani on tehdä makro, joka kopioi laskentataulukon solun arvon toiseen samassa työkirjassa olevaan laskentataulukkoon.
Sheets("Taul2").Select
Range("J30:K30").Select
Selection.Copy
Sheets("Taul1").Select
Range("V2:W2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Tämä toimii, kun nauhoitettu makro luodaan tyhjälle työkirjalle. Yrittäessäni liittää tämä CommandButtonille toiseen työkirjaan, saan seuraavan virheilmoituksen:
runtime error 1004
Luokan range menetelmä select epäonnistui
Samalla debuggaus osoittaa ongelmalliseksi jälkimmäisen selectin "Range("V2:W2").Select". Mikähän tässä mahtaa olla ongelmana? Osaako kukaan auttaa?
runtime error 1004
Vba-aloittelija
2
1134
Vastaukset
- kokeilija-aloittelija
Kokeile editoida makroa:
ActiveSheet.Range("V2:W2").Select Makronauhoitin antaa mukavaa koodia...
kokeiles tolla
Private Sub CommandButton1_Click()
Sheets("Sheet2").Range("J30:K30").Copy Sheets("Sheet1").Range("V2:W2")
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Kuka oli töllöntyön tekijä?
Ketä on nyt pidätetty? Oliko syy mustasukkaisuus tyttöystävästä tai oliko muita lieventäviä seikkoja? Katuuko tekijä nyt414638Kotikasvatus siitä se lähtee eli missä meni vikaan että lapsesta tuli puukottaja
Ottakaa muut oppia, normaali kotielämä. Ei liikaa edes hengellisyyttä.532514Jenkkilahkojen kastekaava
Jenkkilahkojen yhteinen kastekaava on kirjoitettuna Mormonin Kirjaan, Moroni, luku-8 Pienten lapsien vanhempia uhataan1391034Pasi Turunen: Ensimmäisenä Helluntaina ei kastettu sylivauvoja!
Tänään 31.5.2026 Pasi Turunen noin vastasi soittajan kysymykseen! Raamattu EI KERRO ketä kastettiin1611005Odotan sitä hetkeä
kun nähdään taas. Tiedän, että sinäkin odotat. Kun se päivä koittaa, katseesi hakee minua. Ehkä arkailemme toisiamme väh68889- 113878
Olen melko vakuuttunut
etten tule olemaan koskaan täysin onnellinen ilman sinua. En uskonut, että näin kävisi kenenkään kanssa. Kunnes sain kok70844- 137795
- 48790
Taas mietin että
mitä ihmettä sanoisin, jos laittaisin viestiä. Aina voi toivottaa jotain, vaikka hyvää kesää, ja jos ei tule vastausta,48736