اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر

السلام عليكم..

أخواني الأعزاء كيف يمكن التنقل بين الصفحات المتعددة MultiPage في الفورم

وذلك عن طرق الكود وليس الماوس

وشكراً لكم على اهتمامكم

قام بنشر (معدل)

السلام عليكم


Private Sub CommandButton1_Click()

Dim x As Long

On Error GoTo 1:

If Cells(1, 1) = 2 Then Cells(1, 1) = -1

Cells(1, 1) = Cells(1, 1) + 1

x = Cells(1, 1).Value

Me.MultiPage1.Value = x

1 End Sub

Private Sub UserForm_Initialize()

Cells(1, 1) = 0

End Sub


MltiPages.rar

تم تعديل بواسطه ابو اسامة العينبوسي
قام بنشر (معدل)

السلام عليكم ..

لك مني جزيل الشكر أستاذي وأخي العزيز أبو أسامة

إلا أنه لدي طلب آخر لو تكرمت كيف يمكنني إظهار نفس النص المكتوب في مربع النص

في إحدى الصفحات ليظهر في مربع النص في صفحة أخرى وذلك عند التنقل بين الصفحات

سواء كان التنقل عن طريق الزر أو عن طريق التنقل بالماوس

تقبل تحياتي ..

MltiPages.rar

تم تعديل بواسطه abuzzouz
  • Like 1

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information