@שלום-עולם-0 אתה מגיב בלי לקרוא היטב מה כתבו.
@משתמש-תמים כתב מתחיל הודעותיו פה שזה תלוי אם זה פרו או לא.

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

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

Sub Macro2() ' שמירה בשם, אותו שם, אותו נתיב קובץ, החלפת שם הסיומת, החלפת הפורמט ActiveWorkbook.SaveAs Replace(ActiveWorkbook.Path & "\" & ActiveWorkbook.Name, ".csv", ".xlsx"), 51 End Sub

תכלס, עשיתי עם ראר יצא ממש חמוד.
תודה לכולם.

מחקתי את השורה. השאלה עדיין תקפה

@Y-Excel-Access כתב בבאקסס-איפוס ID:

אי אפשר, הגדרת מספור אוטומטי חייבת להיות בשדה חדש, בשדה חדש זה יעבוד אך גם ימספר שוב את כל המזהים הקיימים...

צודק, לא זכרתי שזה כך.

@צדיק-תמים כתב בסייר קבצים מותאם אישית:

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

לא בשנים האלה...

@צדיק-תמים

@צדיק-תמים כתב בקוד לחילוץ עצמי לתוכנה שנבנתה באקסס:

שיעביר משם את הקבצים למקומות הנכונים,

לא ממש הבנתי מה אני צריך לקחת משם?

@ג-ינג-י @OdedDvir
אני משתמש עם הקוד הזה. בכל חיפושי הטפסים, נראה לי הרבה יותר קל.
בעת יציאה מתיבת החיפוש שכאן הוא txtFind הוא מבצע את החיפוש.
(אפשר להכניס אותו תוך כדי כתיבה ב'בעת שינוי', אבל בהרבה נתונים הוא ממש מאיט את העבודה)
והטופס משנה אצלי נקרא fsubForm
במקרה שאין טופס משנה, רק רוצים חיפוש בטופס הנוכחי, צריך להוריד את הfsubForm בכל המופעים

On Error GoTo err Dim ctl As Control Dim strFilter As String If Me.fsubForm.SourceObject = "" Then Exit Sub If Len(Me.txtFind.text) < 1 Then Me.fsubForm.Form.FilterOn = False Exit Sub Else End If For Each ctl In Me.fsubForm.Form.Controls 'Me.Controls If ctl.ControlType = acTextBox Or ctl.ControlType = acComboBox Then 'רק פקדי טקסט If Left(ctl.ControlSource, 1) <> "=" Then 'דלג על תיבות טקסט מחושבים strFilter = strFilter & "[" & ctl.ControlSource & "] Like " & Chr(34) & "*" & txtFind.text & "*" & Chr(34) & " OR " End If End If Next strFilter = Left(strFilter, Len(strFilter) - 4) Me.fsubForm.Form.Filter = strFilter Me.fsubForm.Form.FilterOn = True Exit Sub err: Me.fsubForm.Form.Filter = "" Me.fsubForm.Form.FilterOn = False

@קינג-קומפיוטר כתב בתכנת "סייפר" | משאבים:

יוטר
השאלה איזה מחשבים מחודשים אכן יש דפוקים ויש את מה שאני מספק עם 3 שנים אחריות מיבואן רשמי של HP

@מערכת
ביקשו לראות איך ה'טבלה' נראית. טבלה היא מקור נתונים לא פיווט.
אם אתה רוצה להיעזר, תן דוגמא של 2 הדברים,
1 הנתונים כפי שהם מופיעים.
2. איך אתה רוצה את התוצאה.
תוכל כמובן להשתמש עם נתוני דמה.

ואז ישמחו לעזור לך.

אגב עוד מעלה לתוכנה הנל שלא צריך להוריד את הקובץ כדי לערוך אפשר לערוך אותו על השרת

https://www.misim.gov.il/mm_tocna/startpage.aspx?cur=1

כלומר צריך להגיש בקשה בהחלט.
דבריך נכונים אם:

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

@laswater כתב בבאקסס-הרצה של נתונים מסוימים בדף הבית של התוכנה:

@avi-rz אבלאני מבין שוודאי אין אפשרות שכל הנתונים יגולגלו בעמוד הראשון.
כמו יוצרים אחרי סרט להבדיל!!!

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

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

עכ"פ שיהיה בצלחה.

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

עזר לי..

תודה רבה אין מילים..

@טוב-להודות כתב בייבוא שורות עם נתונים מגליון שיטס אחר עם תנאי:

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

הערה חשובה:
השימוש ב IMPORTRANG על הרבה תאים יכשל, זה מוגבל לכמה עשרות אלפי תאים בלבד. - לפעמים הוא יעבוד אך בהמשך אחרי כמה ימים יחזיר שגיאה פתאום.

לכן, במקרה וייתכן שבגליון המקור ייתווספו שורות ונתונים, ואי אפשר לדעת מראש, כדאי להשתמש ב A1:W100 במקום ב A:W, וכמו הדוגמה השניה שלך.

@yossiz כן!!!!!!!!!

זה כבר היה מזמן ב-Google Workspace שבתשלום המיועד עבור חברות.

החידוש הוא שמהיום זה לכולם.

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

=LET(MyValue,כאן תכתוב את הנוסחה שלך,IF(MyValue = 0,"",MyValue))

הערה חשובה: שים לב שפונקצית LET מופיעה רק בגירסאות האחרונות של אקסל, והיא כן מופיעה גם בGOOGLE SHEETS (זה חדש!).