شمارش سوابق و وابستگان در اکسل

Question

از آنجایی که اکسل به شما امکان می‌دهد فرمول‌هایی ایجاد کنید که به سلول‌های دیگر اشاره می‌کنند، به این دلیل است که سلول‌ها می‌توانند به یکدیگر وابسته باشند. در واقع، اکسل دارای دو اصطلاح فنی است که برای تعریف رابطه بین سلول ها استفاده می شود: مقدمات و وابسته.

Precedent ها سلول هایی هستند که یک فرمول بر اساس آنها ساخته شده است. بنابراین، اگر سلول A5 دارای فرمول =A3 + A4 باشد، هر دو A3 و A4 مقدماتی برای سلول A5 هستند. وابستگان معکوس سوابق هستند. بنابراین، در این مثال، سلول A5 وابسته به سلول های A3 و A4 است. همانطور که در شماره های دیگر ExcelTips توضیح داده شده است، می توانید از ابزارهای حسابرسی در اکسل برای به تصویر کشیدن گرافیکی این روابط بین سلول ها استفاده کنید .

با این حال، اگر بخواهید بدانید چند وابستگی و سابقه در یک کاربرگ وجود دارد، چه؟ هیچ دستور Excel وجود ندارد که این اطلاعات را نمایش دهد. با این حال، می توانید از یک ماکرو برای محاسبه و نمایش این اطلاعات استفاده کنید. ماکرو زیر دقیقاً این کار را انجام می دهد:

Sub CountDependentsPrecedents()
    Dim ws As Worksheet
    Dim lDep As Long
    Dim lPre As Long

    On Error GoTo err
    For Each ws In Worksheets
        ws.Select
        lDep = 0
        lPre = 0
        lDep = Range("a1:xfd1048576").Dependents.Count
        lPre = Range("a1:xfd1048576").Precedents.Count
        MsgBox "Worksheet: " & ActiveSheet.Name & vbCr & _
          "Dependents: " & lDep & vbCr & _
          "Precedents: " & lPre
    Next ws
    Exit Sub
err:
    Resume Next
End Sub

هنگامی که این ماکرو را اجرا می کنید، از هر کاربرگ در کتاب کار شما عبور می کند و تعداد وابستگی ها و موارد پیشین در هر کدام را نشان می دهد.