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

@בערל אמר בהדפסת ד''וח מאקסס על בסיס קובץ וורד:

CStr זה שם הקובץ אקסס?

CStr = זו פונקציית המרת נתונים לטקסט ודומיו:
CInt
CSng
CDate
וכו'.

@פלורידה אמר באקסל | מחיקת שורות ריקות מטבלה:

השורות הריקות

אתה יכול לסנן (או למיין) את הריקות ופשוט למחוק

@nachman אמר בקובץ CSV ענק איך פותחים?:

@dovid גם באקסס אני לא מצליח 'אין די מספיק מקום בשטח איחסון'

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

@מלא אמר בבדיקה האם שיק נפרע מול טבלת תנועות בבנק:

אז רק אגיד את השאלה ב2 מילים

לא חושב שזאת השאלה.
כי אם זה הסתדרת יפה מאוד,

אלא. זאת השאלה...
@מלא אמר בבדיקה האם שיק נפרע מול טבלת תנועות בבנק:

דא עקא, לפעמים יש שיק שבבנק יש לו 2 שורות או יותר במקרים רחוקים יותר.
איך מתמודדים עם זה?

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

@מוטי-מן אמר בהמרה של תאריך עברי ללועזי באקסל:

א, זה לא משנה את הערך בשדה אלא רק את התצוגה.

תעתיק אחרי זה את כל העמודה,
ותדביק בעמודה חדשה "רק ערך"

@261040

@261040 אמר בהוסף בחירה נוכחית למסנן באקסל:

למה מיועד הוסף בחירה נוכחית למסנן ?

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

@מלאכת-מחשבת אמר בעזרה בהכנסת מרכאות במלל במאקרו:

אבל זה מופיע לי במאקרו כאילו יש מלל לאחר שהוא גמר...

ככה מופיע לך נורמלי?

Selection.TypeText Text:="לעי" & """" & "נ האשה החשובה... נלב" & """" & "ע ...."

בס"ד

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

@בערל אמר בפיצוח סיסמה של קובץ ZIP:

זה כמובן לא מספיק בכלל אבל בהחלט מקדם...

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

@a0533057932 אמר בעזרה | שגיאות בהפעלות קבצים מכונן חיצוני:

@ספר-יהלום תבדוק את הנושא של ההרשאות
ובעיקר בעלות על הקובץ

בתקייה הראשית תכנס למאפיינים.
< אבטחה
< מתקדם
< למעלה איפה שכתוב בעלים יש כיתוב כחול "שנה", - לחץ עליו.
< איפה שאתה יכול לכתוב תדביק את זה: Everyone
< לחץ אישור.
< תן לו הרשאות ותבדוק.

@שעטנ-ז-ג-ץ אמר בהאם הרשיונות שנמכרים באייבי באמת חוקיים:

מה שמחשיד הוא איך זה כזה זול

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

@odeddvir אמר באקסס- עיגול תאריך - עזרה:

