Ongelmana on saada siirrettyä 6 numeroa, hiirtä napasauttamalla numeron päällä. Eli numerot on samalla rivillä vierekkäin ja haluaisin ne pari riviä alemmas siihen järjestykseen, kun olen niitä klikannut. Miten tällaisen saisi toteutettua?
Numerojen siirto
Numeroita
2
243
Vastaukset
Muokkaa sopivaksi
koodi taulukon moduuliin...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error GoTo virhe
Application.EnableEvents = False
If Not Intersect(Range("C3:H3"), Target) Is Nothing Then
If Target = "" Then GoTo virhe
If Range("C3").Offset(2, 0) = "" Then
Target.Copy Destination:=Range("C3").Offset(2, 0)
Else
Target.Copy Destination:=Range("C3").Offset(2, 10).End(xlToLeft).Offset(0, 1)
End If
Target = ""
End If
virhe:
Application.EnableEvents = True
End Sub- numeroita
toimii mainiosti
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
- 14910901
- 525200
Taas ryssittiin oikein kunnolla
r….ä hyökkäsi Viroon sikaili taas ajattelematta yhtään mitään https://www.is.fi/ulkomaat/art-2000011347289.html452413- 302113
Vanha Suola janottaa Iivarilla
Vanha suola janottaa Siikalatvan kunnanjohtaja Pekka Iivaria. Mies kiertää Kemijärven kyläjuhlia ja kulttuuritapahtumia131681Valtimon Haapajärvellä paatti mäni nurin
Ikävä onnettomuus Haapajärvellä. Vene hörpppi vettä matkalla saaren. Veneessä ol 5 henkilöä, kolme uiskenteli rantaan,421514Tiedän kuka sinä noista olet
Lucky for you, olen rakastunut sinuun joten en reagoi negatiivisesti. Voit kertoa kavereillesi että kyl vaan, rakkautta301221Känniläiset veneessä?
Siinä taas päästiin näyttämään miten tyhmiä känniläiset on. Heh heh "Kaikki osalliset ovat täysi-ikäisiä ja alkoholin v351166Daniel Nummelan linjapuhe 2025
Kansanlähetyksen toiminnanjohtajan Daniel Nummelan linjapuhe tänään. Rehellistä analyysiä mm. evlut kirkosta ja piispo92925TÄSTÄ TAITAA TULLA SUOMEN HISTORIAN SUURIN USKONNONVAPAUDEN OIKEUDENKÄYNTI.
Sinun täytyy hyväksyä se että jos sinä vetoat uskonnonvapauteen, silloin sinun tulee antaa myös muille vastaava vapaus o317882