본문/내용
■다이얼로그시트에 의한 매크로■
Sub 성명매크로()
성명 = DialogSheets(`인사관리작성`).EditBoxes(`성명상자`).Text
Sheets(`인사관리`).Select
Range(`A4`).Select
ActiveCell.FormulaR1C1 = 성명
End Sub
Sub 부서매크로()
부서 = DialogSheets(`인사관리작성`).EditBoxes(`부서상자`).Text
Sheets(`인사관리`).Select
Range(`B4`).Select
ActiveCell.FormulaR1C1 = 부서
End Sub
Sub 기본급매크로()
기본급 = DialogSheets(`인사관리작성`).EditBoxes(`기본급상자`).Text
Sheets(`인사관리`).Select
Range(`C4`).Select
ActiveCell.FormulaR1C1 = 기본급
End Sub
Sub 상여금매크로()
상여금 = DialogSheets(`인사관리작성`).EditBoxes(`상여금상자`).Text
Sheets(`인사관리`).Select
Range(`D4`).Select
ActiveCell.FormulaR1C1 = 상여금
End Sub
Sub 야간수당매크로()
야간수당 = DialogSheets(`인사관리작성`).EditBoxes(`야간수당상자`).Text
Sheets(`인사관리`).Select
Range(`E4`).Select
ActiveCell.FormulaR1C1 = 야간수당
End Sub
Sub 출장비매크로()
출장비 = DialogSheets(`인사관리작성`).EditBoxes(`출장비상자…