Access.2007.VBA.Bibl..
See Chapter 7 for a more flexible way of specifying a Templates folder and a Documents folder. After the code deletes the archiv ...
FIGURE 3.11 Viewing the file format choices for saving an Excel workbook. If you create a worksheet in the new .xlsx format, onl ...
To open the Object Browser for examining components of an object model, open the Visual Basic window and select Object Browser f ...
Dim strPrompt As String Dim strDataRange As String Dim strRange As String Dim strSaveName As String Dim strSheetName As String D ...
Reset lngCount to the number of records in the query: rst.MoveLast rst.MoveFirst lngCount = rst.RecordCount For n = 1 To lngCoun ...
.Borders(xlEdgeLeft).LineStyle = xlContinuous .Borders(xlEdgeLeft).Weight = xlHairline .Borders(xlEdgeLeft).ColorIndex = xlAutom ...
wks.Range(strDataRange).Select wks.Sort.SortFields.Clear wks.Sort.SortFields.Add Key:=Range(strKey1Range), _ SortOn:=xlSortOnVal ...
Add a Grand Total, and format its cell: strFormula = “=SUM(R[-” & CStr(lngRows - 2) _ & “]C:R[-1]C)” Debug.Print “Formul ...
With appExcel.Selection.Borders(xlEdgeRight) .LineStyle = xlContinuous .ColorIndex = 0 .TintAndShade = 0 .Weight = xlMedium End ...
If Err.Number = 429 Then Set appExcel = CreateObject(“Excel.Application”) Resume Next Else MsgBox “Error No: “ & Err.Number ...
...
O utlook is the Office component that is used for communicating via email, maintaining a calendar, and storing contact and task ...
If you store email addresses in a table of contacts, customers, or clients, you can use VBA code to cre- ate emails to them from ...
FIGURE 4.1 An Employees form with review date fields. Check that a date has been entered (or selected): If IsDate(Me