Solved: Capitalising?

[cdbrown]

Hi - Is it possible to capitalise the text in a cell. I'm using a portion of a filename (wb3) as part of the saved name of wb2.
To capture the part I want
[VBA]
Sheets("List").Select
ActiveSheet.Cells(9, 3).Value = Mid(wb3.Name, 19, Len(wb3.Name) - 37)[/VBA]
returns stuff like i04x-g but I need it to be I04X-G when using it in the filesave

[VBA]
ActiveWorkbook.SaveAs Filename:="Toxic Gas - " & Cells(9, 3)[/VBA]
Any way to force it to be capitals during the capture, filesave or somewhere else?

Cheers
-cdbrown

PS - I'm sure there's more questions to come

[ALe]

use the function Ucase(YourString)

[cdbrown]

You, my friend, are a champion. Thank you very much
[VBA]ActiveSheet.Cells(9, 3).Value = UCase(Cells(9, 3))[/VBA]

[ALe]

it's a pleasure.

[Zack Barresse]

Also, no need to Select ..

[vba]Sheets("List").Cells(9, 3).Value = Mid(wb3.Name, 19, Len(wb3.Name) - 37)[/vba]

HTH