• דף הבית
  • קטגוריות
  • פוסטים אחרונים
  • משתמשים
  • חיפוש
  • חוקי הפורום
כיווץ
תחומים

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

מילוי תאריך רץ בטופס מאקרו לטבלה

מתוזמן נעוץ נעול הועבר תכנות
3 פוסטים 1 כותבים 376 צפיות
    • מהישן לחדש
    • מהחדש לישן
    • הכי הרבה הצבעות
תגובה
  • תגובה כנושא
התחברו כדי לפרסם תגובה
נושא זה נמחק. רק משתמשים עם הרשאות מתאימות יוכלו לצפות בו.
  • searchnicksS מנותק
    searchnicksS מנותק
    searchnicks
    כתב ב נערך לאחרונה על ידי
    #1

    כפי שרואים בתמונה
    0_1538565809506_8c375c4a-448e-4ada-955b-075eca936ef4-image.png

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

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

    אשמח לכל עזרה וייעוץ, או למילים מתאימות לחיפוש גוגל

    אם תשובתי פתרה את בעייתך, אנא לחץ על החץ הקטנטון שנמצא בסמוך לתשובה...

    תגובה 1 תגובה אחרונה
    0
  • searchnicksS מנותק
    searchnicksS מנותק
    searchnicks
    כתב ב נערך לאחרונה על ידי
    #2

    אשמח לפחות למילים מתאימות לחיפוש גוגל

    אם תשובתי פתרה את בעייתך, אנא לחץ על החץ הקטנטון שנמצא בסמוך לתשובה...

    תגובה 1 תגובה אחרונה
    0
  • searchnicksS מנותק
    searchnicksS מנותק
    searchnicks
    כתב ב נערך לאחרונה על ידי
    #3

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

    
    
    Private Sub CommandButton1_Click()
    
    
    Dim ws As Worksheet, LRow as Long, i as Integer
    Set ws = Worksheets("sheets")
    
    LRow = ws.Range("A" & ws.Rows.Count).End(xlUp).Offset(1, 0).Row
    
    ws.Range("A" & LRow) = Me.TextBox2
    ws.Range(ws.Cells(LRow, 2), ws.Cells(LRow + Me.TextBox1, 2)) = Me.TextBox3
    
    For i = (LRow + 1) To (LRow + Me.TextBox1 - 1)
        ws.Range("A" & i ) = DateAdd("m", 1, ws.Range("A" & i -1))
    Next i
    
    Unload Me
    
    End Sub
    

    אם מישהו יצטרך...

    אם תשובתי פתרה את בעייתך, אנא לחץ על החץ הקטנטון שנמצא בסמוך לתשובה...

    תגובה 1 תגובה אחרונה
    4
  • dovidD dovid העביר נושא זה מ-תכנות ב-

  • התחברות

  • אין לך חשבון עדיין? הרשמה

  • התחברו או הירשמו כדי לחפש.
  • פוסט ראשון
    פוסט אחרון
0
  • דף הבית
  • קטגוריות
  • פוסטים אחרונים
  • משתמשים
  • חיפוש
  • חוקי הפורום
  • התחברות

  • אין לך חשבון עדיין? הרשמה

  • התחברו או הירשמו כדי לחפש.