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
181
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
- 561288
Pitkäaikaistyöttömyys Suomessa harvinaisen paha
Karut työttömyysluvut, korkein luku yli neljännesvuosisataan.1571232Mitä vastaisit
Jos kysyisin, että lähdettäisiinkö lenkille yhdessä? Vain sinä ja minä, kaksin? Miehelle601115Janni Tikkanen ohjattiin miesten pukuhuoneeseen
Vai olisko sittenkin Janne Tikkanen? Jos siellä jalkojen välissä on miesten killukkeet, mieshän tämä Janni on. Ja kuuluu541093Tiedän ettet tehnyt tahallasi pahaa
Asiat tapahtuivat, ristiriidat ovat meitä vahvempia. Olemmeko me niin vahvoja, että selviämme tästäkin vielä? Aika paljo1031087Rakastan 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ä56873Nyt 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ä56853Miten aiot saada kaivattusi?
1) loukuttamalla 2) kidnappaamalla 3) huijaamalla 4) jokin muu, mikä?54785- 32782
- 51777