Page 145 - Microsoft Office Excel 2003 Programming Inside Out
P. 145

Part 3:  The Excel Object Mode
                                                     The Application Object

                             ThisWorkbook Property
                             ThisWorkbook returns a Workbook object that refers to the workbook that contains the macro
                             that’s currently running. This property lets Add-Ins refer to the workbook that contains the
                             code. ActiveWorkbook will not work because it refers to the currently active workbook and
                             not the workbook that actually contains the code being executed.
                             The following example demonstrates the ThisWorkbook property by displaying a message
                             box with the name of the active workbook and the name of the workbook the macro is being
                             executed from:

                             Sub TestThisWorkbook()
                             Dim strMessage As String

                                 strMessage = "Active Workbook = " & ActiveWorkbook.Name & vbCrLf
                                 strMessage = strMessage & "This Workbook = " & ThisWorkbook.Name
                                 MsgBox strMessage, vbOKOnly + vbInformation, _
                                    "Microsoft Office Excel 2003 Programming Inside Out"

                             End Sub











                    Methods
                             Methods are the actions that objects can perform. They allow the contents of the object
                             container to be processed. You can think of it as a kitchen blender. The blender is the object
                             container. The food placed inside the blender is the contents. Each of the individual buttons,
                             stir, chop, liquefy, and so on, is a different method.

                             Calculate Method
                             Calculate forces all open workbooks to recalculate all cells that contain new, changed, or
                             volatile cells and their dependents. Using this method is similar to pressing the F9 key, and it
                             is used to force Excel to recalculate a workbook when the Calculation option in the Tools,
                             Options dialog box has been set to manual. This example recalculates all open workbooks if
                             the Calculation option is not set to automatic.

                             Sub RecalcAll()
                                 If Application.Calculation <> xlCalculationAutomatic Then                   Chapter 6
                                    Calculate
                                 End If
                             End Sub


                                                                                                       119
   140   141   142   143   144   145   146   147   148   149   150