نجوم المشاركات

السلام عليكم عملنا فورم تدخل الرقم في التاكست واضغط الزر لتنفيذ الكود Private Sub CommandButton1_Click() Dim sp Dim iNum As String Dim i As Integer For Each sp In Split(Me.TextBox1, ".") i = i + 1 iNum = iNum & Format(sp, IIf(i = 3, "0000", "000")) Next Me.Label1 = iNum End Sub تفضل المرفق 2003 NUM.rar

مرحباً ..... أتمنى ان تساعدوني باسرع وقت في كيفية عمل عد تنازلي في برنامج بور بوينت والقصد بهذا ليس عد تنازلي لاخفاء او تبديل الصورة او الكتابة باخرى ... بل اريد ان اعمل عد تنازلي ضاهر في البرنامج ولا اريد ادراج ملف (فيديو) يكون عداً تنازلياً .... مع كل الود والاحترام

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

بعد سلام الله عليكم جميعآ قبل أن اطرح سؤالى لابد من الشكر والتقدير لكل من يساهم من العلم فى هذا المنتدى الطيب النافع ورفع الله شأنكم وعلمكم (اللهم آمين) بصراحة تعبت من التفكير بين الدمج بين دالة IF ودالة أخرى تساهم فى رجوع المعادلة الحسابية ( IF ) بعد الضغط على زر السرد من القائمة واختيار الصفر لا يمكن الرجوع لأصل عمل الدالة وظهور الدالة مرة أخرى نظرآ لأن عند اختيار الصفر للأسف تسمح الدالة الحسابية ولا تظهر إلا بإختيار السرد من القائمة فى كل مرة . أمل الجواب بإذن الله

طلبك معقد حبتين المشكلة التي لديك تعتبر من افتراضيات جداول الاكسل تحذف تضيف تتغير المواقع سواء للاعمده او للصفوف سبق ان حاولت التحايل على هذه المشكله وهو اضافة سطر جديد للاجماليات عند الطباعه فقط وحذفه بعد الطباعه راجع الرابط التالي http://www.officena.net/ib/index.php?showtopic=44377&hl=hpagebreaks

علي ماأعلم لايوجد هذا الخيار بالإكسل ولكن ، يمكن التحايل علي ذلك بإلصاق صورة في التذييل (وهذا متاح) لكن الحيلة أن تكون الصورة هي السطر أو الأسطر المراد تكرارها

السادة الأكارم السلام عليكم ورحمة الله و بركاته ,,, لدي مشكلة في الاوتلوك 2007 و هي عدم ظهور مجلد العناصر المرسلة في ملف الارشيف مع العلم أن مجلد العناصر المرسلة له حجم ضمن تفاصيل حجم مجلد الارشيف و لكم الشكر

للذين يتخوفون من استخدام excel2007 وللذين تعودوا على قوائم excel2003 يمكنك العمل على excel2007 باستخدام القوائم المستخدمة في excel2003 مرفق ملف يحتوي على كود لاظهار القوائم وكود اخر لاخفاء هذه القوائم 2003.rar

للرفع

بسم الله الرحمن الرحيم الحمد لله الواحد القهار، العزيز الغفار،مكور الليل على النهار ، تذكرة لأولي القلوب والأبصار وتبصرة لذوي الألباب والاعتبار ، الذي أيقظ من خلقه من اصطفاه فزهدهم في هذه الدار، وشغلهم بمراقبته وإدامة الأفكار ، وملازمة الاتعاظ والادكار، ووفقهم للدؤوب في طاعته والتأهب لدار القرار، والحذر مما يسخطه ويوجب دار البوار، والمحافظة على ذلك مع تغاير الأحوال والأطوار. أحمده أبلغ حمد وأزكاه، وأشمله وأنماه. أما بعد: رأيت أن أقدم عملا خالصا لوجه الله الكريم لعل الله يتغمدنا برحمته ولذا رأيت أن أجمع الأكواد بطريقة منظمة تسهل للجميع الحصول عليها عند استخدام محرك البحث ، ولهذا ساقدم سلسلة من الأكواد كل كود بعنوان واضح يسهل الوصول له في موضوع مستقل وسأشرح كيفية استخدام الكود ماتيسر لي إن شاء الله وعلى الله قصد السبيل ****************************************** الكود الاول هذا كود يجعل صفحة الاكسيل عندما تكتب فيها تكتب باللغة العربيه دائما حتى ولو كانت لغة الكتابة في لوحة المفاتيح انجليزي طريقة الاستفادة من الكود افتح ملف اكسيل اضغط على الرز ALT وانت ضاغط على الزر اضغط على F11 الموجود أعلا لوحة المفاتيح ستظهر شاشة الماكرو اضغط على This Workbook ستجد Private Sub Workbook_Open() hosami "00000401", 1 End Sub انسخه والصقة في ملفك الجديد في نفس الموقع This Workbook ثم اضغط على موديول 1 سيتم فتح الموديول هذا Declare Function hosami Lib _ "user32" Alias "LoadKeyboardLayoutA" (ByVal A As String _ , ByVal B As Long) As Long انسخه وضعه في نفس المكان وهو موديول 1 في ملفك الجديد احفظ الملف واعد فتحه ولاحظ لغة الكتابه في لوحة المفاتيح ودمتم في حفظ الله تغيير لغة الكي بورد الى العربي.rar تغيير لغة الكي بورد الى العربي بطريقة اخرى.rar

يا ريت يا باشا تعمله على اكسل 2003 للأستفاده منه وجزاك الله خيرا لأنه فعلا من عنوانة برنامج شيق