Pakko jo kysyy helppii. Mikä tos oikeen tökkii, kun ei vaan onnistu.
Ilmottaa EPÄTOSI. Joten mitä pitää muuttaa, että näyttäs solun tyhjänä, sillon kun siihen tulee 0
Cells(vika 1, i 3).Formula = "=JOS(SUMMA(" & ColName & 14 & ":" & ColName & vika & ")" _
& "= 0; """";" & Cells(vika 1, i 3).Formula = "=SUMMA(" & ColName & 14 & ":" & ColName _
& vika & "))"
Nollat pois
nollaontyhjä
5
357
Vastaukset
- Tämmöinen
Soluun tuleva kaava ei varmaan ole toivomasi näköinen. En testannut, mutta kokeilepa jättää tämä pois:
" & Cells(vika 1, i 3).Formula = "= - nollapolla
Yksi vaihtoehto on käydä ottamassa lisäasetuksista täppä pois kohdasta "Näytä nolla soluissa, jotka sisältävät nolla-arvon". Sen jälkeen solu näytetään tyhjänä, jos sen arvo on nolla.
- Kundepuu
En tiedä miten toi täppä autta VBA koodiin korjaamiseen , jota kysyjä halusi ;-)
Noi kaavojen kirjoitusvirheet on itsellekin aika hankalia välillä löytää. Kun ei tietoja noista muuttujista niin toi nyt ainakin toimii nyt
Sub Testi()
vika = 20
'b-sarake jos numerolla
ColName = 2
'tai sitten jos ei ole numeroa, vaan kirjain
'ColName = "B"
'ColName = Range(ColName & 1).Column
Range("D3").Select
Cells(vika 1, i 3).Formula = "=JOS(SUMMA(R14C" & ColName & ":R" & vika & "C" & ColName & " )=0,"""",SUMMA(R14C" & ColName & ":R" & vika & "C" & ColName & " ))"
'solun kaavaksi tulee nyt
'=IF(SUM($B$14:$B$20 )=0;"";SUM($B$14:$B$20 ))
End Sub- nollapollanollapolla
Ei sinun tarvitse sitä tietääkkään, se on katos lyhyestä virsi kaunis ;-) ;-)
- nollapolla
Ei näköjään tyhjennäkään EPÄTOSI-arvon sisältäviä soluja. Oletuksena kuvittelin arvon rinnastettavan nollaan, mutta niin ei näköjään ole.
Ehdollista muotoiluakin voi käyttää. Eli jos solun arvo on EPÄTOSI, niin solun kirjasimen väri vaihdetaan samaksi kuin taustaväri.
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Järkyttävä tieto Purrasta
Purra tapasi nykyisen miehensä täällä. Suomi24:ssä! Tulipa likainen olo. Nyt loppuu tämä roikkuminen tällä palstalla.2415517Näin asia on
Tiedän ettei hän koskaan aio lähestyä minua eikä niin ole koskaan aikonutkaan, eikä lähesty ja enkä minä enää tee sitä k263930Taas varoitusta lumesta ja jäästä
Ai kauhea! Vakava säävaroitus Lumi-/jäävaroitus Varsinais-Suomi, Satakunta, Uusimaa, Kanta-Häme, Päijät-Häme, Pirkanmaa,182324Mikseivät toimittajat vaadi Orpoa vastuuseen lupauksistaan
Missä ne 100.000 uutta työpaikkaa muka ovat? Eivät yhtään missään. Näin sitä Suomessa voi puhua ja luvata mitä sattuu. E2852182Aavistan tai oikeastaan
tiedän, että olet hulluna minuun. Mutta ilman kommunikointia, tällaisenaan tilanne ja kaikki draama ovat mun näkökulmast481431Mistä erotat onko joku kiinnostunut vai muuten mukava?
Voi sekaantua yleiseen ystävällisyyteen vai voiko?1611279Poliisi tahtoo pääsyn 4 miljoonan suomalaisen sormenjälkiin.
https://www.is.fi/digitoday/art-2000011009633.html Tämä sormenjälkiin poliisin pääsy on erittäin tärkeä rikollisten kiin1321182Örebro kuolleet lisääntyy.
Nyt n, 10. Mitähän vielä. Haavoittuneet?. Kuka on ampuja, salaisuus.1261082- 36954
- 164846