Kehäviittaus vaivaa

Anonyymi-ap

Taulukossa on ristiinlaskentaa kaavoissa josta seuraa kehäviittaus-virheilmoitus. Siitä pääsee eroon kun sallii iteratiivisen laskennan.
Tyhjällä taulukolla toimiikin homma hyvin, mutta jos paljon muuttelee laskentaa, jää joidenkin solujen kaavoihin jumiin aikaisempia lukemia.
Pitää nollata tilanne aina välillä avaamalla tyhjä talukko uudelleen. Jos kaavat nollaa poistamalla "=" merkin alusta, ja sitten palauttaa "=" merkin, se myös nollaa tilanteen.
Parempi olisi joku nollauspainike jota painamalla taulukon kaavat tyhjäytyisivät.
Voisi tietenkin nauhoittaa pitkän makron joka tekee tuon kaikkien kaavojen nollauksen ja aktivoinnin, vai onko parempikin tapa?

12

1017

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Anonyymi

      Kyllä makro joutaa tekemään pitemmänkin kaavan kautta.

      • Anonyymi

        Makrot on turvallisuusriski!


      • Anonyymi
        Anonyymi kirjoitti:

        Makrot on turvallisuusriski!

        En oikein ymmärrä tätä makrojen pelkoa. Kun tietää taulukon alkuperän turvalliseksi, ei makrojen käyttämisessä mitään vaaraa ole. Varman päälle pelaa silloin kun asettaa makrot sallituiksi vain varmojen taulukoiden käytön ajaksi, muutoin pitää makrot kiellettyinä.


      • Anonyymi
        Anonyymi kirjoitti:

        En oikein ymmärrä tätä makrojen pelkoa. Kun tietää taulukon alkuperän turvalliseksi, ei makrojen käyttämisessä mitään vaaraa ole. Varman päälle pelaa silloin kun asettaa makrot sallituiksi vain varmojen taulukoiden käytön ajaksi, muutoin pitää makrot kiellettyinä.

        Makrot saastuttaa koneen.


    • Anonyymi

      Messukeskuksessa Helsingissä 16. marraskuuta järjestetty Apotti-tukihenkilöiden koulutuspäivä on herättänyt runsaasti keskustelua ja huomiota. Aikaisemmin julkaistussa Helsingin Sanomien uutisessa tapahtumaan osallistunut lääkäri kritisoi tapahtuman muistuttaneen mainostilaisuutta.

      Hänen mukaansa osa paikalla olleista oli kuvaillut koulutusta ”herätyskokoukseksi”.

      Tilaa tästä Tivin maksuton uutiskirje – Kokoamme it-alan kiinnostavimmat puheenaiheet sähköpostiisi joka päivä.
      Myöhemmin julkisuuteen on ilmestynyt myös tapahtumassa esitetty Apotti-reggae, jota soitettiin tapahtumassa. Kappale levisi nopeasti sosiaalisessa mediassa. Myöhemmin se on saanut lukuisia mukaelmia sekä cover-versioita.

    • Anonyymi

      Tämä muuttaa kaavan heittomerkillä tekstiksi ja takaisin. Tekstiksi merkityt luvut pysyvät ennallaan.

      Sub painike()
          For Each s In ActiveSheet.UsedRange
              k = s.Formula
              If (s.PrefixCharacter <> "'" And Left(k, 1) = "=") Or Left(k, 1) <> "=" Then
                  k = "'" & k
              End If
              s.Formula = k
          Next s
      End Sub

      • Anonyymi

        On tämä ainakin lyhyempi kuin se nauhoitettu makro, mutta hitaampi kun näköjään käy kokotaulukon lävitse. Ja jättää niitä hipsuja kaikkiin sellaisiin soluihin joissa ei ole "=" merkkiä alussa. Kuten myös lukujen desimaalipilkku muuttuu pisteeksi.
        Saako tämän makron toimimaan vain annetulla alueella, ja tekisi palautuksen heti perään ettei tarvitse painiketta painaa kahteen kertaan?


      • Anonyymi
        Anonyymi kirjoitti:

        On tämä ainakin lyhyempi kuin se nauhoitettu makro, mutta hitaampi kun näköjään käy kokotaulukon lävitse. Ja jättää niitä hipsuja kaikkiin sellaisiin soluihin joissa ei ole "=" merkkiä alussa. Kuten myös lukujen desimaalipilkku muuttuu pisteeksi.
        Saako tämän makron toimimaan vain annetulla alueella, ja tekisi palautuksen heti perään ettei tarvitse painiketta painaa kahteen kertaan?

        Tämä vaikuttaa vain maalattuna olevaan alueeseen, eikä muuta desimaalipilkkuja:

        Sub painike()
            For Each s In Selection
                k = s.Formula
                If (s.PrefixCharacter <> "'" And Left(k, 1) = "=") Then
                    k = "'" & k
                Else
                    If WorksheetFunction.IsNumber(k) Then k = s.Value
                End If
                s.Formula = k
            Next s
        End Sub


      • Anonyymi
        Anonyymi kirjoitti:

        Tämä vaikuttaa vain maalattuna olevaan alueeseen, eikä muuta desimaalipilkkuja:

        Sub painike()
            For Each s In Selection
                k = s.Formula
                If (s.PrefixCharacter <> "'" And Left(k, 1) = "=") Then
                    k = "'" & k
                Else
                    If WorksheetFunction.IsNumber(k) Then k = s.Value
                End If
                s.Formula = k
            Next s
        End Sub

        Kun nyt edes toimisi jotenkin.


      • Anonyymi
        Anonyymi kirjoitti:

        Tämä vaikuttaa vain maalattuna olevaan alueeseen, eikä muuta desimaalipilkkuja:

        Sub painike()
            For Each s In Selection
                k = s.Formula
                If (s.PrefixCharacter <> "'" And Left(k, 1) = "=") Then
                    k = "'" & k
                Else
                    If WorksheetFunction.IsNumber(k) Then k = s.Value
                End If
                s.Formula = k
            Next s
        End Sub

        Nauhoitin sitten nollausnappiin makron joka maalaa kaava-alueen ja ajaa kaksi kertaa peräkkäin tuon "painike" makron.


    • Anonyymi

      "Voisi tietenkin nauhoittaa pitkän makron joka tekee tuon kaikkien kaavojen nollauksen ja aktivoinnin, vai onko parempikin tapa?"

      On reilusti parempi, ja sen tarjoaa taulukkolaskenta ohjelma itse. Valitun alueen osittainen tyhjennys hiirivalikosta valiten sopiva.

      Poista kaikki
      Poista teksti
      Poista päivämäärä ja kellonaika
      Poista huomautukset
      Poista objektit
      Poista numerot
      Poista kaava
      Poista muotoilu

    Ketjusta on poistettu 2 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Poliisitehtävä alkuviikosta Maisan kotona

      Iltasanomat: Helsingin poliisilaitos vahvistaa, että Vantaalla on ollut poliisitehtävä kyseisenä ajankohtana. Poliisin
      Kotimaiset julkkisjuorut
      104
      2739
    2. Tämä on sinulle vaikka kaikki lukee

      Vaikka kuinka olet viisas ja kaikin puolin velho, niin et tiedä tilanteestani. Senkin takia menetät mielenkiinnon. Eikä
      Tunteet
      12
      2302
    3. Porno tuhosi lopulta parisuhteemme

      Meille tuli 2 vuoden suhteessa ero. Pornon katselu oli viimeinen niitti suhteessamme!! Sekä jatkuvan huonon kohtelun ta
      Parisuhde
      10
      1563
    4. Ensitreffit Matti joutuu "ulkoruokintaan" - Väärinymmärrysten suossa Taina-vaimon kanssa: "Oli..."

      No nyt on kyllä väärinymmärrystä kerrakseen… Mitä luulet, pysyykö Taina ja Matti yhdessä vai onko tulevaisuudessa ero ed
      Ensitreffit alttarilla
      3
      1413
    5. Lulu selvityttää Elokapinan lakkautusta

      Persukannattajien mielistely otti Lulu Ranteella aika tavalla runtua, kun hän aikoo selvityttää mahdollisuuksia Elokapin
      Maailman menoa
      370
      1250
    6. T-mies tässä

      Kerro nainen huolesi niin pohditaan yhdessä. 😎
      Ikävä
      102
      1232
    7. Harmi, kun sillä nousi

      kaikki huomio päähän. Vaikutti aluksi niin mukavalta ja vaatimattomalta 😔
      Ikävä
      57
      1042
    8. Täytyy sanoa

      Että olit kyllä mielenkiintoisin ja omaperäisin nainen mitä olen koskaan tavannut. Aivan kuin joku olisi tiputtanut sinu
      Ikävä
      21
      939
    9. Miten saisin

      Hurmattua sinut uudelleen,? Pissin omiin muroihini ensinmäisellä kerralla koska olin tyhmä ja liiaksi kiinni menneess
      Ikävä
      31
      917
    10. IS Viikonloppu 5.-6.10.2024

      Luin Sanarisin foorumia. Tuli esille, että huomenna on Skytän ja Kärkkäisen kolmoskovis. Odotan virheetöntä ristikkoa ja
      Sanaristikot
      53
      908
    Aihe