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
116
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
Kalle Palander kertoi fantasioivansa siitä, kuinka Kiira Korpi naisi häntä sträppärillä ahteriin
Sai potkut Yleltä. https://yle.fi/a/74-201400003745378- 182319
- 1982181
- 1071516
- 841470
- 741032
Nyt mielipiteitä kehiin?
Niin ,onko arvon kuhmolaiset teidän mielestänne kaupungin hommissa turhia työpaikkoja/työntekijöitä? Mielipiteitä tu601023IS: Paljastus - Tästä syystä Marika jätti Diilin kesken -Tilittää: "Jäi vähän karvas maku, koska..."
Diilissä lähti yllättäen yksi kisaaja. Voi harmi, leikki loppui liian varhain… Diilissä Jaajo Linnonmaa etsii vetäjää Ka2979Martina miehensä kanssa Malediiveilla.
Miksi täällä puhutaan erosta? Lensivät Dubaista Malediiveilĺe.127908Ei lumous lopu koskaan
Kerran kun tietyt sielut yhdistyvät kunnolla, ei irti pääse koskaan. Vaikka kuinka etsit muista ihmisistä sitä jotain tu59796