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.
Valintanappi ja tulostus
1
149
Vastaukset
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
Kalle Palander kertoi fantasioivansa siitä, kuinka Kiira Korpi naisi häntä sträppärillä ahteriin
Sai potkut Yleltä. https://yle.fi/a/74-20140000598974124h Kirppis
Olen muuttamassa paikkakunnalle ja mietin olisiko tälläiselle liikkeelle tarvetta alueella?92431Suomessa eletään liian pitkään
"Ihmisten on kuoltava" Asiantuntija varoittaa: Suomi ei ole valmis siihen, että niin moni elää pitkään: ”Kaiken täytyy2041710Kerotakaa joensuun kontiolahden paiholan laitoksesta jotain
Mun kaveri joutuu paiholan laitokseen nyt lähi aikoina niin voisko ihmiset kertoa minkälaista siellä on tarinoita jne ja221471- 71990
Sun ulkonäkö on
Kyllä viehättävä. Kauniit piirteet. Todella sievät. Ja olemus on ihana. Olet tehnyt vaikutuksen.41937Oletko koskaan
Tavannut/tuntenut ihmistä, jonka kanssa vuosisadan rakkaustarina olisi ollut mahdollinen, mutta joku este tuli väliin?74842Olen niin haaveillut
Sinusta. Ollut hullun rakastunut. Ajatellut kaikkea mitä yhdessä voisimme tehdä. Mutta ei ei yhtään mitään. Usko vaan lo57842En voi ottaa
Jos ikinä aiot ottaa yhteyttä, niin tee se nyt. On aika, kun todella todella tarvitsisin sinua. Naiselle.41792Tuo yksi tampio vielä ilmeisesti kuvittelee
Että joku itkee peräänsä täällä vinkuen jotain utopistista kadonnutta rakkauttaan kaksoisliekit silmissä leiskuen. Pyhä75714