פלט לדוגמא:
?NextPaymentDay(#15/4/2021#) 01/05/2021

אם כבר תביא דוגמא שתמחיש את מה שעשית (בדגש על הדוגמה ש @לומד-ומתלמד מצא - [למי שלא הבין: יש חסרון בדוגמא ההיא, כשהחשבונית היא בחודש ה12 - לפי הדוגמא ההיא התאריך שתקבל זה "01/01/2020"]).

?NextPaymentDay(#15/12/2021#)
01/01/2022

@יהודי-טוב
הכל עובד טוב.
נראה ממש יפה, הקרדיט ל @OdedDvir ?

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

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

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

Public Function GetGimatryya(str_ As Variant) As Long
        
    
    Dim i As Long
    Dim longht_ As Long
    Dim Y As Long
    Dim out As Long
    Dim str_to_out As String
    
    longht_ = Len(Nz(str_, ""))
    For i = 1 To longht_
        str_to_out = Mid(str_, i, 1)
        Select Case str_to_out
            Case "א", "ב", "ג", "ד", "ה", "ו", "ז", "ח", "ט", "י", "כ", "ל", "מ", "נ", "ס", "ע", "פ", "צ", "ק", "ר", "ש", "ת", "ך", "ם", "ן", "ף":
                Y = Asc(str_to_out) - 223
            Case Else
                Y = 0
        End Select
        arr_ = Array(0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 20, 20, 30, 40, 40, 50, 50, 60, 70, 80, 80, 90, 90, 100, 200, 300, 400)
        out = Nz(out, 0) + arr_(Y)
    Next i
    GetGimatryya = out
End Function

Public Function GetGimatryyaStr(str_ As Variant) As String
        
    
    Dim i As Long
    Dim longht_ As Long
    Dim Y As Long
    Dim out As String
    Dim str_to_out As Long
    
    longht_ = Len(Nz(str_, ""))
    arr_ = Array("", "א", "ב", "ג", "ד", "ה", "ו", "ז", "ח", "ט", "י", "י", "כ", "ל", "מ", "נ", "ס", "ע", "פ", "צ", "ק", "ק", "ר", "ש", "ת")
    
    For i = 1 To longht_
        Select Case (longht_ + 1) - i
            Case 1:
                str_to_out = CLng(IIf(Nz(Mid(str_, i, 1), "") = "", 0, Mid(str_, i, 1)))
                out = Nz(out, 0) + arr_(str_to_out)
            Case 2:
                str_to_out = CLng(IIf(Nz(Mid(str_, i, 1), "") = "", 0, Mid(str_, i, 1)))
                out = Nz(out, 0) + arr_(str_to_out + 10)
            Case Else
                str_to_out = CLng(IIf(Nz(Mid(str_, i, 1), "") = "", 0, Mid(str_, i, 1)))
                out = Nz(out, 0) + arr_(str_to_out + 20)
        End Select
    Next i
    GetGimatryyaStr = out
End Function

אפשר לנסות

Debug.Print GetGimatryya("רמח")
Debug.Print GetGimatryyaStr(499)

@בערל אמר באיך אני מחשב אחוזים באקסס בטבלא?:

@avi-rz אמר באיך אני מחשב אחוזים באקסס בטבלא?:

@בערל אמר באיך אני מחשב אחוזים באקסס בטבלא?:

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

עוד אפשרות:
הסכום שכבר נכנס לחלק לסכום היעד.

וכמובן להכפיל במאה בסוף...

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

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

למה לא לעשות זאת בפאוור פוינט?

בא נאמר שצריך חיבור לנתונים, יש לך מה להציע בפאוור פוינט?

יש תוכנת DataPoint שמחברת בין אקסס לפאוור פוינט
כאן

בתשלום מלא.

@mgm-ivr

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

תעשה את זה עם טיימר.

דוגמא.
החלפת מסך אוטמטי.accdb

@ivrtikshoret אמר באיך אני עושה שכל דקה יפתח טופס אחר|אקסס:

למה לא לעשות זאת בפאוור פוינט?

בא נאמר שצריך חיבור לנתונים, יש לך מה להציע בפאוור פוינט?

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

אפשר להגדיר בקריטוריונים של טבלה שערך ברירת מחדל יהיה: שווה לנתון שבפקד/שדה מסויים?

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

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

איך אני עושה שכשאלחץ לחיצה כפולה על אחד הפקדים, יוכנסו בו נתונים מטבלה מסויימת?
דהיינו, בטבלה "הגדרות" יש לי רק שדה אחד ובו רק תא אחד, - תיבה משולבת מסוג מספר שמציגה שנה נוכחית [מונה עמודות-2, רוחב עמודות 0;2].
אני רוצה שכשאלחץ פעמיים בתיבה "שנה" באחד הטפסים הוא יזין לי את הנתון שבתא ההוא. (התיבה גם היא תיבה משולבת עם מקור רשומה מאותו מקור של התא בטבלה).
מה הקוד לעשות את זה?

לא כ"כ הבנתי,
מה קורה בטבלה הגדרות?
ואיפה זה נמצא?

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

אפשר צילומי מסך?