Sheet6.Range("A1:v10").PrintPreview
دستور چاپ در vb
Collapse
X
-
با سلام من 2500 سطر اطلاعات فروش به مشتری در اکسل دارم که جمع و نتیجه تمامی در سطر آخر است یعنی سطر 2500 - در vbیک کامبو باکس دارم که وقتی از داخلش مشتری ر انتخاب می کنم تمامی اطلاعاتشو تو لیست باکس نشون میده حالا میخوام اطلاعات مشتری را چاپ بگیریم این دستور تو کمند باتون نوشتم - مشکل اینجاست که اون سطر آخر که جمع هست را نمیاره چیکار کنم عزیزان لطفا کمک کنید . متشکرم
Sheet6.Range("A1:v10").PrintPreviewبرچسب ها: هیچکدام -
سلام دوست عزیزبا سلام من 2500 سطر اطلاعات فروش به مشتری در اکسل دارم که جمع و نتیجه تمامی در سطر آخر است یعنی سطر 2500 - در vbیک کامبو باکس دارم که وقتی از داخلش مشتری ر انتخاب می کنم تمامی اطلاعاتشو تو لیست باکس نشون میده حالا میخوام اطلاعات مشتری را چاپ بگیریم این دستور تو کمند باتون نوشتم - مشکل اینجاست که اون سطر آخر که جمع هست را نمیاره چیکار کنم عزیزان لطفا کمک کنید . متشکرم
Sheet6.Range("A1:v10").PrintPreview
مسلما مشکل از رنجیه که دارید پریویو میگیرین ازش. اگه فایل رو آپلود کنید خیلی راحت میشه مشکل رو حل کرد[CENTER][COLOR=#696969][FONT=lucida console]... [B]Programming [/B]C# - VB.Net - VC++ - ASP.Net - HTML - CSS - JS - AS2 - AutoIt - Pascal - Delphi - PHP - Python - VBA - Etc
[/FONT][/COLOR][SIZE=2][FONT=lucida console][COLOR=#808080]... 2D & 3D [B]Graphic Designer[/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] 2D & 3D [B]Animator [/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Game [/B]Designer & [B]Hacker [/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] Data [B]Forensic [/B]Expert [/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Ethical [/B]Hacker [/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Pen[/B] Tester
[/COLOR][/FONT][/SIZE][COLOR=#ff0000][FONT=courier new][SIZE=4][B].: Expert in doing what nobody else can :.[/B][/SIZE][/FONT][/COLOR][/CENTER]



کامنت