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

645

    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ä.

    Luetuimmat keskustelut

    1. Kumpi vetoaa enemmän sinuun

      Kaivatun ulkonäkö vai persoonallisuus? Ulkonäössä kasvot vai vartalo? Mikä luonteessa viehättää eniten? Mikä ulkonäössä?
      Ikävä
      92
      1766
    2. Ei se mene ohi ajan kanssa

      Näin se vaan on.
      Ikävä
      85
      1252
    3. Tavoitteeni onkin ärsyttää

      Sua niin turhaudut ja unohdat koko homman
      Ikävä
      110
      1123
    4. Tunnistebiisi

      Laita joku tunnistebiisi, niin tiedän ett oot täällä ja kaipaat ehkä mua
      Ikävä
      71
      954
    5. Taidat tykätä linnuista paljon

      Mikä on sun lemppari ☺️😉🥹🦢🐦‍⬛🦉🦜🦚
      Ikävä
      105
      901
    6. Okei nyt mä ymmärrän

      Olet siis noin rakastunut, se selittää. Onneksesi tunne on molemminpuolinen 😘
      Ikävä
      56
      828
    7. Miks käyttäydyt noin?

      Välttelet kaikkia kohtaamisia...
      Ikävä
      47
      741
    8. Ei sun tarvi jännittää enää

      en yritä enää mitään. Tiedän että olin mauton ja sössin kaiken.
      Ikävä
      36
      732
    9. Olen huolissani

      Että joku päivä ihastut/rakastut siskooni. Ja itseasiassa haluaisin, ettei hän olisi mitenkään sinun tyyppiäsi ja pitäis
      Ikävä
      47
      681
    10. Minkälainen ääni mulla on mies

      Sinun mielestä?
      Ikävä
      33
      663
    Aihe