Printer.PaperSize تعیین اندازه صفحه چاپ

[(سیدشریفی)]

با سلام
دوستان وقتی من از فرمان Printer.PaperSize استفاده میکنم و اندازه صفحه کاغذ چاپ را بزرگ انتخاب میکنم
وقتی خط فرمان به این دستور میرسد خطا رخ داده و متوقف میشود لطفا توضیح دهید چطور میتونم این کارو انجام دهم و صفحه چاپ بزرگی انتخاب نمایم نمونه کدی هم که نوشتم بصورت زیر میباشد

    CommonDialog1.CancelError = True

    On Error GoTo ErrHandler

    

    CommonDialog1.ShowPrinter

        

    Printer.PaperSize = vbPRPSUser '256

    

    Printer.Height = 100000

    Printer.Width = 100000

            

    Printer.DrawWidth = 6

    

    Printer.CurrentX = 100

    Printer.CurrentY = 100

    Printer.Print MyText

    

    Printer.EndDoc

    

ErrHandler:

    'User pressed the Cancel button

[محسن واژدی]

سلام علیکم
چه خطایی میده؟ (متن خطا)

[(سیدشریفی)]

خطای
run-time error 380
Invalid Property Value

[(سیدشریفی)]

کسی نتونست مشکل منو حل کنه