M
Murray
-I opened a new spreadsheet
-I created two macros and set them to all workbooks
---Sub ConvertToUpperCase()
Dim Rng As Range
For Each Rng In Selection.Cells
If Rng.HasFormula = False Then
Rng.Value = UCase(Rng.Value)
End If
Next Rng
End Sub
Sub ConvertToLowerCase()
Dim Rng As Range
For Each Rng In Selection.Cells
If Rng.HasFormula = False Then
Rng.Value = LCase(Rng.Value)
End If
Next Rng
End Sub
-I created a custom Toolbar and added two custom buttons, one for the
uppercase, one for the lowercase macro
-I attached the toolbar to the workbook using Tools/Customize/Toolbars/Attach
-I saved the workbook as a template, changecase.xlt, in
C:\Documents and Settings\me\Application Data\Microsoft\Templates
-I opened a new workbook and the custom toolbar was there
-I typed in some text and selected it and clicked the change to upper case
button
-the case changed, but the file changecase.xlt opened
What have I done incorrectly? I, of course, do no want the template to open.
-I created two macros and set them to all workbooks
---Sub ConvertToUpperCase()
Dim Rng As Range
For Each Rng In Selection.Cells
If Rng.HasFormula = False Then
Rng.Value = UCase(Rng.Value)
End If
Next Rng
End Sub
Sub ConvertToLowerCase()
Dim Rng As Range
For Each Rng In Selection.Cells
If Rng.HasFormula = False Then
Rng.Value = LCase(Rng.Value)
End If
Next Rng
End Sub
-I created a custom Toolbar and added two custom buttons, one for the
uppercase, one for the lowercase macro
-I attached the toolbar to the workbook using Tools/Customize/Toolbars/Attach
-I saved the workbook as a template, changecase.xlt, in
C:\Documents and Settings\me\Application Data\Microsoft\Templates
-I opened a new workbook and the custom toolbar was there
-I typed in some text and selected it and clicked the change to upper case
button
-the case changed, but the file changecase.xlt opened
What have I done incorrectly? I, of course, do no want the template to open.