VBA TIPS – 絶対値の取得

1月 1, 2003 · Posted in VBA · Comment 

Abs関数の利用

絶対値はAbs関数を利用して取得することができる。

書式

Abs(数値)

例

Debug.Print Abs(0)
Debug.Print Abs(5)
Debug.Print Abs(-5)

結果

0
5
5

Tags: no tags

colorIndex一覧

1月 1, 2003 · Posted in VBA · Comment 

colorIndex

1 8 15 22 29 36 43 50
2 9 16 23 30 37 44 51
3 10 17 24 31 38 45 52
4 11 18 25 32 39 46 53
5 12 19 26 33 40 47 54
6 13 20 27 34 41 48 55
7 14 21 28 35 42 49 56

Tags: no tags

VBA TIPS – 日時取得

1月 1, 2003 · Posted in VBA · Comment 

日時の取得

Me.Range("A1") = Now    ' 日時
Me.Range("A2") = Date   ' 日付
Me.Range("A3") = Time   ' 時刻

Me.Range("A5") = Year(Now)   ' 年
Me.Range("A6") = Month(Now)  ' 月
Me.Range("A7") = Day(Now)    ' 日

Me.Range("A8") = Hour(Now)     ' 時
Me.Range("A9") = Minute(Now)   ' 分
Me.Range("A10") = Second(Now)  ' 秒

' フォーマット指定
Me.Range("A12") = Format(Time, "hh:mm:ss")

実行結果サンプル

　 A B
1 2003/10/13 14:19 　
2 2003/10/13 　
3 2:19:29 PM 　
4 　 　
5 2003 　
6 10 　
7 13 　
8 　 　
9 14 　
10 19 　
11 29 　
12 　 　
13 14:19:29 　

Tags: no tags

次ページへ »