Miten saa tulostettua usean taulukon samaan aikaan ja vielä saman tulostusalueen tai tarkemmin sivun?
Esim. Minulla on vaikka 100 taulukkoa ja jokainen on lähes identtinen ja haluan tulostaa jokaisesta sivun 3.
Usean taulukon tulostaminen
3
457
Vastaukset
- pienemmällä määrällä
Jos ne taulukot olisi samassa työkirjassa (100 tuskin on), ryhmittelisin taulut, sivun reunaviivathan näkyy eli jos on kolmossivulla, valitsin siinä ryhmityksessä sen tulostettavan taulukon, tulosta-komennossa taas valitsin tulostettava sivu 3, valitut taulukot.
Mun koneella ainakin parilla samassa työkirjassa olevalla taulukolla toimii. - Excelisti
Tässä yksi mahdollisuus:
Sub TulostaSivut()
Dim Taulukko As Worksheet
Dim SivuNro As Variant
SivuNro = InputBox("Anna sivun numero ", "Tulostus")
If Not IsNumeric(SivuNro) Then
MsgBox "Väärin! Anna luku!", vbCritical, "Tulostus"
Exit Sub
End If
SivuNro = Int(SivuNro)
If SivuNro = 0 Then
MsgBox "Väärin! Nolla ei kelpaa!", vbCritical, "Tulostus"
Exit Sub
End If
For Each Taulukko In ActiveWorkbook.Worksheets
Taulukko.PrintOut From:=SivuNro, To:=SivuNro
Next Taulukko
End Sub- Eipä voi ku ihailla
Kiitokset tulevat myöhään, mutta toivottavasti tavoittavat.
Kiitokset, en olisi koskaan selvinnyt tuosta ilman apua. Tuo helpottaa ja nopeuttaa työtä ihan mielettömästi.
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Taisin tehdä virheen
Kaipaan sua enemmän kuin kuvittelin. Luulin, että helpottuisin, mutta olinkin täysin väärässä. Vieläkö vastaisit minulle1114957Hyvä että lähdit siitä
Ties mitä oisin keksinyt jos oisit jäänyt siihen, näit varmaan miten katoin sua.... 😘🤭😎💖493282Nyt tuntuu siltä, että on pakko päästä puhumaan kanssasi
Tuntuu että sekoan tämän kaiken takia. Miehelle853009- 811757
Nainen onko sulla supervoimmia ?
Voisitko auttaa miestä mäessä? Tarjota auttavan käden ja jeesata tätä miestä? Tai antaa olla et sä kuitenkaan auta.411520Näin kun katsoit salaa ja
Hymyilit sieltä kaukaa 😍☺️ mutta hämmennyin ja tilanne oli niin nopeaa ohi etten oikeen kerennyt mukaan 😢 säteilit ku191511450 000 ulosotossa
Suomessa on tällä hetkellä ennätysmäärä ihmisiä ulosotossa. Viime vuonna heitä oli yli puoli miljoonaa. Kuluvan vuoden1141388Eduskunnasta tippuneet kokoomuslaiset nostavat eniten sopeutumisrahaa. Kyllä veroeurot kelpaavat.
Sopeutumisraha on eduskuntatyön päättymisen jälkeen maksettava etuus, jonka tarkoituksena on tukea entisiä kansanedustaj1151073- 161069
Miehen taloudellinen tilanne ja
halu tarjota suojaa kaikin tavoin on usein perheen selkäranka. Siksi naisen ei ikinä pitäisi jättää huomiotta miehen rah431037