Keskustelu: Ohjelmointikysymykset: VBA: Solun arvon päivittävä nappi

Moro.

Tein oman funktion ja pitäisi tehdä nappi, joka uudelleen suorittaa viidessä allekkaisessa solussa olevat funktiot. Koitin ActiveSheet.RefreshAll mutta ei pelittänyt. Osaako joku antaa viisaita neuvoja?

Moi jannejuhani!

Olettaisin, että olet tehnyt VBA-moduuliin funktion. Nyt jos muutat jonkin sellaisen solun arvoa, jonka arvo syötetään parametrinä funktiolle ja painat Enter nappia niin varmasti pelittää mikäli funktio itsessään on toimiva ja parametrit on annettu oikein. Muussa tapauksessa saat funktion sisältämään soluun palautteena aina joko arvon 0, #ARVO! tai ?NIMI#. Huomio myös että suomenkielisessä Excelissä parametrit erotetaan solussa puolipisteellä =FunktionNimi(A1;B1)

Mikäli olet kiinnostunut luomaan Excel addin palikan (.xla macro) ja sisällyttämään funktioisi niihin, jolloin ne on halutessasi käytössä aina niin esim. täältä löytyy hyvä esimerkki. Ja täältä löytyy kaikki mitä kuvitella saattaa.

Moi!

Funktio kyllä pelittää hyvin. Sen saa suoritettua tällä hetkellä aktivoimalla funktion sisältämän solun tekstin ja painamalla enter. Tarkoitus olisi tehdä käyttöliittymästä vähän viilatumpi ja saada aikaan ActiveX-nappi, joka tekee saman viidelle solulle peräkkäin. Jokainen solu pitäisi mielellään olla vuorollaan aktivoituna, jotta funtion koodi toimii oikein. Selvensikö yhtään?

Moi taas jannejuhani!

Joo kyllähän se nappulallakin onnistuu. Elikäs raahaa laskentataulukkoon nappula ja kirjoittele Click tapahtuman koodiksi:

Private Sub CommandButton1_Click()

    If Application.Calculation = xlCalculationManual Then
        Application.Calculation = xlCalculationAutomatic
        Application.Calculation = xlCalculationManual
    End If

End Sub

Joo siis ne parametriarvot kyllä muuttuu, mutta kaava ei pysy perässä. Siksi pitää nappi saada.

Kiitän!

Heippa taas!

Elikä jos sulla oli Excelin asetuksissa Laskenta manuaalilla niin tsekkaa uudelleen toi edellinen.