Version 4.x, 95 – If you’d like to add the days of the current week to your worksheet on a Monday morning, you can select a cell and type
=today()
Now select five cells beginning with the one you just entered today’s date into and choose Edit, Fill, Series. Then select Date and Weekdays. Click on OK and the column will fill with the days of the current week. But why go through all that when you can use a simple macro to do it for you? Let’s look at the macro first, and then we’ll talk about how to install and use it.
Sub AddDate()
Range(“A2”).Select
ActiveCell.FormulaR1C1 = “=TODAY()”
Range(“A2:A6”).Select
Selection.DataSeries Rowcol:=xlColumns, Type:=xlChronological,
Date _
:=xlWeekday, Step:=1, Trend:=False
Selection.NumberFormat = “dddd mmmm d, yyyy”
Columns(“A:A”).EntireColumn.AutoFit
Range(“A7”).Select
Besides this, women cialis price brand are unable to conceive or having difficulty conceiving after one year of unprotected intercourse, then the couple is labeled as infertile, this simply means that they have been unable to conceive and bear a child. You can save cash and take pride in your work viagra sans prescription use this link at the same time, but you need to understand that timely treatment can improve your condition before things become all the more difficult. OT’s assess and help cheap viagra in uk people perform a myriad of daily tasks. Before you http://donssite.com/rustic-old-red-barn-silo.htm discount viagra take any pills, you should try and understand the kind of dosage you are looking at. End Sub
To add the macro to Excel, choose Window and select Unhide if it’s available. If Windows, Unhide is grayed out, choose Tools, Record Macro. When the dialog box opens, type in
AddDate
for the name and then click on Options. Make sure Personal Macro Workbook and Visual Basic are selected and click on OK. Now click on the Stop button on the floating Recorder window. At this point, Window, Unhide will be available, and you should select it now.
A dialog box will appear with Personal.xls selected (if something else is there and selected, select Personal.xls). Click on OK and the blank module page will appear. Type in the macro exactly as shown in the listing. When you finish entering the macro, choose File, Save to save Personal.xls. Next, choose Window, Hide to rehide Personal.xls.
Now you can choose Tools, Macro and double-click on Personal.XLS!AddDate to run the new macro.
AddDate selects cell A2 and inserts the current date (we assume you’ll use this on Monday morning). Then it selects for more cells to hold the remaining days of the week. Next, it places the dates in the selected cells and then formats the date and the cell width. The macro then moves the cursor to the bottom of the row. This deselects the previously selected cells.
When you close Excel, you’ll be asked about saving the personal workbook. Tell it Yes.