★ ダブルクリックで表示できるように  サンプルDL
 


◎ お決まりのダブルクリックで一発表示。




ワークブックのSheetBeforeDoubleClickを選択して、そこに下のようにフォームを表示できるように入力しておきます。

 

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)

f_schedule.Show

End Sub

 

さあ、一応これで完成です。これで出勤簿の出勤と退勤時間を取得するフォームができました。次はこの時間から給与計算に入れるようにプログラムしていくとよいでしょう。


[トップ][前へ][簡易出勤簿メニュー][次へ][サンプルファイルダウンロード]