اضافة دالة في الاكسل
18.1 هزار بار بازدید -
12 سال پیش
-
Public Function AC(x As Integer)
Public Function AC(x As Integer) As String
Dim f As Integer
Dim q As Integer
Dim s As Integer
s = x Mod 576 / 24
f = Fix(x / 576)
q = x - (f * 576)
q = Fix(q / 24)
AC = f & " F" & q & " Q" & s & " S"
End Function
12 سال پیش
در تاریخ 1392/01/09 منتشر شده
است.
18,164
بـار بازدید شده