Søg
Avatar billede svaage Nybegynder
20. maj 2004 - 13:56 Der er 12 kommentarer og
1 løsning

udskriv vælg printer

jeg har lavet en udskrivningsknap med følgende kode:

Sheets("udskriv").PrintOut

den virker fint, men udskriver pr automatik til standardprinteren.

Hvordan kan jeg få standard msg-boxen "udskriv" frem, som man normalt gøres ved at vælge Filer -> Udskriv, så brugerne har mulighed for selv at vælge printer????

Hilsen Sv@@ge
Avatar billede jkrons Professor
20. maj 2004 - 14:00 #1
Lav en sub med denne linie:

Application.Dialogs(xlDialogPrint).Show
Avatar billede svaage Nybegynder
20. maj 2004 - 14:03 #2
vil den så automatisk kun udskrive det ark "udskriv" som jeg ønsker
Avatar billede jkrons Professor
20. maj 2004 - 14:05 #3
Nej, så vil den åbne den dialogboks, du efterspurgte.
Avatar billede jkrons Professor
20. maj 2004 - 14:05 #4
Hvis den altid kun skal udskrive et bestemt ark, villejeg definere det som udskiftsområde.
Avatar billede halifax Nybegynder
20. maj 2004 - 14:09 #5
Der findes et lille gratis program, PrinterChanger, som fra et ikon i systray gør det muligt at skifte til en hvilken som helst installeret printer. Nemt og hurtigt. Var det noget - i stedet for selv at bøvle med koder i sine forskellige programmer?  :)
Avatar billede svaage Nybegynder
20. maj 2004 - 14:12 #6
kan det gøres på følgende måde:

Private Sub CommandButton2_Click()
Sheets("udskriv").Select
Application.Dialogs(xlDialogPrint).Show
Sheets("ark1").Select
End Sub

hvis det altid er arket " udskriv " jeg skal udskrive
Avatar billede jkrons Professor
20. maj 2004 - 14:14 #7
Ja, det vil virke udmærket.
Avatar billede svaage Nybegynder
20. maj 2004 - 14:16 #8
hej halifax tak for tippet men det er ikke aktuelt i denne situation, da brugerne skal tænke mindst muligt og helst holde sig inden for samme program

Hilsen Sv@@ge
Avatar billede svaage Nybegynder
20. maj 2004 - 14:17 #9
jkrons: det virker fint, tak for hjælpen, der er point på vej

Sv@@ge
Avatar billede jkrons Professor
20. maj 2004 - 14:17 #10
Velbekomme.
Avatar billede jkrons Professor
20. maj 2004 - 14:21 #11
Hvis du ændrer koden til

    Application.ScreenUpdating = False
    Sheets("udskriv").Select
    Application.Dialogs(xlDialogPrint).Show
    Sheets("ark2").Select
    Application.ScreenUpdating = True

vil brugeren ikke se, at der skiftes til udskrift før der udskrives og tilbage efter.
Avatar billede svaage Nybegynder
20. maj 2004 - 14:25 #12
tak for det sidste tip der virker fint
fortsat god helligdag

Sv@@ge
Avatar billede jkrons Professor
20. maj 2004 - 14:33 #13
I lige måde :-)
Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Excel kurser
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
Flytte fra et projekt til andet Af hkprofil i Excel 1 11/11/202612:17 11/11/202613:08
Slet tal, bevar de underliggende formler Af bbkdk i Excel 5 11/11/202609:23 I dag 13:07
Måned og år på graf Af mort1 i Excel 4 31/10/202613:01 01/11/202614:13
VB, Lægge 2 celler sammen og skrive den i cellen ved side af Af MC3390 i Excel 9 23/09/202618:11 24/09/202611:16
Ændre tal i en celle Af xvid i Excel 1 04/09/202616:05 04/09/202616:54
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 16:30 Wlan i windows 11 home Af dcedata1977 i Windows
11/1121:19 Irriterende ikon på proceslinjen Af ErikHg i Windows
11/1116:33 Kan man slippe af med "msn" ? Af Ikke-ekspert i Windows
11/1112:17 Flytte fra et projekt til andet Af hkprofil i Excel
11/1109:23 Slet tal, bevar de underliggende formler Af bbkdk i Excel
White papers
Flere white papers »