View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Jordan Jordan is offline
external usenet poster
 
Posts: 144
Default Number Formating

ooh, thats a neat trick, thanks Gary

"GaryDK" wrote:

Hi Jordan,

See if this helps -

Select Case InStr(ActiveSheet.Cells(rownum, 1), "-") - 1
Case 4

Case 5

Case 6

Case Else
End Select

Gary