We all have different situations and it's impossible to account for every particular need one might have. How Do I Modify This To Fit My Specific Needs?Ĭhances are this post did not give you the exact answer you were looking for. I want to hear from you and learn what you use event triggers for! I look forward to reading your comments. There are so many really creative ways you can use events to automate your tasks. I've used event triggers to make sure a workbook is password protected before it is closed and there have been instances where I have used events to automatically open up specific files when the workbook is opened. To execute code without firing any events, put it between the following two lines of code: Application.EnableEvents = False ' => deactivate eventsĪpplication.I use events for a lot of different reasons. This event will fire when the user clicks on a hypertext link: Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)Įnd Sub Temporarily deactivate all events This event will fire when the contents of cells in the worksheet are changed: Private Sub Worksheet_Change(ByVal Target As Range) This event will fire when the data on the worksheet are calculated or recalculated: Private Sub Worksheet_Calculate() This event will fire when the user right clicks on the worksheet: Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean) This event will fire when a cell in the worksheet is double clicked: Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
This event will fire when another worksheet is activated: Private Sub Worksheet_Deactivate() This event will fire when the worksheet is activated: Private Sub Worksheet_Activate() 'Saving the address of the current selection: 'Adding background color to current selection: Range(previous_selection).Interior.ColorIndex = xlColorIndexNone 'Removing background color from previous selection: This event is executed whenever the selection is changed: Private Sub Worksheet_SelectionChange(ByVal Target As Range)įor example, the code below adds background colors to one or more selected cells and automatically removes the background color from the previous selection when the selection is changed: Private Sub Worksheet_SelectionChange(ByVal Target As Range)
The SelectionChange event will be added by default.
To execute instructions based on events for a particular worksheet, select the sheet in the editor, and then Worksheet: On this page, we'll move on to focus on events linked to a single worksheet. On the last page, we looked at events related to the entire workbook.
0 kommentar(er)
