十進制轉換成百分比

我需要的是把所有高亮顯示的數據的百分比，我不能失去逗號之後的部分接收像下面的數據。這裏是我到目前爲止已經試過：

For Each actCell In shRecipiente.ListObjects("tblRecipiente").ListColumns("All-In Rate").DataBodyRange 
    If Not (Right(actCell.NumberFormat, 1) = "%") Then 
     actCell.Value = Format(actCell, "#.####%") 
    End If 
Next actCell

但我發現了例如396,83％，而不是3,9683％

來源

2015-12-23 Estevam Garcia

變化

actCell.value = Format(actCell, "#.####%")

到

actCell.value = Format(actCell/100, "#.####%")

但是，如果沒有真正的百分比值，你NEET將其更改爲

actCell.value = Format(actCell, "#.####""%""")

，或者如果你不能改變的值嘗試

actCell.Offset.NumberFormat = "#.####""%"""

來源

2015-12-23 10:32:24

謝謝你的答案，但它仍然不工作，現在我得到39683％，而不是3,9683％ –

你有一個來源呢？也許錯誤是... –

不幸的是，我不能改變來源 –

除以100格式的數字爲百分數。

=A1/100

編輯 - 檢查被格式化爲一個百分比，這是不使用： =IF(CELL("format",A1)="P0",A1,A1/100) - P0表示百分比格式。該公式將顯示所有沒有百分比的數字，因此150％將顯示爲1.5，與150相同。
然後，這只是將整個列格式化爲百分比的情況。

來源

2015-12-23 10:31:08

十進制轉換成百分比

回答

相關問題