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

686

    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. Lindtman I vasemmistohallitus aloittaa viimein Suomen kuntoon laittamisen

      Tässä nyt on 3 vuotta seurattu irvokasta kärsimysnäytelmää nimeltään "valtion budjetin tasapainotus by äärioikeisto", ja
      Maailman menoa
      169
      2607
    2. Missä viipyy persujen lupaama euron bensa?

      En edes muista milloin bensapumpussa olisi ollut ykkösellä alkava litrahinta. Missä siis viipyy persujen lupaama euron b
      Maailman menoa
      148
      2387
    3. Kirje, PellePelottomalle.

      Tärkeää olisi luoda ystävyys, että se, jota rakastaa, on samalla paras ystävä ja luotettavin, jolle voi ja uskaltaa luot
      Ikävä
      102
      1082
    4. Meni kyllä aika solmuun

      Meidän tutustuminen 😐
      Ikävä
      64
      901
    5. Sinua oli kiihottavaa

      Sinua nainen oli kiihottavaa katsella.
      Ikävä
      65
      849
    6. Mistä löytyy naisseuraa sinkkumiehelle?

      Kertokaapas kokeneemmat mistä löytyis naisseuraa sinkulle. Ihan ois eukko nyt tosissaan hakusessa. Tanssipaikat kun on a
      Kuhmo
      19
      737
    7. Persut jakavat tekoälyllä tehtyjä kuvia maahanmuuttajista somessa

      Eivät mainitse, että ovat tekoälyllä tehtyjä. Eivät näe asiassa mitään ongelmaa. Valehtelijapuolue taas vauhdissa. Unka
      Maailman menoa
      274
      727
    8. Martinan hevoset.

      Tämä todella kaunis ja ketterä harmaa hevonen jolla monet kilpailut voitetaan ei ole Martinan.Tytär ratsastaa sillä tait
      Kotimaiset julkkisjuorut
      212
      722
    9. Voi teitä naisia

      Suudeltiin ja nukuttiin toisissamme kiinni mutta pillua ei tullu, ei edes aamulla. t.38vmies
      Sinkut
      86
      720
    10. Hyvä meininki

      TTP:ssa väkeä tosi runsaasti paikalla. Hyvää ruokaa jälleen ja munkit ja sima erinomaista. Kiitos yrittäjälle! Hieno Vap
      Haapavesi
      22
      678
    Aihe