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?
Solun kopiointi
toiseen taulukkoon
4
654
Vastaukset
- 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 Subkiitos neuvoista
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Tukalaa kuumuutta
Tietäisitpä vaan kuinka kuumana olen käynyt viime päivät. Eikä johdu helteestä, vaan sinusta. Mitäköhän taikoja olet teh433017Ensi kesänä
Näin kesän viimeisenä minuutteina ajattelen sinua. Olisiko seuraava kesä "meidän" kesä? Tänä vuonna ei onnistuttu, mutta612961- 422367
- 311863
Okei, myönnetään,
Oisit sä saanut ottaa ne housutkin pois, mutta ehkä joskus jossain toisaalla. 😘251719Anne Kukkohovin karmeat velat ovat Suomessa.
Lähtikö se siksi pois Suomesta ? Et on noin kar? mean suuret velat naisella olemassa721684- 481586
Mihin hävisi
Mihin hävisi asiallinen keskustelu tositapahtumista, vai pitikö jonkin Hannulle kateellisen näyttää typeryytensä771275- 381252
- 791080