و قم بتغيير CurrentProject.Path الى مكان المجلد الذى تريد فتحه مثل
Shell "explorer.exe" & " " & "C:\Program Files", vbNormalFocus
برنامج تصدير الطلاب للسجل الالكتروني حسب المادة معتمد (2).mdb
السلام عليكم ورحمة الله وبركاته
أريد فى هذا الالاستعلام
1 - عمود الاسبوع يحسب عدد الاسابيع التى قبل 1-9-2016 فقط
2 - عمود شهر يحسب عدد الاشهر بداية من شهر 1-9-2016
و المقصود بالتاريخ عمود date2
بحيث لا يتم التداخل بين الفترتين
وجزاكم الله خيراً
ضريبة.mdb
أستاذى @ابو عارف
اذا كان الخلية المراد نقلها
تنقسم الى اكتر من خلية مثل الصورة المرفقة
عند استخدام ="mobile-info"
يتنقل كلى البيانات بالخط الاحمر فى خلية واحدة
كيف يمكن نقل رقم الموبايل
<h1 itemprop="name">0123456</h1> فى خلية
السنة <h2>2020</h2> فى خلية
النوع <h2>Work</h2> فى خلية
و جزاك الله خيرا
ضع فى حدث عند التحميل
Me.Caption = "ضع النص "
و فى حدث عند الوقت
Me.Caption = Mid(Me.Caption, 2, _
(Len(Me.Caption) - 1)) & Left(Me.Caption, 1)
عند الفاصل الزمنى لعدد الوقت (100)
السلام عليكم ورحمة الله و بركاته
فى هذا النموذج بالضغط على حرف F يعرض فاتورة الكهرباء
أريد نقل القراءة الحالية فى اول فاتورة الى خلية الموبايل
وجزاكم الله خيرا
كهرباء.mdb
Dim frmCurrentForm As Form
Set frmCurrentForm = Screen.ActiveForm
MsgBox "Current form is " & frmCurrentForm.Name
يعطى اسم النموذج لا أعرف كيفية ظبط مع كود الاخفاء لعل أحد من أساتذتى يساعدك
Forms!FA1!m.Visible = False