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

كود تظليل الصف ذات الخلية النشطة - وربط كمية المنصرف والمتبقى بإسم الصنف


MrSeen
إذهب إلى أفضل إجابة Solved by Ali Mohamed Ali,

الردود الموصى بها

السلام عليكم

 

حاولت ابحث عن الكود لكن حصل اكود مختلفة عن المطلوب

 

1- فضلا احتاج كود جاهز عشان اعمل نسخ ولص للكود مع امكانية التعديل على الكود

بحيث اول ما اعمل كلك ع الخلية يتظلل السطر كامل من غير ما تتغير الوان الخلية نفسها ان وجد بها لون ( ملف رقم 1 ) 

 

2 - لدي قائمتين منصرف ومتبقي اريد فضلا عملية ربط برقم الصنف بحيث رتبط كمية المتبقي بجانب كمية المنصرف ( ملف 2 )

 

 

2.xlsx 1.xlsx

رابط هذا التعليق
شارك

  • أفضل إجابة

وعليكم السلام-اهلا بك في المنتدى 

تم عمل كود في الملف رقم 1 لتظليل الصف الذى به الخلية النشطة بدون الغاء لون الخلية القديمة ان وجدت

اما بالنسبة للملف الثانى تم انشاء صفحة أخرى بداخل الملف Report لعمل اللازم بالمعادلات

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
    Application.ScreenUpdating = False
       If Cells(1040000, 1) <> "" Then
        Rows(1040000).Copy
        Rows(Cells(1040000, 1).Value).PasteSpecial Paste:=xlPasteFormats
    End If
    Rows(Target.Row).Copy
    Rows(1040000).PasteSpecial Paste:=xlPasteFormats
    Cells(1040000, 1) = Target.Row
    With Target
              .EntireRow.Interior.ColorIndex = 8
    End With
    Application.CutCopyMode = False
    Application.ScreenUpdating = True
End Sub

 

1.xlsm

 

2.xlsx

  • Like 3
رابط هذا التعليق
شارك

بارك الله فيك وفي علمك

الله يسعدك في الدنيا والاخره

الملف الاول تمام 

بالنسبه للملف الثاني :

اضفت اصناف زياده في الصفحة الاولي

لاكن لم تنتقل لصفحة الريبورت

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

 

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information