اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

ابا اسماعيل

03 عضو مميز
  • Posts

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

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

  • Days Won

    1

كل منشورات العضو ابا اسماعيل

  1. السلام عليكم و رحمة الله و بركاته أخى عمرو طلبة جزاكم الله خيرا كنت اعتقد الاشياء مستحيل في الاكسيل
  2. بارك الله فيك يااخي ياسر اناعاوزلما اعمل انتربلوحة المفاتح بيطلع لي الفوريم دون اللجوء الى الماوس 2015.1111.zip
  3. السلام عليكم و رحمة الله و بركاته أخى عمرو طلبة جزاكم الله خيرا انا لم اقصد اختصارات في لوحة المفاتيح انما اقصد العمل الذي تقوم بها الماوس داخل الفورم ان يتم بلوحة المفاتيح
  4. السلام عليكم ورحمة الله وبركاته استفسار هل من طريقة لاستخدام لوحة المفاتيح Keyboard فى ملف اكسل الاستغناء عن الماوس
  5. الكلمات تعجز عن شكرك اخي بارك الله فيك وجعله في ميزان حسناتك
  6. سلام الله عليكم اخي الكريم ارجو ان لا اكون قد اثقلت عليك توجد مشكلة عند تعديل سعر لم تتغير القيمة ولمازيد من شرح في المرفق 2015.111111.zip
  7. بارك الله فيك اخي الكريم وجزاك الله خير الجزاء وجعله في موازين اعمالك ان شاء الله
  8. السلام عليكم ورحمة الله اخي بارك الله فيك وجعله في ميزان حسناتك اريد الكمية في عمود F السعر في عمود H القيمة في عمود I
  9. طلب اريدتغير عمود الكميةمن G لى العمودF كتبت العداد في عمود F
  10. اخي إبراهيم ابوليله طلب اريد تعديل كود الكميةتكون في العمود F
  11. اش طلبي غير مفهوم ارجو الافادة جزاكم الله خير
  12. لسلام عليكم ورحمة الله وبركاته طلب تعديل كودالدى يقوم باستخراج القيمه الخاصه بكل صنف ثم استخراج اجمالى قيمة الفاتوره اريد الكميةتكون في العمود F وا سعر في عمود(h) القيمه عمود i Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells.Count > 11 Then Exit Sub If Target.Address = [i3].Address Then n = [i3] clear_data2 If WorksheetFunction.CountIf(Sheets("MAT").[C6:C10000], [i3]) <> 0 Then Dim message As Integer message = MsgBox("اضغط زر YES من اجل مشاهدة البيانات " & vbNewLine & "----------------------------" _ & vbNewLine & "او اضغط زر NO لالغاء الامر " & vbNewLine & "==========================================" _ & vbNewLine & "Click Yes to SHOW DATA" & vbNewLine & "----------------------------" _ & vbNewLine & "Click NO EXIT", vbYesNoCancel, "تعليمات-Login") '---------------------------------------------------------------------------------------------------------- If message = 6 Then call_inv_data1 '------------------------------------------------------------------- '--------------------------------------------------------------------- ElseIf message = 7 Then '------------------------------------------------------------------- '--------------------------------------------------------------------- ElseIf message = 8 Then Exit Sub End If ' MsgBox "هذه الفاتروره موجوده من قبل" ' ElseIf WorksheetFunction.CountIf(Sheets("MAT").[C6:C10000], [i3]) = 0 Then End If End If Application.ScreenUpdating = False On Error Resume Next If Not Intersect(Target, Range("g10:g49")) Is Nothing _ And IsNumeric(Target) Then Target.Offset(0, 2).Value = Target.Value * Target.Offset(0, 1).Value 'رقم 2 هنا يعنى العمود الذى سيظهر به ناتج الجمع يلى العمود المحدد بمقدار عمودين 'رقم 1 هنا ان العمود الذى سوف ياخذ منه البيانات لجمعها مع العمود المحدد يليه بمقدار عمود 1 End If If Not Intersect(Target, Range("h10:h49")) Is Nothing _ And IsNumeric(Target) Then Target.Offset(0, 1).Value = Target.Value * Target.Offset(0, -1).Value 'رقم 2 هنا يعنى العمود الذى سيظهر به ناتج الجمع يلى العمود المحدد بمقدار عمودين 'رقم 1 هنا ان العمود الذى سوف ياخذ منه البيانات لجمعها مع العمود المحدد يليه بمقدار عمود 1 End If End Sub Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Row > 9 And Target.Row < 50 Then 'If Not Intersect(Target, Range("d10:d49")) Is Nothing Then Cancel = True KH_T_SEARSH.Show 0 End If If Target.Address = [E10].Address Then Cancel = True KH_T_SEARSH.Show 0 End If End Sub Sub SumCells() Range("I53").Formula = "=+I51+I50-I52" End Sub Option Explicit 2015..rar
  13. لسلام عليكم ورحمة الله وبركاته طلب اخي إبراهيم ابوليله تعديل كودالدى يقوم باستخراج القيمه الخاصه بكل صنف ثم استخراج اجمالى قيمة الفاتوره اريد الكمية في العمود F وا القيمه في عمود(i) 2015..zip
  14. لسلام عليكم ورحمة الله ارجو من الأاخوة الكرام المساعدةتعديل كود الدالة SUM من عمود (G ) الى العمود F
  15. اخي عبد الله فاروق بارك الله فيك على الااهتمام جرب هد الملف من جديد http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=89744
  16. أين المعادلة في الكود لي يتم تغير العمود
  17. اخي ياسر روبامة يكون المشكل في office عندك عند يعمل 100/ 100
  18. شكرا لك اخي ياسر لي تنبيهي الملف كان محمي طالبي اريد عندما يتم اختيار صنف يتم كتبت الكمية في العمود F سعر في عمود H طرح في عمود i لقد تم رفع الملف من جديد عندما تما فك الحماية 2015..zip
  19. السلام عليكم ورحمة الله ارجو من الأاخوة الكرام المساعدة اريد تحويل معادلة الكمية من العمود (G ) الى العمود F 2015..zip
×
×
  • اضف...

Important Information