@chv אני לא חושב שאתה צריך להתנצל עד כדי כך. הכל בסדר. ואשרינו שה"בין-אדם-לחבירו" כאן ברמה גבוהה,
כן סיקרן (בלשון עבר) אותי מה הביקורת שלך לפוסט.
טוב שיש אנשים כמוך מביני עניין, שכשמישהו מדבר לא-לעניין, מעקמים ת'אף.
זה חלק מכללי הפורום לא להספים, טוב ששומרים פה על רמה גבוהה - (ע"ע "חזון ומטרה", / ב. נושאים והודעות, סעיף 6א.)
כי רק כך, הפורום ישאר בחלק המקצועי הטוב ביותר - לטובת כולנו.
צבי 10
-
שאלה| לולאה לפי Case, לשיכפול שורות -
שאלה| לולאה לפי Case, לשיכפול שורות@chv שמחתי לקרוא את התשובות
לא כתבתי שאלה בפורום כדי להיפגע, זה בסדר. אני מהמקום שלכם, רק מלראות איך הקוד הזה כתוב, הייתי... עד כאן הקדמה.
טעות של ספק-מתחיל, לדבר בשפת קודים, לקצר ככל הניתן, שה"מתכנתים המומחים" יבינו מהר.@dovid אמר בשאלה| לולאה לפי Case, לשיכפול שורות:
@צבי-10 לפי הודעותיך אתה מתאים לא רע לתכנות (אפילו קצת מידי, אנחנו לא מחשבים
(לא הבנתי מה כתוב בסוגריים.) אשמח לשמוע שאני לא מבין בתכנות. כולם ירויחו מזה. המתכנתים כסף, ואני לא אצטרך לשאול בפורום...
משתמשים עם Activate וSelect וActiveCell בלולאות במקום איך שכתבתי?
ראיתי באיזה מקום, שכשמשתמשים הרבה בהנ"ל זה מאט את הקוד.
אני עובר כעת על הקוד האלגנטי, תודה רבה! -
שאלה| לולאה לפי Case, לשיכפול שורות@OdedDvir תודה.
את הקובץ הזה אני מקבל במייל מ"קשר-קהילות"-דוח ציונים.csv
לאחמ"כ אני (מתכנן) מעתיק אותו למסד נתונים, יחד עם עוד מקורות נתונים, ומחיל את ההגרלה.
אני רוצה
להעתיק כל שורה עם פרטי התלמיד.
לגיליון חדש שלא ידרוס את שאר הנתונים.
כפול מספר הפעמים של תשובה נכונה.
לאחמ"כ חוזר לגיליון ומעתיק את התלמיד הבא על זה הדרך .
עריכה@OdedDvir אמר בשאלה| לולאה לפי Case, לשיכפול שורות:
- הבנתי! תודה.
- שמתי לב, והתעצלתי לחץ_לחצן1 ( משהו כזה זה במקור ,מעניין למה)
- מצורף קובץ לדוגמא.
-
שאלה| לולאה לפי Case, לשיכפול שורותאני מתחיל ב VBA אשמח אם תוכלו לעזור. תודה.
יש לי מבחן בקהילות CSV, עם 6 שאלות, הציון מתחלק ל-6
אני מעוניין שאם הציון במבחן
17- יעתיק *1
34- יעתיק *2
50- יעתיק *3
67- יעתיק *4
83- יעתיק *5
100- יעתיק *6
פעמים את השורה של פרטי התלמיד
לאחמ"כ ירד לשורה הבאה של פרטי התלמיד ויבדוק גם אותו,
עד שיגמור להכפיל את כל תלמיד, לפי מספר כרטיסי ההגרלה
17%=כרטיס 1.
מצורף הקוד:Sub ìçöï1_ìçõ() Dim SumZ As Integer Dim i As Integer Dim l As Long Range("E1").Select For l = 1 To 10 Select Case SumZ Case Is <= 17: ActiveCell.EntireRow.Select Selection.Copy Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Select ActiveSheet.Paste Case Is <= 34: Case Is <= 50: Case Is <= 67: Case Is <= 83: Case Is <= 100: End Select Next MsgBox "áåöò áäöìçä", vbInformation, "äåãòä" Debug.Print SumZ End Sub
-
החזרת ערך מתוך טופס פתוח@צבי-10 מצאתי בסוף את הפיתרון. תודה לכולם.
-
החזרת ערך מתוך טופס פתוחמפעיל קוד על טופס עם תיבה משולבת, ואני רוצה לדעת איזו טבלה המשתמש בחר מתוך רשימה, לפני שלחץ על כפתור "אישור" שמפעיל אירוע.
באירוע אני רוצה לדעת על מה להפעיל את האירוע, שזה משתנה לפי מה שהוא בחר בטופס.
איזה קוד צריך? -
שאלה | נתונים מימות לאקסל, דרך אקסס.@dovid =|הקדמה|=
קובץ להורדה תקשור עם מערכת טלפונית 4.0.accdb |הסבר מהמפתח כאן|
בקובץ זה
מודול - ApiYemot
אוסף מקוצר ונגיש של כל הקודים הישירים לתקשור עם שרת 'ימות'
ymtImportFileFromServer – ייבוא קובץ ymgr משרתי ימות המשיח.
הקוד מקבל קובץ משרתי ימות המשיח, מנתח אותו, ומייבא אותו לתוך טבלה מקומית באקסס
הקוד מתאים לכל סוג קובץ, אם זהLogRecordingAndEnteringData.ymgr
אוApprovalAll.ymgr
ואם זהapproval_number_log.ymgr
הטבלה שתקבל את הנתונים תהיה בנויה באותה צורה שבנוי הקובץ המקורי, אלא שהיא מחולקת לעמודות ברורות המייצגות את סוגי הערכים, ורשומות המציגים את הערכים
ארגומנטים נדרשים: מספר מערכת, סיסמה, כתובת הקובץ, שם הקובץ, שם טבלה לאחסון הקובץ
ארגומנטים אופציונלים: מצב טבלה קיימת, החל מרשומה, עד רשומה
דוגמא:ymtImportFileFromServer
"0771234567","1234","/Log","LogFolderEnterExit-2019-09.ymgr","נתוני האזנה",1,1,100
הקוד מייבא את קובץ LogFolderEnterExit-2019-09.ymgr מתיקיית הלוגים שבמערכת, אל תוך טבלה חדשה בשם 'נתוני האזנה', באם כבר קיימת טבלה בשם הזה, הוא ימחוק אותה, הקוד ייבא רק החל משורה 1 מקובץ ועד שורה 100
הערה: הקוד יוצר את הטבלה, אין צורך שהטבלה תהיה קיימת במערכת.
במקרה שהטבלה כבר קיימת ניתן לבחור באחד מ-3 האפשרויות, 1. מחיקת הטבלה הקיימת 2. הוספת מספר רץ לשם הטבלה, לדוגמא "נתוני האזנה1" וכן הלאה. 3. ייבוא לתוך הטבלה הקיימת.
נקודה נוספת,
הקוד משתמש בפונקצייתDownloadFile
המקבלת את פרטי הקובץ בימות ומחזירה אותו כטקסט, ולאחר מכן הקוד ממשיך וממיר את המחרוזת טקסט לטבלה
במקרה בו רוצים לקבל את תוכן הטקסט ללא המרה לטבלה באקסס (כגון לקבצים שאינם בסיומתymgr,
קובץini
למשל, אם רוצים 'לקרוא' הגדרות של שלוחה) אפשר לקרוא ישירות לפונקציהDownloadFile
והופנקציה תחזיר את תוכן הקובץ
הפונקציה דורשת: מספר מערכת, סיסמה, כתובת הקובץ ושם הקובץ
דוגמא:DownloadFile "0771234567","1234","/1","ext.ini"
עכ"ל.
יש חלק של טופס "הורדת נתונים" שם אני ממלא את הנתונים לפקודה של הורדת קובץ, ואז contact חיבור לימות המשיח והורדה, וכיון שזה קובץ ymgr, ממיר ל JSON ויוצר טבלה
השאלה היא איך אני מצליח לייבא את הנתונים לאקסס, באופן קבוע, עם נתיב קבוע, באירוע אחד. כלומר.
כתיבה מראש של כל סוגי הקבצים להורדה, ולולאת הורדות שמורידה את כל קבצי המידע, + תנאי על סיומת הקובץ ודילוג במקרה שהקובץ אינו ymgr. -
שאלה | נתונים מימות לאקסל, דרך אקסס.- האם חישוב נתונים מיובאים מאקסס, מאיץ את פעילות האקסל? (כרגע, דרך אקסל המחשב נתקע)?
- איך אני מחפש סיומת קובץ בVBA. התנאי אם סוג הקובץ = ini, דלג על המרה לJSON.
-
שאלה | נתונים מימות לאקסל, דרך אקסס.@dovid שאלתי כמה שאלות כדי לחסוך פוסטים. מה לגבי מהירות?
אם יש לך כח לעזור - אדרבה, נתחיל מהורדת הנתונים.
אם אתה מכיר את הקובץ תקשור עם מערכת טלפונית דרך אקסס של מימות. אז יש לנו כעת 2 סוגי קבצים. YMGR INIזה יכול להוריד רק קבצי
YMGR
[שבנויים עם מפתח וערך, וממיר אותם לגייסון ומכניס לטבלה], בקובץINI
אין # ו% אז הוא לא מצליח לפרק את זה בכלל.
ולאחמ"כ אני רוצה שבאירוע פתיחה הוא יעדכן את כל הקבצים בלולאה. ויחזיר את הערכים - כולל המעודכנים - לכל קובץ.וכעת הגענו לשלב החישוב והניתוח, של המידע.
-
שאלה | נתונים מימות לאקסל, דרך אקסס.@בערל נכון. אבל לא נעים לי להטריח את התלמידי חכמים כאן.
התוכנית בגדול (אני עובד לכתוב משהו יותר מפורט לעצמי, כי זה החלק הכי חשוב בתכנות)
אני רוצה שב-אירוע
יוריד כמה קבצים מתוך הקו,
aprovalall.ymgr
pointslog.ymgr
LogFolderEnterExit.ymgr
listAllInformation.ini
pointsLog
יעשה לי חישוב מי מהמאזינים משתתף בטריויה
מה ת.ז. שנמצא בקבלת נתונים - של מי שהשתתף בטריויה.
חישוב על האזנה: לפי תאריך, טלפון, שלוחה.
ועוד. -
שאלה | נתונים מימות לאקסל, דרך אקסס.אני רוצה לעשות חישובים על מידע שמגיע לי ממערכת בימות המשיח. המידע מגיע במספר קבצים שונים.
היות ובאקסס אני לא יודע לעשות את כל החישובים, אני חושב שיהי לי יותר קל באקסל,
היות ובאקסל לעומת אקסס, הוא איטי יותר בכמות גדולה של נתונים (יותר ממליון שורות) בקובץ שלי.
חשבתי להוריד את הקבצים לאקסס, ולייבא לאקסל, כשהאקסס הוא מקור הנתונים. ע"כ.
האם זה ישפיע על מהירות עיבוד המידע? ומהי הדרך המומלצת מן המומחים כאן.
תודה. -
פיצול גליונות אקסל לקבצים נפרדים@ראש-פינה
דרך ארוכה היא מסנן, העתק, צור גיליון חדש, הדבק, וחוזר חלילה.
כנראה יש פתרונות יותר טובים, כגון לולאות וכדו'. -
מקצבים באורגן KORG pa50sd@בער מתקינים דרך הכפתור שנמצא משמאל למסך "MEDIA"
שם יש לך כמה חלונות- לטעון - סט לתוך האורגן (לא הזיכרון הכללי)
- לשמור- את חלק/כל מה שיש בתוך האורגן כעת (לא הזיכרון הכללי)
- להעתיק קבצים,סטים וכדו' - מהזיכרון הכללי של האורגן
- למחוק - קבצים, סטים, - מהזיכרון הכללי של האורגן
יש עוד כמה ואני לא זוכר כעת.
תוכל לבנות לבד מקצבים ע"י לחיצה על כפתור ליד המסך "RECORD" ולאחמ"כ "new Style" משהו כזה.בהצלחה.
נ.ב. יום אחד אם תהיה גדול במוזיקה, ותרצה למכור את החומרים שלך, תזכור שגם אתה קנית. קנה בפורפורציה מה שאתה צריך, שיספיק לך להנות מהנגינה שלך. אין סיבה לשלם המון כסף, אלא אם כן יש לך אירועים (לא הבטחות!) שמצדיקים את זה. -
חלוניות POP-UP באקסל@chetz321 כנראה אפשרי דרך VBA
-
ממתי DigitalOcean שולחים כסף@zvinissim אולי תשאל אותם מה זה. או אם יש להם עוד 'מיותר'.
-
עזרה | ניהול פרטי השתתפות במבצע@חוקר סיכה קטנה אם אפשר, איפה בנית? באקסל?
-
עזרה | ניהול פרטי השתתפות במבצעאני פותח מבצע בישיבות, וכל שבוע יהיו מבחנים והגרלות. מהי הדרך והתוכנה הנכונה והקלה לנהל את המערכת. או שאולי יש לזה תוכנה מוכנה?
אשמח מאוד להמלצות ממי שיודע.- לשמור פרטים של כל המשתתפים.
- לשמור מידע היסטוריה על השתתפות בהגרלה (מי השתתף ובאיזו הגרלה)
- איזה ישיבות משתתפות, ופרטים על הישיבה.
-
שעון נוכחות בטביעת אצבע או קוד לכולל אברכיםנמחק
-
שעון נוכחות בטביעת אצבע או קוד לכולל אברכים@נתן יש אפשרות אולי לא הכי פרקטית, לעשות קו תוכן בימות המשיח, ושם יש גם שעון נוכחות, וזה לא קשור למיקום וכו' (אלא אם כן אתה רוצה להיות בטוח מאיפה האברך אישר כניסה, כי זה יכול להיות גם מהבית שלו
)