حسونة حسين

هل هذا الاختيار لديك

وعليكم السلام ورحمه الله وبركاته عن طريق تجربه البرامج التي تصنع pdf لدي هذه هي النتائج Microsoft Print to pdf الطباعه عن طريق Microsoft Print to pdf لا يوجد بها تقطيع Adobe pdf.pdf الطباعه عن طريق Adobe pdf لا يوجد بها تقطيع ولكن تاتى ببعض الكلمات باللون الاسود dopdf.pdf الطباعه عن طريق Do pdf هي التى يوجد بها تقطيع

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

وجزاكم مثله استاذنا الغالى ابو يوسف جعل الله اعمال استاذنا الفاضل في ميزان حسناته يوم القيامه

وعليكم السلام ورحمة الله وبركاته هل تتذكر اي شيئ عن الرقم السري ارقام. ولا حروف ولا رموز ولا الكل معا هل تتذكر اي شيى ام لا. فيديو يوضح لك طريقه لمحاوله فتح الملف https://youtu.be/S-_O9H0Mm0c

وعليكم السلام ورحمة الله وبركاته الملف ليس به اي مشاكل اخى مهند المشكله عندك في اللغه العربيه الخاصه بجهازك

يمكنك الاستفادة من هذا الموضوع

وعليكم السلام ورحمة الله وبركاته كيف حالك اخى هانى علم علامه صح على unblock

وعليكم السلام ورحمة الله وبركاته عدل هذا السطر If ws.Cells(r, c + 1).Value2 >= myDate Then ليصبح هكذا If ws.Cells(r, c + 1).Value2 >= myDate and If ws.Cells(r, c + 1).Value2 <= CLng(DateSerial(2019, 1, 1)) Then

وعليكم السلام ورحمة الله وبركاته من هنا البدايه https://www.officena.net/ib/topic/37509-ساعه-رقمي-وتناظري

الحمد لله الذي بنعمته تتم الصالحات مبارك عودتك اخى الكريم

اخى واستاذنا الفاضل @Ali Mohamed Ali للرفع رفع الله قدركم

السلام عليكم ورحمة الله وبركاته الدخول يكون عن طريق الاميل استاذنا الفاضل @ابراهيم الحداد مفروض كده تم ارسال رساله لك على الميل سواء كان Gmail Yahoo Hotmail

اخى الفاضل @المشرفي لابد من اختيار نوع التحويل المطلوب ان كان من هجرى الى ميلادى او العكس لكي يظهر الايام والشهر والسنه عندما لا يتم اختيار نوع التحويل تظهر فارغه

السلام عليكم ورحمة الله وبركاته وبها نبدأ يمكنك الاستفادة من هذا الموضوع https://www.officena.net/ib/topic/82495-برنامج-جاهز-لتحويل-التاريخ-من-ميلادى-إلى-هجرى-والعكس/#comment-525026

وعليكم السلام ورحمة الله وبركاته بارك الله فيك استاذنا الغالى

الشكر لله اخى الحمد لله الذي بنعمته تتم الصالحات

السلام عليكم ورحمة الله وبركاته ممكن رابط لاي مجموعه بها روابط blob

وعليكم السلام ورحمة الله وبركاته ضع هذا الكود في زر دخول Application.Goto ThisWorkbook.Worksheets(TextBox1.Value).Range("A1")

وعليكم السلام ورحمه الله وبركاته اخي ابو علياء عاطف ..وقف الكود الموجود في Module21 قبل ان تبدأ بعمليه النسخ واللصق أبو عزيز بعد التعديل النهائي 2022.xlsb

وعليكم السلام ورحمه الله وبركاته استبدل الكود الخاص بك بهذا الكود Private Sub CommandButton1_Click() Dim Sh As Worksheet, LROW As Long Set Sh = ThisWorkbook.Worksheets("قاعدة بيانات") LROW = Sh.Range("I" & Rows.Count).End(xlUp).Row + 1 If WorksheetFunction.CountIfs(Sh.Range("I2:I" & LROW), TextBox1.Value) = 0 Then Sh.Range("I" & LROW).Value = TextBox1.Value Sh.Range("I" & LROW + 1).Value = TextBox1.Value TextBox1.Value = "" Else MsgBox "اسم الصنف مكرر" End If MsgBox ("يرجى ادخال البيانات كاملة بصورة صحيحة") End Sub

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

تفضل اخى حيث انك لا تحب القراءه والاطلاع هذه للاخوات https://www.officena.net/ib/applications/core/interface/file/attachment.php?id=66031

ارفق ملف ال pdf ..احاول لك فيه

@الخطاب اخى ما هى مشكله الاداه يوم ١١ / ٧ موافق الاثنين والتاريخ الموجود بالاسفل هو تاريخ ووقت جهازك وغير كده كمان الاداه مفتوحه المصدر samradapps_datepicker_220710.zip