[حل شده] تعداد صفحات

[kazem1359]

سلام چطور میشه تعداد صفحات قابل پرینت یک شیت را در یک سلول از شیت اورد و قابل مشاهده باشه؟ ممنون

[M_ExceL]

سلام چطور میشه تعداد صفحات قابل پرینت یک شیت را در یک سلول از شیت اورد و قابل مشاهده باشه؟ ممنون

سلام، یکی از کد های زیر رو امتحان کنید :

Sub countPages()
MsgBox ActiveSheet.PageSetup.Pages.Count
End Sub


Sub countPages()
    MsgBox ExecuteExcel4Macro("GET.DOCUMENT(50)")
End Sub

یا حق.

[kazem1359]

ممنون عالی بود
ایا این امکان هست که در یک شیت که تعدادی ردیف داریم حالا می خواهیم هر 5 ردیف که دارای داده هست یک ردیف به حساب بیاد و عدد مورد نظر در یک سلول دیگه نمایش داده بشه مثلا اگر 15 ردیف دارای داده یا متن هست در یک سلول دیگه عدد 3 نمایش داده بشه و یا اگر مثلا تعداد ردیف ذارای داده بشه 17 تا عدد مورد نظر ما بشه 4 تا؟
ممنون میشم پاسخ دهید