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
4
645
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
Kumpi vetoaa enemmän sinuun
Kaivatun ulkonäkö vai persoonallisuus? Ulkonäössä kasvot vai vartalo? Mikä luonteessa viehättää eniten? Mikä ulkonäössä?921766- 851252
- 1101123
- 71954
- 105901
Okei nyt mä ymmärrän
Olet siis noin rakastunut, se selittää. Onneksesi tunne on molemminpuolinen 😘56828- 47741
- 36732
Olen huolissani
Että joku päivä ihastut/rakastut siskooni. Ja itseasiassa haluaisin, ettei hän olisi mitenkään sinun tyyppiäsi ja pitäis47681- 33663