تحديد عدد الصفوف حسب العدد المدخل في خلية محددة

[أبو عبدالإله]

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

 

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

 

قمت بتطبيق الكود لكن فشلت في تغيير رقم الخلية التي يدخل فيها الرقم

 

رقم الخلية في جدول الأستاذ يوسف عطا هي ( T1 )

 

والخلية في جدولي المطلوب وضع العدد فيها هي ( L 3 )

 

قمت بتغيير رقم الخلية في الكود ولكن لم يتغير شيء فالرقم لازال مرتبطا بالخلية رقم ( T1 )

 

أتمنى تعديل رقم الخلية في جدولي رعاكم الله

 

في المرفق جدول الأستاذ يوسف وجدولي 

 

 

تحديد عدد الصفوف.rar

 

 

 

[ياسر خليل أبو البراء]

جرب

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column <> 12 Then Exit Sub
    If Target.Row <> 3 Then Exit Sub
        Application.ScreenUpdating = False
            m = [L3]
            n = Range("A11").Row
            o = m + n
                For i = n To 30
                    If Cells(i, 1).Row <= o - 1 Then
                        Cells(i, 1).EntireRow.Hidden = False
                    Else
                        Cells(i, 1).EntireRow.Hidden = True
                    End If
                Next
        Application.ScreenUpdating = True
End Sub

[أبو عبدالإله]

أخي الحبيب ياسر 

 

هذا هو المطلوب 

 

أسأل الله اأن يحفظك ويرعاك ويكتب لك الخير حيثما كنت

 

سملت يداك يا مبدع