您好,请考虑我的傻问题的范围,我很长时间以来被困在这里Excel的比较发现数
elseif的细胞(M1,A)> = 1,细胞(M1,A)< = 98然后
细胞(M1,一个).Font.Bold =真
这里只不带小数点的值(例如,4,56,90)等越来越粗体,重视与小数点(4.5,56.5 ,90.54),尽管在rqnge没有得到过滤。
请建议可能出现的问题
我认为这个问题是与法国编号系统作为数据来是来自法国。
谢谢
有什么办法来考虑不同的编号系统,与美国的系统.... ???
您好,请考虑我的傻问题的范围,我很长时间以来被困在这里Excel的比较发现数
elseif的细胞(M1,A)> = 1,细胞(M1,A)< = 98然后
细胞(M1,一个).Font.Bold =真
这里只不带小数点的值(例如,4,56,90)等越来越粗体,重视与小数点(4.5,56.5 ,90.54),尽管在rqnge没有得到过滤。
请建议可能出现的问题
我认为这个问题是与法国编号系统作为数据来是来自法国。
谢谢
有什么办法来考虑不同的编号系统,与美国的系统.... ???
你应该使用Cells(m1,a).value
以及Cells(m1,a).value
下面的代码将检查小区的列表运行宏之前被选中。对于每个单元格,如果它的值是[1..98],那么我将该状态切换。
Sub toggleBoldInSelection()
Dim cellValue
For Each curCell In Selection
cellValue = curCell.Value
If (cellValue >= 1) And (cellValue <= 98) Then
curCell.Font.Bold = Not curCell.Font.Bold 'True
End If
Next curCell
End Sub
试试这个
ElseIf Val(Cells(m1, a).Value) >= 1 And Val(Cells(m1, a).Value) <= 98 Then
如果您没有运行从片码区这个代码,那么不要忘记完全限定细胞对象。例如
ThisWorkbook.Sheets("Sheet1").Cells(m1, a).Value
OK谢谢主席先生 它为我:) –
的问题是与法国编号系统:P –
高兴它帮助:-) –