• 締切済み

VBAを利用した抽出の仕方を教えてください!

知恵をおかしください。 sheet1に以下の残業時間早見表があるとします。 A列  B   C  D  /  18:00 19:00 20:00 8:30  1   2   3 9:00  0.5  1.5  2.5 9:30  0   1   2 縦軸を出社時間で横軸を退社時刻として、 SHEET2のA列に出社時間とB列に退社時間を入力すればC列に残業時間がsheet1から条件にあった値を抽出して表示させるようにしたいです。 『例えば、9時に出社して19時に退社したら1.5時間残業したと自動表示されるといったような・・・』 マクロやVBAを利用してやる方法を教えてください。お願いします。

みんなの回答

noname#95859
noname#95859
回答No.1

本件は、VBA等でやる必要は無いと考えます。 むしろ、VBAでは、ややこしくなります。 貴兄のデータをそのまま、計算すると、 18:00-8:30= 9.5 --->1 19:00-8:30=10.5 --->2 20:00-8:30=11.5 --->3 18:00-9:00= 9.0 --->0.5 19:00-9:00=10.0 --->1.5 20:00-9:00=11.0 --->2.5 18:00-9:30= 8.5 --->0 19:00-9:30= 9.5 --->1 20:00-9:30=10.5 --->2 つまり、差の時間と残業時間には、常に8.5の差があります。 A列:退社時間、B列:出社時間、C列:8:30 D列:=A-B-C とします。C列には全部 8:30を入れておきます。 (隠しておいてもいいですが) 残された問題は、D列には、1:00, 1:30,とか出てきますので これをいかにして1.0 とか 1.5とかに変換するかです。 これについては、過去ログを調べれば何か出てくると思います。

関連するQ&A