Makron automaattinen suorittaminen työkirjan avaamisen yhteydessä

Haluat ehkä suorittaa tallentamasi makronautomaattisesti, kun avaat tietyn työkirjan. Seuraava toimintosarja näyttää esimerkin avulla, kuinka se toimii. Voit myös haluta, että makrot suoritetaan automaattisesti, kun Excel käynnistyy.

Varmista ennen aloittamista, että Kehitystyökalut-välilehti näkyy valintanauhassa. Jos sitä ei näy, toimi seuraavasti:

  1. Valitse Tiedosto > Asetukset > Muokkaa valintanauhaa.

  2. Valitse Muokkaa valintanauhaa -kohdassa Päävälilehdet-ruudussa Kehitystyökalut-ruutu.

  3. Valitse OK.

Jos haluat käyttää jäljempänä työkirjassasi olevaa esimerkkiä, luo jokaiselle kuukaudenpäivälle oma taulukko ja nimeä jokainen taulukonvalitsin vastaavasti. Nimeä ne esimerkiksi nimillä 1. maaliskuuta, 2. maaliskuuta ja niin edelleen 31. maaliskuuta asti. Makro suoritetaan automaattisesti, kun avaat työkirjan, jossa näkyy nykyisen kuukaudenpäivän välilehden.

  1. Valitse Kehitystyökalut > Visual Basic.

Kehitystyökalut-välilehden Koodi-ryhmä

  1. Valitse Lisää > Moduuli.

  2. Lisää moduuliin seuraava koodi:

    Private Sub Auto_Open()
    Dim vntToday As Variant
    vntToday = WorksheetFunction.Text(Date, "mmmm dd")
    On Error Resume Next
    Sheets(vntToday).Select
    If Err <> 0 Then
    MsgBox "Worksheet doesn't exist."
    Else
    Range("A1").Select
    End If
    End Sub

  3. Sulje Visual Basic (sinun ei tarvitse tallentaa mitään).

  4. Tallenna työkirja Excel-työkirjana (makrot käytössä) (*xlsm) ja sulje se.

Seuraavan kerran kun avaat työkirjan, nykyisen päivän välilehti on valittu ja kohdistin on solussa A1. Jos päivälle ei ole olemassa laskentataulukkoa, tulee näkyviin viesti Laskentataulukkoa ei ole.

Vihje: Voit luoda uuden työkirjan aina uuden kuukauden lähestyessä ja luoda makron uudelleen uudelle työkirjalle.

Kehitä taitojasi
Tutustu koulutusmateriaaliin
Saat uudet ominaisuudet ensimmäisten joukossa
Liity Office Insider -käyttäjiin

Oliko näistä tiedoista hyötyä?

Kiitos palautteesta!

Kiitos palautteestasi! Näyttää siltä, että Office-tukiedustajamme avusta voi olla sinulle hyötyä.

×