VBA将计算值粘贴为日期或货币

Question

我使用以下vba代码来计算来自另一个单元格的数字，但是当结果在单元格B4中发布时，它不会显示美元符号货币。我无法设置范围，因为它设置为下一个可用行。我也有一个类似的计算，我需要显示为日期，但它显示为数值。

Sheet2.Range（＆＃34; B4＆＃34;）= Sheet2.Range（＆＃34; B3＆＃34;）* 12

Answer 1

Sub FormatDate()

Selection.NumberFormat = "dd/mm/yyyy"

End sub

Answer 2

使用Copy然后使用PasteSpecial进行一次乘法再次进行格式化。

feature