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

181

    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. Janni Tikkanen ohjattiin miesten pukuhuoneeseen

      Vai olisko sittenkin Janne Tikkanen? Jos siellä jalkojen välissä on miesten killukkeet, mieshän tämä Janni on. Ja kuuluu
      Kajaani
      74
      1710
    2. Olet nuorempi nainen aivan ihana

      Tykkään susta ihan valtavasti ❤️❤️
      Ikävä
      59
      1678
    3. Pitkäaikaistyöttömyys Suomessa harvinaisen paha

      Karut työttömyysluvut, korkein luku yli neljännesvuosisataan.
      Maailman menoa
      167
      1410
    4. Keskisarja loisti A-studiossa, vauhkoontunut Sofia Virta munasi itsensä

      Keskisarja taas puhui 100% faktaa maahanmuuttoon liittyen. Kokoomuksen Kaumalta tuli pari hyvää puheenvuoroa, joskin muu
      Maailman menoa
      310
      1358
    5. Mitä vastaisit

      Jos kysyisin, että lähdettäisiinkö lenkille yhdessä? Vain sinä ja minä, kaksin? Miehelle
      Ikävä
      67
      1270
    6. Tiedän ettet tehnyt tahallasi pahaa

      Asiat tapahtuivat, ristiriidat ovat meitä vahvempia. Olemmeko me niin vahvoja, että selviämme tästäkin vielä? Aika paljo
      Ikävä
      108
      1239
    7. Rakastan ja ikävöin sinua

      Ei helpota tämä ikävä millään. Pelkäsin että tämä ajanjakso tulee olemaan juuri näin vaikea. Siksi halusin ennen tätä pä
      Ikävä
      61
      1096
    8. Vihjeketju naisille

      Kirjoita tähän vihjeesi kaivatullesi.
      Ikävä
      60
      1089
    9. KIIKKUSTUOLI

      Aloitetaan taas uudella alustalla, nuo pitkiksi venyneet ovat hankalia etsiä uusia viestejä, joskus vastauksia tulee sin
      80 plus
      96
      1029
    10. Nyt tiistain galluppi alkaa....

      Kuka on sun elämän rakkaus? Ketä kaipaat edelleenkin? Nyt nimiä vaan rohkeesti tuohon alle.Tää on ikäväpalsta, eikä mikä
      Ikävä
      57
      980
    Aihe