Excel Macro
Didn't completely work I'm afraid Mike - it brought up the Form OK to select
which Change Case I wanted to select, but when I selected the radio button it
said couldn't find project libary
--
Val
"Mike H" wrote:
Hi,
Your macro works on selected cells in the active sheet to right click that
sheet tab, view code and paste the sub below in on the right
Sub Sonic()
Application.Run "Personal.xls!ChangeCase_Show"
End Sub
Mike
"Val H" wrote:
At what point do I enter this statement please Mike
--
Val
"Mike H" wrote:
Try
Application.Run "Personal.xls!ChangeCase_Show"
Mike
"Val H" wrote:
I have a set of macros which Changes the case within Excel. This is in my
Personal.xls workbook which is hidden, so the macro won't run
The macro is as follows
Option Explicit
Dim objCell As Object
Sub ChangeCase_Show()
frmCase.Show
End Sub
Sub DoCaseChange()
If frmCase.optLower = True Then
LowerCase
ElseIf frmCase.optUpper = True Then
UpperCase
Else
TitleCase
End If
End Sub
Sub LowerCase()
For Each objCell In Selection
objCell.Value = LCase(objCell.Formula)
Next objCell
End Sub
Sub UpperCase()
For Each objCell In Selection
objCell.Value = UCase(objCell.Formula)
Next objCell
End Sub Sub TitleCase()
For Each objCell In Selection
objCell.Value = Application.Proper(objCell.Formula)
Next objCell
End Sub
can anyone tell me how to run from a hidden, unshared, unprotected workbook
|