Information box type thing

How about using the drawing toolbar and select one of the shapes. Draw the shape and add text to it. Would this work? It will put a shape with text on the sheet.

I want it to

open automatically when the file is opened.

I am guessing you want an OK button to clear it? Then you could put this bit of code in the ThisWorkbook module:

Can you change

the box size, colour etc?

Have the ThisWorkbook Open Event, Select Cell: A1, on the Sheet you want displayed show the Assistant and have the Assistant show your message!


Private Sub Workbook_Open()
'ThisWorkbook code module!

Assistant.Visible = True

With Assistant.NewBalloon
'.Heading = "My Application"
.Heading = " "
'.Heading = Application.Name
.Text = "{cf 252}By:{cf 0} {ul 1}Joe Was, 2/2006{ul 0}"
'.Button = msoButtonSetNone
.Show
End With

Sheets("Sheet1").Select
Sheets("Sheet1").Range("A1").Select
End Sub


Then As an auternative or in conjunction with the above, add the same message to the Validation Box, which will also update the Assistant every time Cell: A1 on that sheet is selected, from the Excel Toolbar: Data - Validation...

Select the: Input Message [Tab]

Add your Title and Message.


Note: The Assistant is Modaless, but when used as a Ballon like the code above it becomesis Modal so it must have a Button. To avois this only use the Sheet & Range code in the above Event and load that cell with a Validation Message and it will be Modaless and not have a Button!

This is the tack I take!

Can you provide all of your requirements at once? I am not sure what you are trying to accomplish.

A MsgBox uses specific Windows colors and you wouldn't want to change these and it's size defaults to the minimum size required for the items included.

when a

work book is opened I want some kind of text box to appear announcing who produced the file. I want to be able to select my own text and coluors. Would it need to be a user form?

That would probably be the best solution. It should give you all of the control you want.

Review my Assistant code, Note at bottom.

Also, you can change the Assistant Box Coloe and the text color.

There are two attributes you can add to text in a balloon: color and underlining. There are 16 supported system colors you can use to emphasize text with color. You also can change the appearance of text in a balloon by underlining the text. Text attributes are embedded in the text of the balloon and are surrounded by braces in the code. The following example creates a new Office Assistant balloon that contains underlined heading text, red text, and blue text that is also underlined.

With Assistant.NewBalloon
.Heading = "Underlined {ul 1}Heading{ul 0}"
.Text = "Some {cf 249}Red{cf 0} text and some " & _
"underlined {cf 252}{ul 1}Blue{ul 0}{cf 0} text."
.Show
End With


And, Yes the UserForm or Shape Object is the best when it comes to custom looks!