| 関数名 |
UserForm_Initialize |
| 概要 |
【機能】:ウィンドウ初期化処理 |
| 処理 |
ウィンドウ初期化処理
|
| 形式 |
Private Sub UserForm_Initialize() |
| 可視性 |
プライベート |
| 引数 |
なし |
| 関数名 |
OK_Click |
| 概要 |
【機能】:OKクリック処理 |
| 処理 |
「MAN_ManPowerAdjust」を実行する(現在行位置を渡す)
工数調整画面を閉じて(Unload)、「CHA_ChartReDisp」を実行する
|
| 形式 |
Private Sub OK_Click() |
| 可視性 |
プライベート |
| 引数 |
なし |
| 関数名 |
Cancel_Click |
| 概要 |
【機能】:キャンセルクリック処理 |
| 処理 |
工数調整画面を閉じる(Unload)
|
| 形式 |
Private Sub Cancel_Click() |
| 可視性 |
プライベート |
| 引数 |
なし |
| 関数名 |
KeyDownEv |
| 概要 |
|
| 処理 |
|
| 形式 |
Private Sub KeyDownEv(ByVal KeyCode As Integer) |
| 可視性 |
プライベート |
| 引数 |
|
| 関数名 |
MemberSelFlag_KeyDown |
| 概要 |
|
| 処理 |
|
| 形式 |
Private Sub MemberSelFlag_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer): KeyDownEv (KeyCode): End Sub |
| 可視性 |
プライベート |
| 引数 |
| KeyCode |
MSForms.ReturnInteger |
|
| Shift |
Integer): |
|
|
| 関数名 |
NonPreTaskFlag_KeyDown |
| 概要 |
|
| 処理 |
|
| 形式 |
Private Sub NonPreTaskFlag_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer): KeyDownEv (KeyCode): End Sub |
| 可視性 |
プライベート |
| 引数 |
| KeyCode |
MSForms.ReturnInteger |
|
| Shift |
Integer): |
|
|
| 関数名 |
AdjustKind1_KeyDown |
| 概要 |
|
| 処理 |
|
| 形式 |
Private Sub AdjustKind1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer): KeyDownEv (KeyCode): End Sub |
| 可視性 |
プライベート |
| 引数 |
| KeyCode |
MSForms.ReturnInteger |
|
| Shift |
Integer): |
|
|
| 関数名 |
AdjustKind2_KeyDown |
| 概要 |
|
| 処理 |
|
| 形式 |
Private Sub AdjustKind2_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer): KeyDownEv (KeyCode): End Sub |
| 可視性 |
プライベート |
| 引数 |
| KeyCode |
MSForms.ReturnInteger |
|
| Shift |
Integer): |
|
|
| 関数名 |
AdjustKind5_KeyDown |
| 概要 |
|
| 処理 |
|
| 形式 |
Private Sub AdjustKind5_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer): KeyDownEv (KeyCode): End Sub |
| 可視性 |
プライベート |
| 引数 |
| KeyCode |
MSForms.ReturnInteger |
|
| Shift |
Integer): |
|
|
| 関数名 |
OK_KeyDown |
| 概要 |
|
| 処理 |
|
| 形式 |
Private Sub OK_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer): KeyDownEv (KeyCode): End Sub |
| 可視性 |
プライベート |
| 引数 |
| KeyCode |
MSForms.ReturnInteger |
|
| Shift |
Integer): |
|
|
| 関数名 |
Cancel_KeyDown |
| 概要 |
|
| 処理 |
|
| 形式 |
Private Sub Cancel_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer): KeyDownEv (KeyCode): End Sub |
| 可視性 |
プライベート |
| 引数 |
| KeyCode |
MSForms.ReturnInteger |
|
| Shift |
Integer): |
|
|
|