עזרא בנוסחא

[of1964]

עזרא בנוסחא

מצ"ב הקובץ


**neuuv avuxr bfui' ,usv

 

[iyyi]

אפשר להוסיף מקרו אירוע לגיליון

להלן הקוד:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$B$1" Then Exit Sub
first = [MATCH(B1,C:C,)]
last = [IFERROR(MATCH("שם הסניף:",OFFSET(B1,MATCH(B1,C:C,),,9999),)+MATCH(B1,C:C,)-2,LOOKUP(9^9,A1:A9999,ROW(A1:A9999)))]
Rows("4:9999").Hidden = True
Rows(first & ":" & last).Hidden = False
End Sub

מצורף קובץ הדגמה

 

[of1964]

שלחתי קובץ לא נכון

 

[of1964]

מתנצל זה הקובץ

 

[iyyi]

אפשר כך

הוסף את השם Sheetnames עם הנוסחה:
=REPLACE(GET.WORKBOOK(1),1,FIND("]",GET.WORKBOOK(1)),"")

בתא Y22 כתוב את נוסחת המערך:
=-SUM(SUMIF(INDIRECT("'"&INDEX(Sheetnames,)&"'!"&"H9"),Y$3,INDIRECT("'"&INDEX(Sheetnames,)&"'!K"&ROW()+6)))

סיים ב-Ctrl+Shift+Enter וגרור למטה ושמאלה.
שים לב שהחיסרון של נוסחה זאת הוא שעמודה K בגיליון חוסרים צריכה להישאר ריקה.
שמור את הקובץ כסוג xlsm
מצורף קובץ הדגמה

 

[of1964]

היי, סליחה לא מובן!

אין אפשרות בנוסחא אחת?

 

[iyyi]

זה לא כל כך מסובך. עקוב אחר הפעולות הבאות

1. הקש על צירוף המקשים Ctrl+F3
2. בחלון שנפתח בחר ב: "חדש". בשדה השם כתוב: Sheetnames, בשדה מפנה אל: הדבק את הנוסחה מהתגובה הקודמת ואשר.
3. בתא Y4 הדבק את נוסחת המערך מהתגובה הקודמת. (לא לשכוח לסיים ב-Ctrl+Shift+Enter) ולגרור לשאר העמודות (חוץ מעמודה K)

אני לא מכיר דרך יותר פשוטה לעשות זאת.

 

[of1964]

תודה