Moi
Kuinkahan pystyy isoon taulukkoon automatisoida esim. 5:n tyhjän rivin lisäyksen arvon vaihtuessa. Eli esim:
Heinonen
Heinonen
Leinonen
Leinonen
Eli nimien väliin 5 tyhjää riviä, kuinkahan onnistuu?
Usean tyhjän rivin lisäys arvon vaihtuessa?
Tuskastunut_4
1
125
Vastaukset
moduuliin...
nyt lisää 5 riviä sarakkeen G nimien muuttuessa, muuta sopivaksi
Sub lisääRivit()
Range("G1").Select
Do Until ActiveCell = ""
If ActiveCell.Offset(1, 0) = "" Then Exit Sub
If ActiveCell = ActiveCell.Offset(1, 0) Then
ActiveCell.Offset(1, 0).Select
Else
Rows(ActiveCell.Row 1 & ":" & ActiveCell.Row 5).Insert
ActiveCell.Offset(6, 0).Select
End If
Loop
End Sub
Keep EXCELing
@Kunde
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Yritän tänään laittaa taajuudet kohdilleen
Jotta törmätään kirjaimellisesti. Ei tätä kestä enää perttikään. Olet rakas ❤️582119Onko kaivattusi
kyltymätön nainen, pystyisitkö olemaan hänelle loputon mies, vai meneekö toisinpäin.381803Vanhuksen varpaankynsien leikkaus 89 euroa...
Huh huh.......Parturikäynti olisi varmasti ollut 250 euroa? Kallis on suomi nykyään.1711410Viulu vaiennut
Eikö pisnikset suju ? Vai miksi pahin yrittäjä vouhka on "kadonnu" maan alle. 🤣211394Kyllä tekee kipeää
Luopua kaikesta mitä on elämässä saavuttanut😞 ei vaan ole enää yhtäkään hiljaista vuorokautta🤬211034Anne Kukkohovi. Myy likaisia alushousujaan.
Kuka ihme ostaa jonkun naisen likaisia alushousuja, menee lujaa kyllä tälläkin housujen myyjällä.69978Kauanko skuutteja on siedettävä? Ei tietoa liikennesäännöistä, ajellaan miten sattuu ja missä vain.
Kauanko on kestettävä sähköpotkulautojen terrorismismia? Niillä ajelevat eivät tiedä, tai jos tietävätkin, niin eivät vä77932En mä tiedä mitä tapahtuu
siis tykkäisitköhän musta oikeasti. Ehkä oot pelannu liikaa rahapelejä, ehkä rakastat tyhjiä arpoja.9862Nainen, sellaista tässä ajattelin
Minulla on olo, että täällä on edelleen joku, jolla on jotain käsiteltävää. Hän ei ole päässyt lähtemään vielä vaan jost130853- 70838