Home |
Search |
Today's Posts |
#8
![]()
Posted to microsoft.public.excel,microsoft.public.excel.misc,microsoft.public.excel.programming,microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
SAWEET!!! IT WORKS!!! THANK YOU! THANK YOU!!!
D "Chip Pearson" wrote in message ... The code should be on a single line, or split using the line continuation character _. E.g., For Each Cell In ActiveSheet.UsedRange.SpecialCells( _ xlCellTypeConstants, xlTextValues) -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "D" wrote in message news:DZrSc.26686$Oi.14208@fed1read04... Jim- Thank you for the response and code... I'm getting a syntax error on the For Each Cell In ActiveSheet.UsedRange.SpecialCells(xlCellTypeConst ants, xlTextValues) Any ideas? I don't see it... Thanks! D "Jim Rech" wrote in message ... See if this is better: Sub ConvertUsedRgToProperCase() Dim Cell As Range On Error GoTo EndThis For Each Cell In ActiveSheet.UsedRange.SpecialCells(xlCellTypeConst ants, xlTextValues) Cell.Value = StrConv(Cell.Value, vbProperCase) Next EndThis: End Sub -- Jim Rech Excel MVP "D" wrote in message news:pJiSc.26663$Oi.7755@fed1read04... | Hey guys- | Got this code from the net, seems to work fine until now. I'm getting an | Error 6 Overflow problem. I don't understand VB much at all, so can someone | point me along the way? | Thanks | D | | Sub Step4() | ' ProperCase Macro | Dim c As Range | With ActiveSheet | For Each c In .UsedRange | c.Value = Application.WorksheetFunction.Proper(c.Value) | Next | End With | | End Sub | | |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Overflow when translating from C++ HELP!! | Excel Programming | |||
overflow error | Excel Programming | |||
Overflow in VBA, but value < limit | Excel Programming | |||
VBA overflow | Excel Programming | |||
VBA overflow | Excel Programming |