kopioitua. Eli
A1 tekstiä C1 tekstiä
A2 numero C2 tekstiä
Haluaisin ensinmäisen sivun näyttämään näin. Kun painan PgDn Seuraavalle sivulle tulisi muuten sama paitsi numero kentässä luku kasvaisi yhdellä.
Toivottavasti joku ymmärsi. Kiitokset
Miten saan
fiksusti
1
218
Vastaukset
kopioi nyt aina seuraavaan taulukkoon edellisen taulukon tiedot
Sub Workbook_Open()
Application.OnKey "{PGDN}", "Seuraava"
End Sub
Sub Workbook_Close()
Application.OnKey "{PGDN}"
End Sub
Sub Seuraava()
On Error Resume Next
Range("A1:C2").Copy Destination:=Sheets(ActiveSheet.Index 1).Range("A1")
Sheets(ActiveSheet.Index 1).Range("A2") = Sheets(ActiveSheet.Index 1).Range("A2") 1
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Immu otti pataan
Olen pettynyt, hänen piti viedä Stagalaa kuin litran mittaa - mutta kuinka kävikään? Voi hemmetti sentään.... Ääääääh!1302333Näetkö feminismin uhkana
Vai mahdollisuutena kun deittailet naisia? Mitä miehet mieltä feminismistä?1871109Tykkäätkö halaamisesta?
Minä en. Tänään tuttava, jolle olen maininnut että en pidä halaamisesta, yritti halata minua ja olen vieläkin ihan raivo101988Hinduilu on suurta eksytystä
tekosyvällinen tarina uppoaa moneen. Harhautusta todellisen Jumalan yhteydestä. Kuka haluaisi nähdä sielunvaelluksessa387914Malmin tapaus on järkyttävä
Kolme ulkomaalaistaustaista miestä raiskasi nuoren tytön tavalla, jota ei meinaa uskoa todeksi. Mikä voisi olla oikeampi291827- 53821
- 63814
- 46799
- 84773
- 51723