ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ¼Æ­È§e²{¤è¦¡

[µo°Ý] ¼Æ­È§e²{¤è¦¡

¦p¦ó§Q¥Î VBA¤è¦¡, §â¹Bºâ¥X¨Óªº¼Æ­È§e²{ ¥|±Ë¤­¤Jªº2¦ì¤p¼Æ
ex: 5.6893333=5.69

MsgBox Application.Text("5.6893333", "0.00")

TOP

­Y¤£·Q­n¥HMsgBoxªº¤è¦¡
ActiveSheet.Cells(3, 5).Value = ar * ActiveSheet.Cells(7, 3).Value

·Q­nÅý(3,5)ªº­È§e²{2¦ì¼Æ©O?

TOP

¦^´_ 3# Helain
  1. Sub Ex()
  2.     With ActiveSheet.Cells(3, 5)
  3.         .Value = ar * .Cells(7, 3).Value
  4.         .NumberFormatLocal = "0.00"
  5.     End With
  6. End Sub
½Æ»s¥N½X

TOP

¦^´_ 3# Helain


    [A1] = Application.WorkSheetFunction.Round(123.12456, 2)
diabo

TOP

        ÀR«ä¦Û¦b : ¤£©È¨Æ¦h¡A¥u©È¦h¨Æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD