Book

Suggestions


Enter your email address:

Delivered by FeedBurner


Home Page

Bloglines

1906
CelebrateStadium
2006

OfficeZealot

Scobleizer

TechRepublic

AskWoody

SpyJournal









Subscribe here
Add to My Yahoo!
This page is powered by Blogger. Isn't yours?

Host your Web site with PureHost!


eXTReMe Tracker
  Web http://www.klippert.com


  Monday, December 26, 2011 – Permalink –

All Fonts

List maker



Here is a macro that will produce a list of all of the installed fonts.


  1. Open Word.
  2. Use Alt+F11 to open the Visual Basic editor.
  3. Choose Insert>Module from the Menu.
  4. Copy and Paste this code in the module.
  5. Return to Word and go to: Tools>Macro>Macros.
  6. Select and run "InstalledFonts".
Sub InstalledFonts()

Dim F As Integer
Dim InstalledFonts As Table

 'Open a fresh document

Set FreshDoc = Documents.Add

'Create a table and define the header

Set InstalledFonts = FreshDoc.Tables.Add(Selection.Range, FontNames.Count + 1, 2)
With InstalledFonts
.Borders.Enable = False
.Cell(1, 1).Range.Font.Name = "Arial"
.Cell(1, 1).Range.Font.Bold = 1
.Cell(1, 1).Range.InsertAfter "Font Name"
.Cell(1, 2).Range.Font.Bold = 1
.Cell(1, 2).Range.InsertAfter "Example"
End With

'Loop through all the fonts and add them to the table

For F = 1 To FontNames.Count
With InstalledFonts
.Cell(F + 1, 1).Range.Font.Name = "Arial"
.Cell(F + 1, 1).Range.Font.Size = 10
.Cell(F + 1, 1).Range.InsertAfter FontNames(F)
.Cell(F + 1, 2).Range.Font.Name = FontNames(F)
.Cell(F + 1, 2).Range.Font.Size = 10
.Cell(F + 1, 2).Range.InsertAfter "ABCDEFG abcdefg 1234567890 &$@"
End With
Next F
'Sort the names of the fonts

InstalledFonts.Sort SortOrder:=wdSortOrderAscending

End Sub

Also see a more sophisticated macro using Excel from Erlandsen Data Consulting: Display all installed fonts (Excel)



See all Topics

Labels: ,


<Doug Klippert@ 3:13 AM

Comments: Post a Comment

  Tuesday, December 20, 2011 – Permalink –

Gannt-PERT

Project Charts


The Gantt chart was developed by Henry L. Gantt around 1910. The chart shows a project's status, but not how one task depends on another.

In the 1950's, the Navy developed PERT (Program Evaluation Review Technique) charts. A similar process is called the Critical Path Method (Analysis) or CPM (A).

The terms PERT, PERT/CPM, and CPM are often interchanged.

A PERT chart looks more like a flow chart than a graph.

BaRaN Sytems has some clear examples:
Project for Excel

Here's an example of a Gantt chart being constructed using an open source product called GanttProject :
Flash Demo

John F. Lacher has created a nice example of how to create a Gantt chart.
This one is appropriate for scheduling rooms, resources, and time.

A sample can be downloaded and customized.
Lacher24.XLS


Gantt Chart

Also see:

Simple Gantt chart
Gantt-type chart on a worksheet using conditional formatting

And

Microsoft Knowledgebase:
How to Create a Gantt Chart Using Hours as the Scale
Visual Basic Module to Create Gantt Chart

Jon Peltier:
Gantt Chart Links
Gantt Googled


See all Topics

Labels: , , ,


<Doug Klippert@ 3:29 AM

Comments: Post a Comment

  Wednesday, December 14, 2011 – Permalink –

Fill Formula

Double click the handle


If you have a column of data, you may wish to insert a new formula on each row, number the lines, or add a date column.

To fill the column down to the bottom of the database, just double-click on the fill handle - the tiny square at the bottom right corner of the active cell.

The duplication continues as long as there are entries in the adjacent column.

If you wish to fill down a series, make at least two entries so that the interval is apparent. For instance if there is a column of data in A1:A400, enter the number "1" in B1, "2" in B2.
Select B1:B2. Double click on the fill handle and Excel will fill the series down to B400.

You can also select a longer series, such as the name of a supervisor and the team members.

Format the supervisors name differently, if you want.

Select the list and double click the fill handle. The list will be repeated down the page, as long as there is a corresponding entry in an adjacent column. The formatting will also be repeated.

Also:

Custom Lists


F. David McRitchie:
Fill Handle


Microsoft Office Online:
Fill data in worksheet cells


If you don't see the Fill handle:
Click Options on the Tools menu and click the Edit tab.

(Use the Office button in the upper left corner in 2007)
Select or clear the Allow cell drag and drop check box.


See all Topics

Labels: , , , , ,


<Doug Klippert@ 3:57 AM

Comments: Post a Comment

  Friday, December 02, 2011 – Permalink –

Enter in Multiple Worksheets

Group sheets


A common use for Excel is to keep periodic statistics; sales by quarter, or phone calls per month.

It can be tedious to try to create worksheets for each month and include duplicate data such as client or salesperson's names.

Set up the workbook with as many worksheets that may be needed; perhaps one for each month and one for cumulative year-end totals.

Click the tab for the first month, hold down the SHIFT key and select the last worksheet in the series.

All the sheets are now chosen. You will see [Group] on the Title bar.

Enter any common information on the first sheet and it will be duplicated on all of the grouped sheets.

When you are done, Right-click a sheet tab and choose Ungroup Sheets on the context menu.

Non-contiguous sheets can be selected using the Ctrl key.

If the sheets are grouped, they will all be printed together.
Also:

John Walkenbach:
Making an exact copy of a range of formulas

Microsoft KB:
Run a macro on multiple sheets in Group mode


See all Topics

Labels: , ,


<Doug Klippert@ 3:39 AM

Comments: Post a Comment