您好,請考慮我的傻問題的範圍,我很長時間以來被困在這裏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 –
高興它幫助:-) –