ناقل
-
Posts
666 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
6
نوع المحتوي
التقويم
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو ناقل
-
تقصد السنة فقط مثلا شخص عمره ٢٠ يظهر تاريج ميلاده مثلا 2000 صحيح
-
انا اكتب من الهاتف .. لكن حسب كلامك انت استخدمت الاستعلام للتصفية . صحيح وعرضت الكشف كيف تريد عند اغلاق النموذج ان يحتفظ الاستعلام بالبيانات .... لا تغلق النموذج وصدر مباشرة عنن طريق النموذج نفسه الخاص بالكشف ... اي ضع زر التصدير في نفس النموذج الذي عملت التصفية به ... لان الاستعلام ليس كالجدول لتخزين البيانات واذا توفر جهاز كمبيوتر اقوم بتحميل ملفك ... او احد الاخوة يقوم بذلك .. بارك الله فيك
-
ولكن في فرق في اسماء العناويين بين ملف الاكسس وملف الاكسل هناك فرق بين كود_الصنف و كود الصنف ارجو الرد ؟؟؟
-
وجزاك الله خير .... بالتوفيق
-
اضف هذه الاسطر في نهاية الكود السابق Call SendKeys("{right}", True) Call SendKeys("{right}", True) Call SendKeys("{right}", True) Call SendKeys("{right}", True)
-
دائما اخي الكريم ارفق مع سؤالك مثال مبسط لما تريد حتى يسهل وضع الحل المناسب ... بارك الله فيك
-
DoCmd.OpenReport "القيد", acPreview DoCmd.RunCommand acCmdZoom100 او استخدم هذا الكود ..... DoCmd.OpenReport "القيد", acPreview Reports(القيد).ZoomControl = 100
-
جرب ... Me.txtSender.Value
-
عدل بهذه الطريقة ربما تفيد ... sampleurl = "https://www.hisms.ws/api.php?send_sms&username=" & UserName & "&password=" & Password & "&numbers=" & numbers & "&sender=" & sender & "&msg=" & msg & ""
-
جرب هذا الكود ...... DoCmd.OpenReport "ReportName", acPreview DoCmd.RunCommand acCmdZoom100 240
-
ازل علامة افضل اجابة لانها تدل على انك حصلت على الاجابة فبتالي الزملاء والخبراء لن يزوروا موضوعك
-
ممكن توضيح اكثر أو مرفق لمثال مبسط لما تريد ؟؟؟؟
-
لقد قرأت مطلبك في السابق وهو ارسال الصور والملفات عن طريق الواتس انظر هذا الرابط لكيفية ارسال الصور والمرفقات عن طريق الواتس بواسطة الاكسل ..... ربما يفتح الله لك باستغلال هذه الطريقة
-
اخي فايز .... الاسماء في الجدول لديك نهايتها فيه فراغ فلذلك وقت البحث اكتبها ايضا بفراغ ....
-
.
-
تاكد من المرفق
-
ضع هذا الكود .... وجرب Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[10] = '" & Me.n & "'" If Not rs.EOF Then Me.Bookmark = rs.Bookmark
-
استخدمنا هذا الكود للفلترة .... Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[7] = '" & Me![n] & "'" If Not rs.EOF Then Me.Bookmark = rs.Bookmark F_____StuData.rar
-
اعتقد ممكن تسوى فلتر للنموذج ... بس ارفق مثال مبسط للتجربة
-
متابع بصمت
-
هذه طريقة اخرى ...... f_absent - نسخة.accdb
-
مساعدت في عمل استراد من اكسيل الى اكسيس بشرط الكمبوبوكس
ناقل replied to محمدعوض's topic in قسم الأكسيس Access
ارفق مثال مبسط لما تريد فعله -
الحقيقة لم افهم الية العمل ولكن جرب المرفق .... __f_absent .rar
-
استخدم في الاستعلام True
-
.
