Solun kopiointi

toiseen taulukkoon

Millä koodilla saan kopioitua solun toiseen välilehteen samassa (Excel) työkirjassa?
Jos taulukko1:ssä on A1 solussa luku ja sitä muutetaan siten että se kasvaa 2:lla (esim luku on 1 ja se muutetaan itse 3:ksi) pitäisi luku kopioitua Taul2:sen A1 soluun ja koko ohjelman myös siirtyä taulukko2:een.
Onnistuuko Vba:lla?

4

700

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • mmm

      Sheets(2).Cells(1, 1) = Sheets(1).Cells(1, 1)

      Onnistuu.

      • sama.

        Ei tapahtunut mitään taulukko2:ssa tuolla koodilla. Harmi.

      • mmm
        sama. kirjoitti:

        Ei tapahtunut mitään taulukko2:ssa tuolla koodilla. Harmi.

        Dim K As Double
        Private Sub Worksheet_Change(ByVal Target As Range)
        If Target.Address = "$A$1" Then
        If Target - K = 2 Then
        With Sheets(2)
        .Cells(1, 1) = Target
        .Activate
        End With
        End If
        K = Target
        End If
        End Sub

      • sama.
        mmm kirjoitti:

        Dim K As Double
        Private Sub Worksheet_Change(ByVal Target As Range)
        If Target.Address = "$A$1" Then
        If Target - K = 2 Then
        With Sheets(2)
        .Cells(1, 1) = Target
        .Activate
        End With
        End If
        K = Target
        End If
        End Sub

        kiitos neuvoista

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Takaisin ylös

    Luetuimmat keskustelut

    1. Saana airola ja. muusikko spekulaatiota

      Saara airolan kirja muusikko mies. Oisko redrama tai lauri tähkä? Saana oli 13 v vuonna 2014 Tekoäly sanoo : tähkä Julki
      Yhteiskunta
      13
      1474

    2. Mitäs peitsarissa on tapahtunut eilen illalla

      Mikkelissä iso poliisioperaatio https://www.iltalehti.fi/kotimaa/a/39ef020c-2d81-4d72-b720-651f458ba3e2
      Mikkeli
      55
      1407

    3. Miten kuvaisit tunteitasi

      tällä hetkellä?
      Ikävä
      106
      1114

    4. Jos saisit palata takaisin johonkin vuoteen

      Mikä vuosi se olisi? Ja mitä siinä hetkessä tapahtuisi?
      Ikävä
      121
      1071

    5. Mikä estää?

      tapaamisen, suhteen aloittamisen?
      Ikävä
      76
      746

    6. Miksi ETTE suostu selvittämään . . . . . ...

      Asioita jotka jääneet selvittämättä toisen osapuolen kanssa? Kertoisitteko miksi ette suostu? Vaikka teidän mielestä
      Ikävä
      168
      691

    7. Mitä jos saisit selville

      että kaivattusi tekee susta pilaa?
      Ikävä
      120
      607

    8. Eilinen

      Herättikö eilinen jotain ajatuksia?
      Ikävä
      52
      572

    9. Wille Rydman on kansalaisten mielestä huonoiten onnistunut ministeri

      Onneksi olkoo Wille kärkipaikasta! Oletkin sen eteen tehnyt hartiavoimin töitä. "Ministeri Wille Rydman (ps) on kansala
      Maailman menoa
      368
      558

    10. Tajuan kyllä

      että molemmilla on omat elämänsä ja kuvionsa ja rakkaansa. En odota mitään enkä ole tunkemassa mihinkään. Kai silti saa
      Ikävä
      52
      515
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt