View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Jan Hammel Jan Hammel is offline
external usenet poster
 
Posts: 1
Default HELP --- 1004 Application-defined or object-defined erro

Hi

I'm new to VBA programming and am attempting to add a 4th conditional format
by editing a recorded macro and am receiving this error message.

Here is my code:

Sub Conditional_Formatting()
'
' Conditional_Formatting Macro
' Macro recorded 4/26/2007 by Jhammel
'
' Keyboard Shortcut: Ctrl+j
'
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _
Formula1:="=""""""Materials"""""""
Selection.FormatConditions(1).Interior.ColorIndex = 36
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _
Formula1:="=""""""Turnkey"""""""
Selection.FormatConditions(2).Interior.ColorIndex = 34
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _
Formula1:="=""""""Labor"""""""
Selection.FormatConditions(3).Interior.ColorIndex = 33
Range("E2").Select
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _
<---------LINE GENERATING ERROR
Formula1:="=""""""None"""""""
Selection.FormatConditions(4).Interior.ColorIndex = 35
Range("E2").Select
End Sub


Any help would be appreciated.

Thanks
Jan Hammel