hyperlink دریوزر فرم بین مولتی پیج ها

[حسینعلی]

سلام
یک یوزر فرم دارم با تعدادی مولتی پیج .. که میخوام کامنتی برای لینک به صفحات دیگه ، قراربدم ، تا دسترسی به اطلاعات صفحات دیگه با کلیدهای میانبر انجام بگیره، اساتیدبزرگ راهنمایی بفرمایند.،، چه کدی در ماکرو بنویسم؟؟

[امين اسماعيلي]

با درود
اگر منظورتون اینه که مولتی پیج های دیگه فعال بشن با کد انجام شده قبلا بگردین پیدا میشه

[حسینعلی]

منظورم این هستش که مثلا من در صفحه اول دارم کار میکنم نیاز دارم مستقیم با یک کلید میانبر برم صفحه 3 ویا حتی برم گزارشی را در صفحه5 کامنت 66 بزنم و به خواسته ام برسم ، که این کار بعنوان کلید میانبر ، بجز از طریق هایپرلینک مقدور نیست،البته میتونم ماکرو بنویسم ولی هایپرلینک بهتر و راحت تره
لطفا راهنمایی کنید

[امين اسماعيلي]

با درود

هی تنبلی در بیار

Private Sub UserForm_Initialize()
Dim i As Long
For i = 1 To Me.MultiPage1.Pages.Count - 1
Me.MultiPage1.Pages(i - 1).Accelerator = i
Next i
End Sub

این کد رو تو فرمت که مولتی پیج داره کپی کن
بعدش
فرم رو ران کن و با کلید ترکیب alt+1 پیج 1 و Alt+2 پیج دو الی اخر

[~M*E*H*D*I~]

با درود

هی تنبلی در بیار

Private Sub UserForm_Initialize()
Dim i As Long
For i = 1 To Me.MultiPage1.Pages.Count - 1
Me.MultiPage1.Pages(i - 1).Accelerator = i
Next i
End Sub

این کد رو تو فرمت که مولتی پیج داره کپی کن
بعدش
فرم رو ران کن و با کلید ترکیب alt+1 پیج 1 و Alt+2 پیج دو الی اخر

امین جان مطمئنی این کد کار میکنه؟

[امين اسماعيلي]

اقا کا رکه میکنه اما خوب شیت اخر هواسم نبود که -1 کونت رو نمیخواد
نموه فایل پیوست خدمت شما

[علی فاطمی]

منظورم این هستش که مثلا من در صفحه اول دارم کار میکنم نیاز دارم مستقیم با یک کلید میانبر برم صفحه 3 ویا حتی برم گزارشی را در صفحه5 کامنت 66 بزنم و به خواسته ام برسم ، که این کار بعنوان کلید میانبر ، بجز از طریق هایپرلینک مقدور نیست،البته میتونم ماکرو بنویسم ولی هایپرلینک بهتر و راحت تره
لطفا راهنمایی کنید

با سلام
ببین فایل پیوست کمکی بهت میکنه.

[امين اسماعيلي]

با درود علی جون اره اون که دکمه براش تعریف کنیم که حله اما اگر تعداد پیج یک مولتی پیج زیاد باشه که کدا زیاد میشن . بعد ایشون گفتن که میخوان کلید میانبری باشه . ولی دی کل ممنون بابات فایل

[علی فاطمی]

با درود علی جون اره اون که دکمه براش تعریف کنیم که حله اما اگر تعداد پیج یک مولتی پیج زیاد باشه که کدا زیاد میشن . بعد ایشون گفتن که میخوان کلید میانبری باشه . ولی دی کل ممنون بابات فایل

با سلام خدمت آقای اسماعیلی،
فایلی که پیوست شده با راهنمایی خود شما بود ما همچنان در حال درس پس دادم هستیم.

[حسینعلی]

باسلام،مثالی میزنم،فرض کنید توی فرم 1 هستیم وباکلید مثلا اف3 بره توی صفحه3 ومجددا بازدن کلید اف5 بره پیج5 و ادامه....

[امين اسماعيلي]

با درود
داداش - با کلید های ویندوزی یا کلید هایی که تو خود اکسل عمل میکنن بعید میدونم - مثال بالا مشکلتونو حل نمیکنه