Nollat pois

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 & "))"
5460
Äänestä

Muut lukivat myös

Vastaukset 5

Vanhimmat

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 = "=

Äänestä

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.

Äänestä

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

Äänestä
  • Ei sinun tarvitse sitä tietääkkään, se on katos lyhyestä virsi kaunis ;-) ;-)

    Äänestä

  • 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.

    Äänestä

Kommentoi aloitusta


nollaontyhjä kirjoitti:

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 & "))"

Anonyymi
5000

Ilmoita asiaton sisältö

  • Sisältää materiaalia, joka on loukkaavaa, herjaavaa, rasistista, uhkailevaa tai ahdistelevaa.

  • Materiaali sisältää nimiä, yhteystietoja tai muita henkilökohtaisia tietoja. Julkisuuden henkilöistä, julkisissa viroissa toimivista ihmisistä sekä yritysten vastuuhenkilöistä saa keskustella työhön liittyen. Myös yksityiselämään liittyvistä asioista voi keskustella siltä osin, kuin niistä on julkisesti kerrottu.

  • Sisältää lapsille haitallista tai heiltä kiellettyä materiaalia. Seksuaalinen sisältö on sallittua aiheeseen tarkoitetuilla palstoilla, joiden ikäraja on 18 vuotta.

  • Lainvastaista sisältöä voi olla mm. yksityiselämää loukkaavan tiedon levitys, kiihottaminen kansanryhmää vastaan, laiton uhkaaminen, alaikäisiin liittyvä seksuaalinen sisältö/grooming, petokset, identiteettivarkaudet, kunnianloukkaukset ja tekijänoikeusrikkomukset.

  • Sisältö ei liity palstan tai keskusteluketjun aiheeseen.

  • Viesti ei ole suomea tai ruotsia (pl. International Forums), se sisältää mainontaa, se sisältää tekijänoikeuksin suojattua materiaalia, se on massapostitus tai jokin muu syy.

Jaa keskustelu