none
VBA excel RRS feed

  • שאלה

  • שלום

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

    איך אני יכול לכתוב קוד , על אירוע לחיצה עליו

    כי בזמן כתיבת התוכנית הכפתור לא קיים 

    תודה מראש לעוזרים

    יום ראשון 17 מאי 2020 15:46

תשובות

  • אהלן

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

    Sub Button1_Click()
        
        MsgBox "Original Button was clicked... New Button will be created now"
        
        PositionX = ActiveSheet.Cells(2, 1).Value
        PositionY = ActiveSheet.Cells(2, 2).Value
        
        NewButton = ActiveSheet.Buttons.Add(PositionX, PositionY, 100, 100).Select
        
        ActiveSheet.Cells(2, 1).Value = ActiveSheet.Cells(2, 1).Value + 50
        ActiveSheet.Cells(2, 2).Value = ActiveSheet.Cells(2, 2).Value + 50
        
        Selection.OnAction = "NewButton_Was_Click"
        ActiveSheet.Cells(5, 4).Select
        
    End Sub
    
    Sub NewButton_Was_Click()
        
        MsgBox "New Button was clicked"
    
    End Sub

    צור כפתור אחד בטופס וצרף לו את הפונקציה הראשונה. בלחיצה על הכפתור הראשון יווצר כפתור נוסף. לחיצה על הכפתור הנוסף תפעיל את הפונקציה השנייה

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


    signature   Ronen Ariely
     [Personal Site]    [Blog]    [Facebook]    [Linkedin]



    יום חמישי 21 מאי 2020 17:33