اذهب الي المحتوي
أوفيسنا

حيدر جزائري

02 الأعضاء
  • Posts

    81
  • تاريخ الانضمام

  • تاريخ اخر زياره

السمعه بالموقع

0 Neutral

عن العضو حيدر جزائري

البيانات الشخصية

  • Gender (Ar)
    ذكر
  • Job Title
    موظف

اخر الزوار

991 زياره للملف الشخصي
  1. بارك الله فيك اخي أبو حنين وجزاك الله الف خير هذا هو المطلوب
  2. شكرا أي أبو حنين وجدت الاشكال كان في الدالة IF و SI بارك الله في هذا جزء من الحل باقي الترقيم لكل عملية و نقلها إلى الجدول الموجود في المصنف الثاني و نقل الرصيد الجديد إلى مبلغ العملية في كل عملية جديدة و بارك الله لك و في اولادك اخي أبو حنين
  3. شكرا أخي أبو حنين على المرور العملية لم تنجح حيث يصبح ناتح #NOM?
  4. السلام عليكم اعضاء منتدانا الغالي احاول ان اقوم بعمل في الاكسل خاص بالجمع و الطرح ولكن بشرط حيث ان العمليات التي اوقوم بها هي تكفل و التزام اي يوجد مبلغ مالي اقوم بالصرف منه و هذه العلمية تسمي الالتزام و اقوم بالإضافة إليه و تسمي هذه العملية تكفل حيث الرصيد القديم ناقص مبلغ العملية يساوي الرصيد الجديد و العكس بالنسبة للتكفل الرصيد القديم زائد مبلغ العملية اريد هذه العمليتين تحسب اليا اي عند تغيير في العملية التزام او تكفل تتغير الإشارة من زائد إلى ناقص و العكس صحيح و في كل عملية يصبح الرصيد الجديد اي حاصل العملية ينتقل إلى الرصيد القديم بعد ترحيل الى الجدول حيث تأخذ كل عملية رقم ترحيل كل الخلايا التي باللون الأحمر أرجوا انني أوصلت الفكرة وشكرا المثال في المرفق Classeur1.rar
  5. جزاك الله خيرا أخي طارق و جعلها في ميزان حسناتك ان شاء الله هذا هو المطلوب
  6. السلام عليكم أعضاء منتدي أوفيسنا عندي ملف به حوالة خاصة بالدفع مصاريف الفواتير حيث كل ما اعمل حوالة انسخ اخري و اعمل عليها حيث اصبح المصنف بطيء قمت بالبحث في منتدى أوفيسان عن مواضيع تخص الترحيل و لكن بدون جدوة لأنني لست خبير في أمور البرمجة على VBA و من خلال البحث في المنتدى وجدت أمثلة عن ترحيل خاصة بالصفوف فقط ليس الترحيل خلايا اريد من اعضاء منتدانا الغالي المساعدة من أجل عمل نموذج الحوالة واحد و أقوم باستدعاء الحوالات السابقة حيث اقوم بالتعديل أو الطباعة مرة أخرى اي قاعدة بيانات في مصنف أخر اريد نقل الخلايا الملونة باللون الأحمر إلى المصنف Info و كذا الاستدعاء من اجل التعديل دون العمل بالطريقة العادية و هي نسخ الحوالة و لصقها و جزاكم الله ألف خير Monda.rar
  7. السلام عليكم و رحمة الله و بركاته اخي ابو حنين انا اقوم بالعمل على برنامج محاسبة يعني حسب المعرفة التي اكتسبتها من المنتدي العريق عندما قمت بإنشاء فورة ترحيل و تعديل صادفتني بعض الصعوبات منها - إظهار الفاصلة بعد الصفر - تعديل - التفقيط خيث انني حملت ماكرو من منتدانا الكبير و لكن و جدت به بعض الصعوبات منها الرقمين بعد الفاصلة المطلوب هو : في الفورم به مجموعة من تاكس بوكس اريد عند الكتابة فيها مبالغ مالية تظهر الرقمين بعد الفاصلة كما اريد استدعاء العمليات و التعديل عليها كما ظهر عندي مشكل في التفقيط حيث لا يقوم بكتابة الرقمين بعد الصفر كما اريد تغيير الماكرو الاول بالماكرو الثاني في الملف المرفق مثال 123,50 يقوم كتابتها مائة و ثلاثة و عشرون دينار جزائري و خمسون سنتيم انا اريدها على هذا الشكل مائة و ثلاثة و عشرون دينار جزائري و 50 سنتيم الملف في المرفقات و جزاك الله خيرا و اعذرني على الاثقال عليك Ex.rar
  8. جزاك الله الف خير و بارك الله لك و في اولادك اخي أبو حنين و جعلها الله في ميزان حسناتك ان شاء الله
  9. السلام عليكم اخي ابو حنين عندي كود اريد اضافة له فورمة رقمين بعد الفاصلة هذا هو الكوود Public Sub lesplace() Dim c, t, tt plac.Clear With Feuil5.Range("a:a") Set c = .Find(prod, LookIn:=xlValues) If Not c Is Nothing Then t = c.Row Do If .Cells(c.Row, 1) = prod Then plac.AddItem .Cells(c.Row, 4) plac.List(plac.ListCount - 1, 1) = .Cells(c.Row, 3) plac.List(plac.ListCount - 1, 2) = c.Row End If Set c = .FindNext© Loop While Not c Is Nothing And c.Row <> t End If End With End Sub اريد وضع الفورمة في هذا السطر plac.AddItem .Cells(c.Row, 4) بهذا الفورم , "#,##0.00" وجزاك الله خيرا اخي ابو حنين
  10. و الله ماني عارف كيفاش نشكرك اخي أبو حنين جزاك الله و بارك الله فيك و في اولادك و ابنتك حنين هذا هو المطلوب
  11. السلام عليكم أعضاء المنتدي انا اقوم على انشاء برنامج محاسبي في الفور به تاكست بوكس و لبال عند تنفيذ امر يقوم بنقل الأعداد و لكن بعد الفاصلة يظهر اكثر من رقمين اريد شرح للكود الذي يقوم بتحديد عدد الأرقام وراء الفاصلة و شكرا مثال عن المطلوب مرفق 000000000000.rar
×
×
  • اضف...

Important Information