VBA在單個單元格中用斜線分隔兩個兩位數值

我覺得這應該是相對直接的，但我似乎無法找到有效的東西。VBA在單個單元格中用斜線分隔兩個兩位數值

我希望能夠分開VBA宏中的兩個值，這些值在進行一些初步計算之後被定義爲值。然後我希望能夠將這兩個值放在同一個單元格中，並用斜槓（「/」）分隔。

以下是我已經沒有寫過兩碼似乎把工作做好：

Sub Macro3() 

TotalK = 10 
BB = 15 

ActiveCell.Value = "=TotalK &""/""& BB" 

End Sub

我試圖這樣做的另一種方式（這是極其低效）：

If TotalK > 9 Then 
    wsNew.Range("E45").NumberFormat = "00""/""0": wsNew.Range("E45").Value = TotalK & BB 
ElseIf BB > 9 Then 
    wsNew.Range("E45").NumberFormat = "0""/""00": wsNew.Range("E45").Value = TotalK & BB 
ElseIf TotalK > 9 And BB > 9 Then 
    wsNew.Range("E45").NumberFormat = "00""/""00": wsNew.Range("E45").Value = TotalK & BB 
Else 
    wsNew.Range("E45").NumberFormat = "0""/""0": wsNew.Range("E45").Value = TotalK & BB 
End If

第二方法字，除了TotalK和BB都超過9時。輸出爲211/7，例如，應該是21/17。

來源

2017-07-07 rahlf23

能夠找到一個簡單的解決方法：

ActiveCell.NumberFormat = "@" 
ActiveCell.Value = TotalK & "/" & BB

來源

2017-07-07 18:50:59 rahlf23

可能是你可以試試這個，

Sub Macro3() 
TotalK = 10 
BB = 15 
ActiveCell.Value = TotalK & "/" & BB 
End Sub

來源

2017-07-08 06:18:48

VBA在單個單元格中用斜線分隔兩個兩位數值

回答

相關問題