计算具有特定填充颜色和单元格值的单元格数

时间:2015-11-17 09:47:23

标签: excel excel-vba vba

我正在使用下面的代码,但它无效。

var type = "text/html";
var title = "transaction.html";
var fileContent = "<html>Transaction</html>
<body>
<table>
<tr>
<td>Print content goes here</td>
</tr>
</table>
<body>";
window.plugins.PrintPlugin.print(fileContent,function(){console.log('success')},function(){console.log('fail')},"",type,title);

1 个答案:

答案 0 :(得分:0)

谦虚地建议你进入VBE的工具►选项,在编辑器属性页面上,勾选需要变量声明旁边的复选标记。这将帮助您避免拼写错误或完全省略您使用的变量的名称。

Function CountColorValue(CountRange As Range, CountColor As Range, CountValue As Range)

    Dim iNumbers As Long
    Dim rCell As Range

    For Each rCell In CountRange
        If rCell.Interior.ColorIndex = CountColor.Interior.ColorIndex Then
            If rCell.Value2 = CountValue.Value2 Then
                iNumbers = iNumbers + 1
            End If
        End If
    Next rCell

    CountColorValue = iNumbers

End Function

看起来你正试图将两个密切相关的函数混合在一起,但如果没有正确的变量声明和赋值,你就不能在另一个函数中使用其中一部分。