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

كيف أحدد مكان أو موضع النموذج ؟


الشاعر

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

السلام عليكم ورحمة الله وبركاته

أخواني الكرام

 

عندي سؤال ، وقد بحثت عن إجابته قبل وضع هذا الموضوع ، ولكنني لم أجد الجواب .

 

ما هو الكود الذي من خلاله أقوم بتحديد موضع النموذج في الشاشة ؟

 

بارك الله فيكم أيها الأحبة

 

تقبلوا تحياتي

الشاعر

رابط هذا التعليق
شارك

السلام عليكم

اذا كان النموذج منفرد (من اعدادات النموذج يمكنك ان تضعه في الوسط  وليس في وسط الشاشه)

اما اذا كان النموذج مدمج ب نموذج اخر فانك تختار المكان المناسب له عند عمليه التصميم

 

ولو عززت سؤالك بمثال  لتسنى للاخوه الاجابه عليك بشكل عملي ولعلمنا ما تريد بالضبط

بالتوفيق

  • Like 1
رابط هذا التعليق
شارك

الله يعطيك ألف عافية حبيبنا

 

ما قصدت أن عندي نموذج منبثق ، وهو يتوسط الشاشة تلقائيا

أريد أن أضعه في مكان محدد

 

وجدت كود ولكن لم يخدمني

Private Sub UserForm_Initialize()
Me.StartUpPosition = 0
Me.Top = Application.Top + ((Application.Height - Me.Height) / 2)
Me.Left = Application.Left + ((Application.Width - Me.Width) / 2)
End Sub

 

 
هذا الكود يوسط النموذج المنبثق في وسط الشاشة
ما أريده أن أكتب قيمة محددة مثل :
يسار 1000
أعلى 500
بهذه الطريقة
 
بانتظار ردكم الكريم
تم تعديل بواسطه الشاعر
رابط هذا التعليق
شارك

السلام عليكم

شكرا للاخ الكريم ssm على الاجابة وجزاه الله خيرا

 

اخونا الشاعر  :

يمكن عمل ما تريد يدويا او بالاستعانة بالكود البرمجي

شريطة ان تكون خصيصة : توسيط تلقائي=لا

اما يدويا فكما ذكر اخونا ssm ففي عرض التصميم اسحب النموذج في المكان المحدد الذي تريد ان يظهر فيه ثم احفظ

اما الكود البرمجي فضع هذا السطر في حدث فتح النموذج

Me.Move Left:=3000, Top:=6000

وغير في الارقام حسب رغبتك

  • 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