תחומים - פורום חרדי מקצועי

שלום.

אני זקוק להוריד מדי שבוע רשימה שלמה של קבצים מסוימים ברשת.
חלקם בפורמט PDF
חלקם בפורמט CSV

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

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

תודה רבה לעונים!

@חנון-המרבה האמת שלא כ"כ הבנתי לאיזו בעיה עונה הפתרון שכתבת.
עשיתי כפי שכתב @mekev וזה ממש מצוין.

@yossiz אצלי בדיוק הפוך, ראה את הצילום הבא:

video-convert-1684702607045.webm

@mekev כתב בדרוש מידע | פונקציה באקסל שמחזירה רק את שם התיקיה בה נמצא הקובץ:

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

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

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

יפה. תודה לשניכם.
הנוסחה (ללא הפניה לתא אחר) היא:

=TRIM(RIGHT(SUBSTITUTE(LEFT(CELL("filename"),FIND("[",CELL("filename"))-2),"\",REPT(" ",50)),50))

שלום.
יש פונקציה באקסל המאפשרת להחזיר את שם הקובץ ואת נתיב הקובץ:

=CELL("filename")

התוצאה היא:

מצאתי נוסחה המשלבת שני פונקציות המחזירה בתא את נתיב הקובץ לבדו:

=LEFT(CELL("filename"),FIND("[",CELL("filename"))-2)

התוצאה היא:

אני מחפש דרך כלשהי שיהיה כתוב בתא רק את שם התיקיה המאחסנת את הקובץ. נוסחה שתהיה רלוונטית לכל מקרה של נתיב קובץ (גם אם התיקיה תהיה במיקום שונה לגמרי מאשר בתמונה המוצגת כאן):
רק מה שמסומן בצהוב:

(באמצעות פונקציה או באמצעות קוד מאקרו).

תודה רבה לעונים.

@amik יפה מאוד. תודה.

א. (רק כדי להיות בטוח במה שעשית) ההבדל בין הטבלאות ששמת הוא רק הרווח לאחר הפסיק. נכון?
ב. הפונקציה FILTER, יכולה להיות פעילה רק ב"טבלה"? או גם בטווח נתונים רגיל?

אני מחפש פתרון כיצד לקבל סיכום של הנתונים הבאים:
אלו הנתונים שיש לי בטבלה א:
נתונים עם שורות שחוזרות על עצמם ושורות שלא חוזרות על עצמם (ושורות שגם חוזרות על עצמם לפעמים 3 פעמים גם)

בטבלה אחרת אני מעוניין לקבל בכל שורה (לפי קוד זיהוי - מספר תלמיד) את כל הפירות שהוא קיבל ללא צורך בהקלדה ידנית של הנתונים:

(לשם ההבנה הקדלתי ידנית את התוצאה שאני רוצה להגיע אליה אצל תלמיד 557,
לפי הדרישה הפונקציה צריכה להחזיר לי בתא המקביל ל- 559 : "קלמנטינה, תפוח")

מצורף קובץ:

סיכום פירות.xlsx

@מעלה-ומוריד כתב בעזרה באקסל:

=VLOOKUP

אם יש לך גירסה של אופיס 365 (או 2021 ומעלה) כדאי שתכיר את XLOOKUP, יש הרבה מגבלות שהוא חוסך (בהוספת עמודות וכו')

@האדם-החושב כתב בפקודת מאקרו בוורד שפותחת תוכנה אחרת ויכולה לעשות פעולות בתוך התוכנה האחרת:

למאקרו שיחפש באוצר החכמה את הטקסט המועתק

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

Sub OpenKaluach3()

Shell "C:\Program Files (x86)\Kaluach3\Kaluach3.exe"

SendKeys "{DOWN}"
SendKeys "{DOWN}"
SendKeys "{DOWN}"
SendKeys "{DOWN}"


End Sub

יש תיעוד של מיקרוסופט כיצד לשלוח קיצורי מקלדת:
https://learn.microsoft.com/en-us/office/vba/language/reference/user-interface-help/sendkeys-statement

אל תהיה בטוח שזה יעזור לך.
אני ניסיתי סדרה ארוכה של פעולות כאלו במאקרו (באקסל), לפעמים הוא הצליח ולפעמים הוא פשוט דרס את עצמו מבחינת המהירות שהוא הריץ את הקוד.

(לדעתי [ואני ממש לא בטוח בזה] ההסבר הוא, שזה לא קוד אמיתי, בקוד אמיתי יש סדר פעולות ברור, לעולם התוכנה לא תריץ את שורה 3 לפני שורה 2, אבל כאן, התוכנה שולחת סדרה של קיצורי מקלדת ללא כל קשר לתוכן פעולתם)

למרות שנעזרתי רבות במאקרו שהבאת כאן לעיל, עדיין, בשביל קובץ בודד שחוברת העבודה שלו פתוחה חיפשתי פיתרון.

(כיוון שהנושא נפתח כאן אני משתף אותו למקרה ומאן דהו יחפש ג"כ תשובה לשאלה הפותחת של האשכול)

Sub Macro2()
 
' שמירה בשם, אותו שם, אותו נתיב קובץ, החלפת שם הסיומת, החלפת הפורמט

ActiveWorkbook.SaveAs Replace(ActiveWorkbook.Path & "\" & ActiveWorkbook.Name, ".csv", ".xlsx"), 51
   
End Sub

@dovid
עזרת לי מאוד מאוד. ישר כח!

@dovid כתב בעזרה קטנה בקוד מאקרו - אקסל:

אתה פותח קובץ קובץ ומפעיל את המאקרו הזה?

בדיוק. (זה חוסך לי המון לחיצות על כל קובץ על פני לחיצה אחת)

אם יש לך דרך אחרת לעשות את זה, אשמח לשמוע.

@dovid
מה שכתבתי לעיל, זה כל הקוד:

Sub s51()
'
' s51 מאקרו
'

'
    ActiveWorkbook.SaveAs , FileFormat:=51

End Sub

שלום.

יש לי המון קבצי אקסל (כ-280 קבצים) ששמורים בפורמט csv.
אני צריך להמיר את כולם לפורמט רגיל (xlsx.)

לעבור אחד אחד ולעשות "שמירה בשם" יקח לי כמה ימים.

אני מנסה ליצור פקודת מאקרו שתעשה את זה לבד:

ActiveWorkbook.SaveAs

• "שמירה בשם"

FileFormat:=51

• בחירת פורמט xlsx.

המאקרו עובד מעולה
הבעיה היא, שהוא שומר את הקובץ ב"המסמכים שלי" במקום באותה תיקיה של הקובץ.
כיוון שהקבצים מקוטלגים כל אחד בתיקיה אחרת, זה לא עוזר לי.

איך אני כותב קוד ששומר את הקובץ החדש בתיקיה הנוכחית שבה נמצא הקובץ הקודם?

אגב, כשאני מנסה לבצק "הקלטה" - זה גם לא טוב, כי הוא מקליט לי בעצם את הנתיב הנוכחי, ואני צריך שהמאקרו יהיה תואם לכל הקבצים שמצויים בנתיב תיקיה אחר.

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

באם רוצים להעביר כסף מחו"ל או לחו"ל, וכן בהעברות מיידיות, דרוש קוד זה"ב שניתן לקבל אותו באתר הבנק,
הקוד הוא בעצם 23 תווים שמורכבים מ-5 פרמטרים:

• המדינה - 2 אותיות (בישראל: ILׂ)
• 2 ספרות ביקורת
• 3 ספרות של קוד הבנק (לדוגמה 010 - בנק לאומי)
• 3 ספרות של מס' הסניף
• 13 ספרות של מס' החשבון (ככל ומס' החשבון קצר, אפשר להוסיף אפסים עד שזה מגיע ל-13)

האם מישהו יודע לפענח לפי איזו נוסחה נוצרות שתי הספרות הראשונות בקוד?
ניסיתי לחפור בכל אתרי הבנקים וכולם מגדירים את זה כ"ביקורת". מה זה אומר?
שאלתי חבר שיש לו חשבון באותו סניף איתי, ויש לו ספרות אחרות לגמרי.

אשמח למידע בנושא.

@OdedDvir כתב במוטות ברזל | איפה מזמינים?:

כל דופן היא לפחות 7-8 ס"מ ברוחב

תלוי מאוד איך התקינו את הדפנות, אם עובי הקרש הוא לכיוון הדופן, זה באמת יוצא 7-8 אם ההתקנה היא רגילה זה בערך 2.5 ס"מ.

@mekev כתב במוטות ברזל | איפה מזמינים?:

אולי במקום השרשרת
תשים ראצ'ט

רעיון מצוין.
לא צריך ראצ'ט ממש, אפשר גם חבל תריס. (הסוג העבה עולה עוד 1.5 ש"ח למטר והוא גם יותר חזק וגם יותר נעים למגע.)