Alla oleva koodi copy/pastettaa erään taulukon 3 rivin välein alaspäin. Samalla kun tämän koodin suorittaa (makropainikkeella), haluaisin tiettyjen solujen tiedon siirtyvän linkkinä samanaikaisesti kahdelle eri sheetille, jotka ovat yhteenveto-sivuja.
Solut A957:A966, A983:A992 haluaisin sarakkeeseen B sheet 2, tietystä solusta alaspäin.
Solut G957:G966, G983:G992 sarake C sheet 2. tietystä solusta alaspäin.
Solu B977 sheet 3 sarake A. Solu B998 sheet 3 sarake B. tietystä solusta alaspäin.
Alkuperäinen koodi on tämä:
Sub Siirrä()
Dim vika As Long
vika = Range("A65536").End(xlUp).Row 3
Range("A951:G1000").Copy Range("A" & vika)
End Sub
Osaisiko kukaan auttaa tässä ongelmassa? Olisiko Kunde paikanpäällä??
Tiettyjen solujen sisällön kopioiminen toiselle sheetille
Dillon87
3
226
Vastaukset
- Dillon87
Lisäyksenä edelliseen viestiin: tarkoitus on siis että aina kun taulukon kopioi/pastettaa, jokaisen taulukon solu-alueet kopioituvat kahdelle eri sheetille, vaikka solualueet tietenkin muuttuvat. Ja mieluiten että pelkästään arvot kopioituvat, ei kaavat, muotoilu ym.
- Dillon87
Hienoa! Hyvin toimii! Olisiko vielä mahdollista että neuvoisit kuinka nuo solut jotka kopioituvat painikkeen klikkauksesta niin kopioitusivat linkkeinä eri sheeteille? Ja mitenkä voin määritellä mihin kohtaa solut kopioituvat sheeteille? Haluaisin että ne kopioituvat tietystä solusta alaspäin??
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Vihamielisyys naisia kohtaan on jo yllättävän suuri ongelma
Esiintyy laajemmassa mittakaavassa, mitä vain tällä palstalla. Mistä tuo ilmiö nyt oikein johtuu, ja saa alkuvoimansa?5412455Odotan 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äh661393Olen melko vakuuttunut
etten tule olemaan koskaan täysin onnellinen ilman sinua. En uskonut, että näin kävisi kenenkään kanssa. Kunnes sain kok831340- 961260
- 1371218
- 1051098
Postimerkki kirjeeseen ja kortiin maksaa jo 3 euroa!
https://yle.fi/a/74-20229241 Kyllä tämä on järjetön hinta, Posti tuhoaa itsensä tällä hinnalla, täytyyhän Postin "Herro133984- 48910
- 47841
Sitä saattaa vähän hölmöillä
rakkauspäissään, jos tunteita on enemmän kuin osaa käsitellä. Alkuhölmöilyt on söpöä ja sallittavaa.60780