Onkohan olemassa kaavaa, joka lisäisi rivin tai sarakkeen automaattisesti jos määrättyyn soluun tulee tietty arvo?
Vastaukset 4
- MattiJuh
Olisiko tähän kysymykseen kenelläkään vastausta, asia myös minulla ajankohtainen?
- Eevalena
Onko liian haasteellinne pähkinä? Minäkin yrittänyt opinnäytetyötni varten
ratkaisua etsiä, mutta ei ole löytynyt! Nimenomaan ko. solun alapuolelle t uo lisärvi pitäisi saada? Voiko kukaan ystävllisesti auttaa?
tosi haasteellinen ;-)
ko taulukon moduuliin...
tsekkaa nyt solua B5 ja sen arvoa 1, muuta solu ja arvot sopivaksi
koodissa hipsattuna myös rivin yläpuolelle lisäys sekä sarakkeiden lisäys vasemmalle ja oikealle.. Hipsuja muuttelemalla toimii siis joka suuntaan
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Virhe
Application.EnableEvents = False
If Not Intersect(Target, Range("B5")) Is Nothing Then
If Target = 1 Then
'lisää rivin yläpuolelle
' Target.EntireRow.Insert
' 'lisää rivin alapuolelle
Target.Offset(1).EntireRow.Insert
'lisää sarakkeen vasemmalle
' Target.EntireColumn.Insert
' 'lisää sarakkeen oikealle
' Target.EntireColumn.Offset(0, 1).Insert
End If
End If
Virhe:
Application.EnableEvents = True
End Sub
Keep EXCELing
@Kunde- 16+1
Tuolta löytyy koodinpätkiä, jolla lisätä uusi rivi solun arvon perusteella.
http://www.ozgrid.com/forum/showthread.php?t=21558
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Tässä ovat Elämäni biisi vieraat lauantai 19.9. - Yksi vieras on kohuttu TTK-juontajaehdokas
Elämäni biisi vieraslista on harvinaisen mielenkiintoinen lauantaina. Mukana myös kohuttu TTK-juontajaehdokas, josta ei91044Mies joka on oikeasti kiinnostunut
Ja näkee sut pitkäaikaisena kumppanina, siirtää vaikka vuoria selvittääkseen asiat eikä ota pienintäkään riskiä menettää125976- 109949
- 56945
Rauha, sopiiko
Ei häiritä enää toisiamme. Annetaan molemmille rauha unohtaa, pyydän tätä todella. Kiitos. Miehelle.85822Kunnanhallitus
Miten käy täällä vuosia tuomioita jakaneelle valittajalle, hovioikeus hylännyt kaikki syytteet.47802Miesten (epä)viehättävyydestä kysymys
Mieltä askarruttava asia, liki dilemma. Palstallahan jotkut miesoletetut usein toteavat, että kaikki naiset tavoittelev162749Ei siitä pääse yli, eikä ympäri!
Pakko se on myöntää ja tunnustaa. Olisin halunnut p*nna sinua sydämeni kyllyydestä. Itseäni vanhemmalle naiselle66721- 66697
- 58654
- 70596
- 22566
- 95561
- 52531
- 60524
- 26500
- 35497
Humppila korvasi johtajia tekoälyllä
https://yle.fi/a/74-20215155 Humppilassa on lakkautettu teknisen ja hallintojohtajan virat. Säästöä tuli hetkessä 15059472Myönnetään, tunnen lämpimiä tunteita kohtaasi
Vaikutat tosin liian hyvältä ollaksesi totta. Komeita miehiä on maailma pullollaan mutta sinussa on jotain.....31453Mnot, miksi sinulle on tärkeää solvata uskovia?
Onko sinulla joku katkeruus tai peräti viha heitä kohtaan? Kirjoituksesi nimittäin tihkuvat katkeruutta ja vihaa uskovi246418