اذهب الي المحتوي
أوفيسنا

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


زهرة122

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

السلام عليكم

يمكنك اضافة اكثر من كود

لاي جداول في الملف باستخدام مثل الكود ادناه

فقط يتم تغيير اسم الكود

والاعدادات للورقة والنطاق


Option Explicit

'======================================================

'======================================================

'  اسم ورقة البيانات

Private Const Sh1 As String = "ورقة1"

'------------------------------------------------------

'  نطاق صف رؤوس الاعمدة

Private Const Rn1 As String = "B7:O7"

'======================================================

'======================================================



Sub kh_Show_UFormChang()

On Error GoTo 1

With UFormChang

    .kh_SetAddrss Sh1, Rn1

    .Show

End With

1:

End Sub

مع ملاحظة انه ليس له علاقة بالتسلسل

اي لا يخل عمود التسلسل من ضمن البيانات

المرفق 2003

قاعدة بيانات المدرسين.rar

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

سلمت يداك استاذى العزيز عبدالله باقشير وبارك الله فيك

هل من الممكن ان يكون فى النموذج قوائم منسدلة مثلا

الحالة الاجتماعية

اعزب

متزوج

النوع

ذكر

انثى

وهكذا

تم تعديل بواسطه زهرة122
رابط هذا التعليق
شارك

السلام عليكم

سلمت يداك استاذى العزيز عبدالله باقشير وبارك الله فيك

هل من الممكن ان يكون فى النموذج قوائم منسدلة مثلا

الحالة الاجتماعية

اعزب

متزوج

النوع

ذكر

انثى

وهكذا

ممكن

لكن الموجود حاليا

الادخال يدويا عبر مربعات نص

الملف المرفق سابقا

ودمتم في حفظ الله

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

  • 6 months later...

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