بلال اليامين

يرجى الافادة

اخي طريقة التنسيق بين الصفحات وهذا عند ملء البيانات في الصفحة 1 يظهر اسمه في الصفحة2و3و4و5 لاكمال البيانات في الجميع الصفاحات

بارك الله فيك جزاك الله خيرا

السلام عليكم اريد فتح 8 نماذج في صفحة واحدة وهذا عند الضغط على الزر كل صفحة تظهر الصفحة قاعدة بيانات1.rar

كود لعدم اظهار الشريط المبين بالخط الاحمر في الصورة المرفق Nouvelle image bitmap.bmp

السلام عليكم اريد نقل الكود المرفق الى البرنامج اسمه Usrsekasr906 وادراجه في زر حفظ Desktop.rar

السلام عليكم زر مسح محتويات اربعة حقول في النموذج الفرعي

السلام عليكم لم اسطيع انجاز زر حدف ثلاثة حقول في النموذج الفرعي

تظهر لي هذه الكتابة التنسيق الذي تحاول اخراج الكائن الحالي به غير متوفر

يوجد خظا في الكود

السلام عليكم اساتذتى الكرام عيدكم مبارك اخي فتح التقرير في في البدياف DoCmd.OpenForm "ÇáÊÍæíá", acNormal, , "[ÇáÑãÒ ÇáæÙíÝí ááãæÙÝ]='" & Me.Text3 & "'" DoCmd.Close acForm, Me.name اخي التعديل على الكود لفتح التقرير لانه الان يفتح النموذج

السلام عليكم اساتذتى الكرام ارجو التكرم على مساعدتى في عمل زر فتح التقرير في PDF ولكم منى خالص تحياتى

بارك الله فيك جزاك الله خيرا

اخي هذا الحقل هو رقم الموظف يوجد موظفين لديهم خمسة ارقام وموظفين اربعة ارقام اخي وماذا لو منحتي كود وحدة نمطية عند ادخل الموظف 4 ارقام يضيف الصفر مباشرة

اخي وباجراء وحدة نمطية يظهر الضفر ام لا

اخي لم يظهر الصفر على اليسر انظر الحقل 09562 وعند دمجهم لم يظهر الصفر

لدي ستة حقول اريد دمجهم في حقل واحد 1 حقل متكون من رقمين 2حقل متكون من رقمين 3حقل متكون من خمسة ارقم 12360 4حقل متكون من ثلاثة ارقام 5حقل متكون من رقمين 6حقل متكون من رقمين اريد دمج الحقول باجراء وحدة نمطية و قمت بدمجهم في الاستعلام ولم يظهر الرقم صفر كما هومبين اعلاه ان الصفر على اليسر لم يظهر في الاستعلام مثل 10 98419016665000 قاعدة بيانات1.rar

كيفة الزام المستخدم بادخال رقم الموظف واسم المكتب واسم المنطقة و اسم الستخدم لفتح زر الطباعة قاعدة بيانات1.rar

طريقة انشىء زر الطباعة وهذا عند اختيار المنطقة و وادخال رقم المستخدم ودخال اسم المكتب قاعدة بيانات1.rar

اخي كيفية انشئ ازرار معاينة

انشاء شريط في النموذج الفرعي انظر الى المثال المرفق

تفضل اخي الكريم 401.rar

انشاء شريط في النموذج الفرعي انظر الى المثال المرفق 888مثال.rar

طريقة انشىء زر الطباعة وهذا عند اختيار المنطقة و وادخال رقم المستخدم طريقة انشى زر ادراج الصورة حسب المقياس الحدد باقل من 100 كيلوبايت

اخي وضع هذا كود لملء جميع الحقول Option Compare Database Dim ii As Byte Private Sub NoEmptyTexts() Dim ctl As Control For Each ctl In Me.Controls If ctl.ControlType = acTextBox Or ctl.ControlType = acComboBox Then If IsNull(ctl) Or ctl = "" Then ii = 1 MsgBox "تنبيه الرجاء ملء جميع الخانات اجباري" DoCmd.CancelEvent ctl.SetFocus Exit For Else ii = 2 End If End If Next ctl End Sub Private Sub Commande60_Click() Call NoEmptyTexts If ii = 1 Then Exit Sub DoCmd.CancelEvent Else Me.Refresh MsgBox " تمت عملية تعديل معلومات الموظف الرمز الوظيفي" & "" & Me.sname & "" & " " & "" & usr_, _ vbInformation, _ "تنبيه" End If DoCmd.GoToRecord , , acNewRec End Sub Private Sub Form_Open(Cancel As Integer)