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
681
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
Kelekkakisat
Mikä vakava onnettomuus sattunut kisoissa. On peruttu koko kisat. Pelastuskopteri näytti käyvän paikalla.3511427- 639830
- 1465574
- 1443784
- 753740
Virkamiehille tarvitaan tuntuvat palkankorotukset
Naistenpäivänä on syytä muistuttaa, että virkamiehen euro on vain 80 senttiä. Palkat tulee saattaa samalle tasolle yksi373635- 403378
Riikka Purran kaudella nousi bensan hinta yli 2 euron
Muistatteko kuinka edellisen vasemmistohallituksen aikana, ns. Marinin aikakaudella, bensiiniä sai 1,3 euron litrahinnal243183- 632793
Olisipa saanut sinuun
Tutustua paremmin. Harmi että aloin lopulta jännittämään kun näytit tunteesi niin voimakkaasti ja lähestyit niin voimaak792593