Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/17.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel 需要使用宏更改条件格式_Excel_Vba_Conditional Formatting - Fatal编程技术网
Fatal编程技术网
  • excel/
  • Excel 需要使用宏更改条件格式

Excel 需要使用宏更改条件格式

excel vba

Excel 需要使用宏更改条件格式,excel,vba,conditional-formatting,Excel,Vba,Conditional Formatting,有人能告诉我为什么当我查看W29单元格的条件格式时，它看起来是有效的，但工作簿中的单元格实际上并没有在应该的时候变成红色？（我最初使用条件格式设置它，以便单元格W29（实际上合并了单元格W29:AC29）如果在单元格W29中输入的日期与当前日期相差不到60天，则会变为红色。当然，这在过去两年中效果很好。但是，我正在尝试将其更改为90天。我有大量工作表要更改，因此我尝试使用宏。我显然不知道我在做什么……请帮助：( Sub-fixped（） 设置MyRange=Range（“W29:AC29”） M

有人能告诉我为什么当我查看W29单元格的条件格式时，它看起来是有效的，但工作簿中的单元格实际上并没有在应该的时候变成红色？（我最初使用条件格式设置它，以便单元格W29（实际上合并了单元格W29:AC29）如果在单元格W29中输入的日期与当前日期相差不到60天，则会变为红色。当然，这在过去两年中效果很好。但是，我正在尝试将其更改为90天。我有大量工作表要更改，因此我尝试使用宏。我显然不知道我在做什么……请帮助：(

Sub-fixped（）
设置MyRange=Range（“W29:AC29”）
MyRange.FormatConditions.Delete

MyRange.FormatConditions.Add类型：=Xexpression，公式1:=“W29插入单元格绝对地址。$W29


Sub fixped()
    
    Set MyRange = Range("W29:AC29")
    MyRange.FormatConditions.Delete
    MyRange.FormatConditions.Add Type:=xlExpression, Formula1:="=$W29<TODAY()+90"
    MyRange.FormatConditions(1).Interior.Color = RGB(255, 0, 0)
End Sub



Sub-fixped（）
设置MyRange=Range（“W29:AC29”）
MyRange.FormatConditions.Delete
MyRange.FormatConditions.Add类型：=Xexpression，公式1:=“=$W29
Formula1:=”=W29

Sub fixped()
    
    Set MyRange = Range("W29:AC29")
    MyRange.FormatConditions.Delete
    MyRange.FormatConditions.Add Type:=xlExpression, Formula1:="=$W29<TODAY()+90"
    MyRange.FormatConditions(1).Interior.Color = RGB(255, 0, 0)
End Sub