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

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

ובבית כנסת חסידי כמעט כל הוצאות חודש תשרי הם עבור כלל האנ"שים מכל הארץ.

@H-C הנה פונקציה שעושה את זה באופן נפלא.

Sub SplitColumn()
Dim rng As Range
Dim InputRng As Range
Dim OutRng As Range
Dim xRow As Integer
Dim xCol As Integer
Dim xArr As Variant
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("טווח לחלוקה:", xTitleId, InputRng.Address, Type:=8)
xRow = Application.InputBox("שורות בעמודה:", xTitleId)
Set OutRng = Application.InputBox("בחר תא לעמודה ראשונה:", xTitleId, Type:=8)
Set InputRng = InputRng.Columns(1)
xCol = InputRng.Cells.Count / xRow
ReDim xArr(1 To xRow, 1 To xCol + 1)
For i = 0 To InputRng.Cells.Count - 1
    xValue = InputRng.Cells(i + 1)
    iRow = i Mod xRow
    iCol = VBA.Int(i / xRow)
    xArr(iRow + 1, iCol + 1) = xValue
Next
OutRng.Resize(UBound(xArr, 1), UBound(xArr, 2)).Value = xArr
End Sub

מקור והוראות כאן. (באנגלית)

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

@ארי כתב בקובץ PDF משובש בשמירה מVBA אקסס:

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

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

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

ואתה יכול לשלוט על הרשימה על מלא בשאילתה עם הערך קטגוריה.value

@מטעמים
אני חושב שאם תכתוב מה התוצאה שאתה רוצה לקבל מהלולאה/משתנה.
יהיה יותר קל לכוון אותך למקום נכון.

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

DoCmd.OpenForm "frmPayments", , , "[IDPayment] = " & Me.lstList.Column(0), , acDialog: Me.lstList.Requery

https://www.extendoffice.com/documents/excel/1966-excel-extract-unique-values-from-multiple-columns.html

https://www.statology.org/excel-find-unique-values-in-multiple-columns/

לא שמתי לב. צריך להשתמש גם עם פונקציה ISTEXT שיתעלם מהמספרים.
כאן יש את זה

אני מתנצל על הטעות שלי.
אחרי אישור הרבנים הגאונים גא"מ להנ"ל...

@dovid כתב באקסל | שליפת נתונים - ספירת איזכורים:

אז אינני מבין למה @מלא אמר שכן

באידיש אומרים 'א קושיה אויף א מעשה' (שאלה על סיפור...)

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

COUNTIFS נותן להכניס יותר מטווח אחד.

@laswater
מה הצורך שלך באחסון,

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

• כדי שיוכלו לעבוד כמה אנשים מרחוק, עושים שליטה מרחוק על מחשב-שרת אחד. וכולם מתחברים אליו.
• יש גם אפשרות להעביר את מסד הנתונים לשרת SQL ולחבר אליו את האקסס, אבל הוא עובד נורא לאט, וכלל לא מומלץ לעבוד ככה בעבודה שוטפת.

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

@דוד-החדש

לשאלה הראשונה

בתצוגת עיצוב של טופס המשנה, תכניס בכותרת התחתונה של הטופס תיבת טקסט ושם תעשה sum(סכום)
(על השדה 'סכום' או כל שם שדה שתתן, להיות במקור השאילתה, לא יכול להיות שדה מחושב בטופס)
תן שם לתיבת טקסט הזו לדוגמא 'סכוםסופי'
בטופס הראשי תפנה לפקד הזה ככה =טופסמשנה!סכוםסופי

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

@ArielIzer
שאילתת הוספה, מיועדת להוסיף רשומות חדשות, את הרשומות החדשות האלו אתה יכול לקחת ממקום מסויים, ואתה יכול גם לייצר אותם מ0.
בדוגמא שלך, אתה יכול לייצר שאילתת הוספה, שיוסיף נתונים לטבלת המלגות, וטבלת המקור שלו יהיה טבלת התלמידים, ובשדה 'סכום' תרשום את הסכום.

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

@spider
כמובן.

תנסה את זה:

dlookup("עמודהשם", "טבלה", "עמודהID=" &  Int((DMAX("עמודהID","טבלה")  - 1 + 1) * Rnd + 1))

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

https://www.techonthenet.com/access/functions/numeric/rnd.php

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

[TempVars]![Permissionlevel] = Me.cobUser.Column(1)

במקום Column(1) תכתוב את מספר העמודה ששם יהיה רמת הרשאה.

תוסיף משתנים אלו במודול כללי

Global CanDel As Boolean
Global CanEdit As Boolean

תוסיף מודול הזה לפרוייקט:

sub Permissionlevel ()
    Dim strPermissionlevel     As String
    
    strPermissionlevel = [TempVars]![Permissionlevel]

    If strPermissionlevel = "מנהל בכיר" Then
        CanEdit = True
        CanDel = True
    ElseIf strPermissionlevel = "מנהל" Then
        CanDel = True
        CanEdit = False
    Else
        CanDel = False
        CanEdit = False
    End If
End sub

ובאירוע בעת פתיחה של טופס, תוסיף את הקוד הזה.

    Call Permissionlevel
    Me.AllowEdits = CanEdit
    Me.AllowDeletions = CanDel

@benzi6789494
מחפש משהו חינמי?
אולי זה תוכנה שתעזור לך

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

@שמ18
משפחות בעלות 2 מילים, צריך לעבור ידני בכל צורה שיעשה את זה.

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

@בער
אולי זה יתאים לך.

בגליון 'משפטים' מגדירים את הטבלה מה תהיה התוצאה לכל מספר.

vlookup באקסל VBA.xlsm

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

@nachman
אתה מכיר את האפשרות של 'מיין וסנן' באקסל?

אם כן, האם זה לא עוזר לך?

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

@בערל
מצורף קובץ מיזוג לוורד
ש @clickone העלה כאן פעם

Word.accdb