ערכים במקום נעלמים

[אלוורדו]

שלום וחג שמח
מבקש דרך להפוך את הגורמים בנוסחה כלשהי לערכים.
לדוגמה A=B(C+D)*3
אם B=5, C=6, D=7
אז צריך לקבל : A=5(6+7)*3
(כמובן, כל האותיות מייצגות כתובת של תא)

7/2010

 

[ziv98]

כתובת של תא לא כוללת שורה ???
יש מספר קבוע של נעלמים בנוסחה ?
vba ? פונקציות ?

בפונקציות - נסה להשתמש ב - indirect

 

[אלוורדו]

1. כתבתי סתם נוסחה מתמטית (כמו שלמדנו פעם...). ברור שבאקסל יתווסף ציון השורה.
2. הנוסחה סתמית, היא איננה קבועה. זה יכול להיות A=B^2/2
3. indirect מצפה לכתובת..., אבל הוא רואה נוסחה שמורכבת/שמפנה למס' כתובות...
4. מצורף קובץ דוגמה (מצטער, אבל ההסבר הראשון שלי היה ממש גרוע/לא מובן)

 

[ziv98]

שחק עם העיקרון המוצג כאן:

Sub rplc_by_vals()

 Set rng = Range("B6")
 form = rng.Formula
        For Each rngPrecedent In rng.Precedents
            form = Replace(form, Replace(rngPrecedent.Address, "$", ""), Range(rngPrecedent.Address))
        Next rngPrecedent
        MsgBox form

End Sub

 

[אלוורדו]

פנומנלי
תודה מקרב לב