Valintanappi ja tulostus

valintanappi

ELI taulukossa 1 on kaksivalinta nappia joista jompi kumpi on valittava. Valinnan tarkoituksena on määrittää mitä tulostetaan painonapin ja makron avulla.
Valintanapit antavat linkkisoluun arvon 1 tai 2 riippuen siitä kumpi on valittu. Miten saan yhditettyä tuon tiedon tulostuspainikkeen makroon?

Valinta 1 tulostaa taul1 ja valinta 2 tulostaa taul 1 sekä taul 2. Erillisinä TULOSTA painikkeina se olisi helppoa mutta millainen koodi tarvitaa jotta tulostus tapahtuisi vakinnan mukaan.

1

203

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • tietämättä mistä valikosta olet napit lisännyt tein nyt visual basic valikosta valintanapeille
      taulukot 1 ja 2 oletuksena samoin nappien nimet

      ThisWorkbook moduuliin...

      Private Sub Workbook_BeforePrint(Cancel As Boolean)
      On Error Resume Next
      Application.EnableEvents = False
      ActiveSheet.Select
      Select Case True
      Case Sheets("Taul1").OptionButton1
      Sheets("Taul1").Select
      Case Sheets("Taul1").OptionButton2
      Sheets("Taul1").Select False
      Sheets("Taul2").Select False
      End Select
      ActiveWindow.SelectedSheets.PrintOut Copies:=1
      Sheets("Taul1").Select
      Cancel = True
      Application.EnableEvents = True
      End Sub

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

    Luetuimmat keskustelut

    1. Muistatko kaivattusi

      Syntymäpäivän? Päivämäärä riittää. 🌹
      Ikävä
      149
      2169
    2. 121
      1465
    3. Atte Harjanne usuttaa eläkeläisvihaan

      Karmeeta kuultavaa aamun uutislähetyksessä, kun Atte Harjanne, tunnettu eläkeläisvihaaja, suitsii sukupolvien välistä v
      Maailman menoa
      336
      1260
    4. Postimerkki kirjeeseen ja kortiin maksaa jo 3 euroa!

      https://yle.fi/a/74-20229241 Kyllä tämä on järjetön hinta, Posti tuhoaa itsensä tällä hinnalla, täytyyhän Postin "Herro
      Maailman menoa
      140
      1190
    5. Keitä oli kunnanjohtajan erottajat?

      Kouluja ei ole varaa ylläpitää mutta johtajasopimukseen palaa 100000 euroa ja uuden johtajan hakuprosessi maksaa kymmeni
      Ilmajoki
      65
      1175
    6. IS: Väitöstutkimus - Pyöräilybuumi oli pelkkä kupla!

      Pyöräilybuumista paljastui karu totuus Väitöstutkimuksen mukaan suuri suomalainen pyöräilyrenessanssi olikin vain pelkk
      Maailman menoa
      3
      1171
    7. Miten pääsee ujon naisen pään sisään?

      Siis tosi tosi tosi ujon...
      Ikävä
      141
      1149
    8. Mulla on ikävä

      sua nainen ja niitä katseita ❤️ Lupaatko, että katseemme kohtaa taas?
      Ikävä
      49
      1099
    9. Mene perheinesi arkkiin - kasteelle !

      Juutalaiset oli hyvin lapsirakkaita, mitään ehkäisyä ei käytetty. Perheissä oli paljon lapsia. Viiden koko perheen kast
      Kaste
      470
      967
    10. Milloin bikineistä

      Tuli juhla tai esiintymis asu? Pikkasen harkintaa vois käyttää. Bikinit kuuluvat uimarannalle. No, mitä maailman tähdet
      Maailman menoa
      98
      965
    Aihe