הפונקציה SYD

החזרת כפול המציין את פחת הספרות של סכום השנים של נכס עבור תקופה שצוינה.

תחביר

סיד ( עלות, הצלה, חיים, נקודה )

תחביר הפונקציה של סיד מכיל את הארגומנטים הבאים:

ארגומנט

תיאור

עלות

נדרש. כפול המציין את העלות הראשונית של הנכס.

salvage

נדרש. כפול המציין את ערך הנכס בסוף החיים השימושיים שלו.

חיים

נדרש. כפול המציין את האורך של החיים השימושיים של הנכס.

תקופת

נדרש. כפול המציין את התקופה שאליה מחושב פחת הרכוש.

הערות

יש לבטא את הארגומנטים life ו- period באותן יחידות. לדוגמה, אם החיים ניתנים בחודשים, יש להעניק את התקופה גם בחודשים. כל הארגומנטים חייבים להיות מספרים חיוביים.

דוגמאות של שאילתה

ביטוי

תוצאות

בחר סיד ([LoanAmount], [LoanAmount] *. 1, 20, 2) כExpr1 מ-FinancialSample;

מחשבת את הפחת של נכס המוערך כ-"LoanAmount", עם ערך הצלה של 10% ("LoanAmount" מוכפלת על-ידי 0.1), בהתחשב באורך החיים השימושי של הנכס להיות 20 שנים. הפחת מחושב עבור השנה השניה.

בחר סיד ([LoanAmount], 0, 20, 3) כSLDepreciation מ-FinancialSample;

הפונקציה מחזירה את הפחת של נכס המוערך כ-"LoanAmount", עם ערך הצלה של $0, בהתחשב באורך החיים השימושי של הנכס להיות 20 שנים. התוצאות מוצגות בעמודה SLDepreciation. הפחת מחושב עבור השנה השלישית.

דוגמה של VBA

הערה: הדוגמאות הבאות מדגימות את השימוש של פונקציה זו במודול Visual Basic for Applications‏ (VBA). לקבלת מידע נוסף אודות עבודה עם VBA, בחר הפניית מפתח ברשימה הנפתחת שליד חיפוש והזן מונח אחד או יותר בתיבת החיפוש.

דוגמה זו משתמשת בפונקציה סיד כדי להחזיר את הפחת של נכס עבור תקופה שצוינה בהתאם לעלות הראשונית של הנכס (InitCost), ערך הניצולים בסוף החיים השימושיים של הנכס (SalvageVal) והחיים הכוללים של הנכס ב- שנים (LifeTime). התקופה בשנים שעבורן הפחת מחושב היא PDepr.

Dim Fmt, InitCost, SalvageVal, MonthLife, LifeTime, DepYear, PDepr
Const YEARMONTHS = 12 ' Number of months in a year.
Fmt = "###,##0.00" ' Define money format.
InitCost = InputBox("What's the initial cost of the asset?")
SalvageVal = InputBox("What's the asset's value at the end of its life?")
MonthLife = InputBox("What's the asset's useful life in months?")
Do While MonthLife < YEARMONTHS ' Ensure period is >= 1 year.
MsgBox "Asset life must be a year or more."
MonthLife = InputBox("What's the asset's useful life in months?")
Loop
LifeTime = MonthLife / YEARMONTHS ' Convert months to years.
If LifeTime <> Int(MonthLife / YEARMONTHS) Then
LifeTime = Int(LifeTime + 1) ' Round up to nearest year.
End If
DepYear = CInt(InputBox("For which year do you want depreciation?"))
Do While DepYear < 1 Or DepYear > LifeTime
MsgBox "You must enter at least 1 but not more than " & LifeTime
DepYear = CInt(InputBox("For what year do you want depreciation?"))
Loop
PDepr = SYD(InitCost, SalvageVal, LifeTime, DepYear)
MsgBox "The depreciation for year " & DepYear & " is " & Format(PDepr, Fmt) & "."

הערה:  דף זה תורגם באמצעות אוטומציה והוא עשוי לכלול שגיאות דקדוק או אי-דיוקים. מטרתנו היא כי תוכן זה יהיה שימושי עבורך. תוכל לספר לנו אם המידע היה מועיל? הנה המאמר באנגלית לעיונך.​

שפר את הכישורים שלך ב- Office
סייר בהדרכה
קבל תכונות חדשות לפני כולם
הצטרף למשתתפי Office Insider