16. februar 2004 - 11:47Der er
7 kommentarer og 1 løsning
Udskrive hver anden side
Jeg vil gerne vide, om man kan udskrive hver anden side i et regneark, uden, man er nødt til at gøre det "manuelt".
Det er fordi jeg har en formel med sandt og falsk på f.eks. side 2, så jeg kan tjekke om min beregning er på side 1 er rigtig.
Måske kunne kan sætte denne formel et sted, hvor den ikke blev skrevet ud, men så man alligevel kunne se den, når man sad og indtastede de forskellige beløb.
Selvom det er lettere at sætte formelen anderledes, vil jeg stadigvæk gerne vide, om det kan lade sig gøre at udskrive hveranden side i "et hug".
Nu ved jeg jo ikke hvordan dit ark er struktureret, men hvis der er nogenlunde systematik i hvor du har lige henh. ulige sider, er det nemmeste nok at angive udskriftsområdet til de ønskede sider.
Du kunne bruge denne makro. Så kan du skrive de sider ind i inputboxen som du ønsker udskrevet ligesom i Word (1,3,5,7,9). husk komma imellem sidenumrene.
Sub UdskrivSider() Dim stSider As String Dim vSider As Variant Dim vSide As Variant
stSider = Application.InputBox("Hvilke sider (komma som seperator)", , , , , , , 2) vSider = Split(stSider, ",") For Each vSide In vSider ActiveWindow.SelectedSheets.PrintOut From:=vSide, To:=vSide, Copies:=1, Collate:=True Next End Sub
Det jeg snakker om er noget andet: Filer -> angiv udskriftsområde. Her markerer du de celler som skal skrives ud.
Som jeg forstår det har du nogle udregninger på de ulige sider som så kontrolleres på de lige sider. Det kan f.eks. laves sådan at de ulige sider er i de første x kolonner, de lige er i nogle andre kolonner og i så fald er det nemt at angive udskriftsområdet til de første x kolonner.
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
