حسونة حسين

اللهم اغفر له واعف عنه واكرم نزله ووسع مدخله واغسله بالماء والثلج والبرد ونقيه من الخطايا كما ينقى الثوب الابيض من الدنس اللهم ان كان محسنا فزد في احسانه وتجاوز عن سيئات اللهم آنس وحشته اللهم اجعل قبره روضة من رياض الجن اللهم ان عبدك الان بين يديك اللهم جازيه بالاحسان احسانا وبالسيئات عفوا ومغفرة ورضوانا اللهم ابدله دارا خيرا من داره واهلا خيرا من اهله اللهم اسكنه الفردوس الاعلى من الجنة

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

وعليكم السلام ورحمة الله وبركاته يمكنك ذلك عن طريق خاصيه EnterFieldBehavior تحتاج فقط إلى ضبطها على fmEnterFieldBehaviorSelectAll هذه هي القيمة الافتراضية لهذه الخاصية ، لذا لن تحتاج إلى فعل أي شيء ما لم تقم بتغيير قيمة الخاصية بمجرد الضغط على الزر tab في الكيبورد كما يمكنك الاستفادة من هذا الموضوع ويمكنك ايضا عن طريق هذا الكود Dim boolEnter As Boolean Private Sub TextBox1_Enter() boolEnter = True End Sub Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, _ ByVal X As Single, ByVal Y As Single) If boolEnter = True Then With TextBox1 .SelStart = 0 .SelLength = Len(.Text) End With boolEnter = False End If End Sub

السلام عليكم ورحمة الله وبركاته المشكله ليست في الملف المشكله في لغه الجهاز حل مشكله اللغه العربيه

وعليكم السلام ورحمة الله وبركاته اخي الكريم هلا ارفقت ملف ليفهم الاخوة مشكلتك عن قرب ويقدموا لك حلها ان شاء الله

اخى الكريم @احمد غانم ارفق ملف ليري الاخوة اين المشكله في جهازك ام في الملف

وعليكم السلام ورحمة الله وبركاته حل مشكله اللغه العربيه

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

وعليكم السلام ورحمة الله وبركاته جرب هذا التعديل Private Sub CommandButton9_Click() ActiveSheet.Range("A1:M29").ExportAsFixedFormat Type:=xlTypePDF,Filename:="D:\تقارير قسم الحركة\" & range("C6") & ".pdf"

وعليكم السلام ورحمة الله وبركاته يمكن ذلك عن طريق اتباع الخطوات التالية: حدد الخلية التي تريد إدراج ملفك فيها انقر فوق علامة التبويب "إدراج" انقر فوق "كائن" ضمن مجموعة "نص" حدد "إنشاء من ملف" تصفح ملفك حدد خانة الاختيار "عرض كرمز" إذا كنت تريد إدراج رمز يرتبط بالملفات انقر فوق "موافق" ويمكنك الاستفاده من هذا الرابط https://www.rowshare.com/blog/tips/how-to-insert-attachments-in-excel/

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

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

السلام عليكم ورحمة الله وبركاته تصميم جميل وفقك الله لما يحبه ويرضاه

بارك الله فيكم اخوانى واساتذتى جميعا وفقنا الله جميعا واياكم لما يحبه ويرضي

وعليكم السلام ورحمه الله وبركاته بارك الله فيك اخى AbuuAhmed بارك الله فيك اخى ابويوسف محمد حسن المحمد بارك الله فيك اخى المشرفي بارك الله فيك اخى ابراهيم الحداد بارك الله فيكم اخوانى واساتذتى جميعا واسأل الله تعالى أن يجعلنا جميعا في خدمة العلم النافع ، وأن يجعله بميزان حسناتنا جميعاً يوم القيامة آمين يارب العالمين

جزاكم الله خيرا استاذ علي على هذا التشريف جزاكم الله خيرا استاذ محمد على هذا التشريف اسأل الله العظيم رب العرش العظيم ان يوفقنا جميعا لما يحبه ويرضاه وان يعينني على هذه المهمه

وعليكم السلام ورحمه الله وبركاته كيف تقوم بالابدال اخي عبدالكبير

وعليكم السلام ورحمة الله وبركاته احفظ الملف بامتداد Xlsm او xlsb تقرير.xlsm

الف مليون مبروك

وعليكم السلام ورحمه الله وبركاته اخى @talal baghdadi ضع هذه المعادله في الخليه E14 واسحب لاسفل قدر ما تحتاج =Ameen|AcnBal!'AccCode=&INDIRECT("D" &ROW(),StartDate="1-1-2022",EndDate="30-10-2022",ShowUnPostedEnt="1"'

وعليكم السلام ورحمه الله وبركاته ارفق ملف اخى يري الاخوة ما هي المشكله ثم يعطوك حل مشكلتك ان شاء الله

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

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

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

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