開発マイルストーン  Version 1.12

モジュール名：M14_CFG_ConfProc 設定をスケジュールに反映する ■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 【モジュール】:設定モジュール 【 概 要 】:設定をスケジュールに反映する 【 作 成 者 】: zudajijp 【 作 成 日 】: 2007/06/20 【 特記事項 】: ■■■■■■■■■■■■■■■■■■■■■■■■■■■■ 　　一覧へ  プロシジャー一覧 　プロシジャー名　 　概要　 CFG_WorksheetClick_Conf_G 【機能】：「設定」シート:ワークシートクリック時の処理 CFG_WorksheetChange_Conf_G 【機能】：「設定」シート:ワークシート変更時の処理 CFG_WorksheetChange_Conf 【機能】：「設定」ワークシートが変更された時の処理 CFG_ItemDispSwitch_All 【機能】：全項目の表示切替 CFG_DispUnitChange 【機能】：「設定」シート：表示単位変更 CFG_PeriodAdjust 【機能】：「設定」シート：表示期間調整 CFG_DispFlagGet 【機能】：表示フラグを取得する CFG_NonDispFlagGet 【機能】：非表示フラグを取得する CFG_CellFormatCopy 【機能】：「設定」シート：指定セルからのセル書式コピー CFG_CellSet 【機能】：セル書式を指定セルに反映 CFG_CellSet1 【機能】：セル書式を指定セルに反映 CFG_CellSet_StrFormat 【機能】：文字書式を指定セルに反映 CFG_CellSet1_StrFormat 【機能】：文字書式を指定セルに反映 CFG_CellSet_StrColor 【機能】：文字色を指定セルに反映 CFG_CellSet1_StrColor 【機能】：文字書式を指定セルに反映 CFG_CellSet_Color 【機能】：セル色を指定セルに反映 CFG_CellLineCopy 【機能】：「設定」シート：指定セルからの罫線書式コピー CFG_SetCellLine1 【機能】：罫線書式を指定セルに反映 CFG_SetCellLine2 【機能】：罫線書式を指定セルに反映 CFG_SetShapeLine 【機能】：図形(線)の書式変更 CFG_SetShapeBox 【機能】：図形(Box)の書式変更 CFG_DataCopy_Conf 【機能】：Worksheet間での指定セルコピー CFG_DataCopy_Conf_ONOFF 【機能】：Worksheet間での指定セルコピー(ON/OFF) CFG_DataCopy_Conf_Range 【機能】：Worksheet間での指定セル(範囲)コピー CFG_CellNameChange 【機能】：セル名変更処理 CFG_CellNameChange_Ver109 【機能】：Ver1.09以前からデータ移行する場合の補完処理 CFG_DataCopyProc 【機能】：別のExcelファイルからのデータ移行処理 CFG_TemplateCopy 【機能】：テンプレートのコピー処理 CFG_TemplateSet1 【機能】：「設定」シートのテンプレート１を設定に反映する CFG_TemplateSet2 【機能】：「設定」シートのテンプレート２を設定に反映する CFG_TemplateGet1 【機能】：「設定」シートの設定をテンプレート１に反映する CFG_TemplateGet2 【機能】：「設定」シートの設定をテンプレート２に反映する CFG_FileNameGet 【機能】：「設定」シートからファイル名書式を取得する CFG_BackgroundImageGet 【機能】：背景画像ファイル名を「背景画像設定」に設定 CFG_WindowFrameFix 【機能】：チャート設定でのウィンドウ枠固定  プロシジャー記述書 　関数名　 　CFG_WorksheetClick_Conf_G　 概要 【機能】：「設定」シート:ワークシートクリック時の処理 処理 「設定」シートのワークシートがクリックされた時、セル位置によりポップアップを表示する ・「開始日/作業日設定(休/出)/現在日」:カレンダー ・「チャート種類」:図形選択 ※「CMD_WorkSheetExec」から呼び出される 形式 Sub CFG_WorksheetClick_Conf_G(ByVal s As String) 可視性 パブリック 引数 s String セルRange 　関数名　 　CFG_WorksheetChange_Conf_G　 概要 【機能】：「設定」シート:ワークシート変更時の処理 処理 「設定」シートのワークシートが変更された時、「CFG_WorksheetChange_Conf」をコールする ※「CMD_WorkSheetExec」から呼び出される 形式 Sub CFG_WorksheetChange_Conf_G(ByVal s As String) 可視性 パブリック 引数 s String セルRange 　関数名　 　CFG_WorksheetChange_Conf　 概要 【機能】：「設定」ワークシートが変更された時の処理 処理 「設定」シートが変更された時、セル位置「期間/表示単位/チャート種類/線の幅/抽出」などによって処理を行う 形式 Sub CFG_WorksheetChange_Conf(ByVal Target As Range) 可視性 パブリック 引数 Target Range Rangeオブジェクト 　関数名　 　CFG_ItemDispSwitch_All　 概要 【機能】：全項目の表示切替 処理 「スケジュール」シートの全項目の表示/非表示を切り替える 形式 Sub CFG_ItemDispSwitch_All() 可視性 パブリック 引数 なし 　関数名　 　CFG_DispUnitChange　 概要 【機能】：「設定」シート：表示単位変更 処理 「設定」シートの「表示単位」を変更する 形式 Function CFG_DispUnitChange(flg As Boolean) 可視性 パブリック 引数 flg Boolean [true]:時刻削除 戻り値 Variant 　関数名　 　CFG_PeriodAdjust　 概要 【機能】：「設定」シート：表示期間調整 処理 列最大255と表示項目から表示可能期間を計算し、「設定」シートの「期間」を変更する 形式 Function CFG_PeriodAdjust() As Long 可視性 パブリック 引数 なし 戻り値 Long 　関数名　 　CFG_DispFlagGet　 概要 【機能】：表示フラグを取得する 処理 「設定シート」から表示フラグを取得する 形式 Function CFG_DispFlagGet(Name As String) As Boolean 可視性 パブリック 引数 Name String セル名 戻り値 Boolean [True]ON, [False]OFF 　関数名　 　CFG_NonDispFlagGet　 概要 【機能】：非表示フラグを取得する 処理 「設定シート」から非表示フラグを取得する CFG_DispFlagGet:[True]OFF, [False]ON 形式 Function CFG_NonDispFlagGet(Name As String) As Boolean 可視性 パブリック 引数 Name String セル名 戻り値 Boolean 　関数名　 　CFG_CellFormatCopy　 概要 【機能】：「設定」シート：指定セルからのセル書式コピー 処理 指定セル(nm)から「セル名/フォント(サイズ/太さ/下線/色)/表示形式/文字位置/セル色/値」を取得し、セル書式(r)に格納する 形式 Sub CFG_CellFormatCopy(r As Type_CellForm, nm As String) 可視性 パブリック 引数 r Type_CellForm セル書式 nm String セル名称 　関数名　 　CFG_CellSet　 概要 【機能】：セル書式を指定セルに反映 処理 セル書式(form)の「フォント(サイズ/太さ/下線/色)/表示形式/文字位置/セル色」を、セル(r)に反映する 形式 Sub CFG_CellSet(ByVal r As Range, form As Type_CellForm) 可視性 パブリック 引数 r Range Rangeオブジェクト form Type_CellForm セル書式 　関数名　 　CFG_CellSet1　 概要 【機能】：セル書式を指定セルに反映 処理 「設定」シートの標準セル(nm)から「フォント(サイズ/太さ/下線/色)/表示形式/文字位置/セル色」を取得し、セル(r)に反映する 形式 Sub CFG_CellSet1(ByVal r As Range, nm As String) 可視性 パブリック 引数 r Range Rangeオブジェクト nm String セル名称 　関数名　 　CFG_CellSet_StrFormat　 概要 【機能】：文字書式を指定セルに反映 処理 セル書式(form)の「フォント(サイズ/太さ/下線/色)/表示形式」を、セル(r)に反映する 形式 Sub CFG_CellSet_StrFormat(ByVal r As Range, form As Type_CellForm) 可視性 パブリック 引数 r Range Rangeオブジェクト form Type_CellForm セル書式 　関数名　 　CFG_CellSet1_StrFormat　 概要 【機能】：文字書式を指定セルに反映 処理 「設定」シートの標準セル(nm)から「フォント(サイズ/色)/表示形式」を取得し、セル(r)に反映する 形式 Sub CFG_CellSet1_StrFormat(ByVal r As Range, nm As String) 可視性 パブリック 引数 r Range Rangeオブジェクト nm String セル名称 　関数名　 　CFG_CellSet_StrColor　 概要 【機能】：文字色を指定セルに反映 処理 セル書式(form)の「フォント(色)」を、セル(r)に反映する 形式 Sub CFG_CellSet_StrColor(ByVal r As Range, form As Type_CellForm) 可視性 パブリック 引数 r Range Rangeオブジェクト form Type_CellForm セル書式 　関数名　 　CFG_CellSet1_StrColor　 概要 【機能】：文字書式を指定セルに反映 処理 「設定」シートの標準セル(nm)から「フォント(色)」を取得し、セル(r)に反映する 形式 Sub CFG_CellSet1_StrColor(ByVal r As Range, nm As String) 可視性 パブリック 引数 r Range Rangeオブジェクト nm String セル名称 　関数名　 　CFG_CellSet_Color　 概要 【機能】：セル色を指定セルに反映 処理 「設定」シートの標準セル(nm)から「セル色」を取得し、セル(r)に反映する 形式 Sub CFG_CellSet_Color(ByVal r As Range, nm As String) 可視性 パブリック 引数 r Range Rangeオブジェクト nm String セル名称 　関数名　 　CFG_CellLineCopy　 概要 【機能】：「設定」シート：指定セルからの罫線書式コピー 処理 「設定」シートの標準セルから罫線書式「線書式/線太さ/線色」を取得し、罫線書式(r)に格納する 形式 Sub CFG_CellLineCopy(r As Type_LineForm, pos1 As Integer) 可視性 パブリック 引数 r Type_LineForm 罫線書式 pos1 Integer 罫線位置(xlEdgeTop/xlEdgeLeft/xlEdgeBottom/xlEdgeRight) 　関数名　 　CFG_SetCellLine1　 概要 【機能】：罫線書式を指定セルに反映 処理 罫線書式(form)の「線書式/線太さ/線色」を、セル(r)に反映する 形式 Sub CFG_SetCellLine1(ByVal r As Range, pos1 As Integer, form As Type_LineForm) 可視性 パブリック 引数 r Range Rangeオブジェクト pos1 Integer 罫線位置(設定先)(xlEdgeTop/xlEdgeLeft/xlEdgeBottom/xlEdgeRight)、[0]:セルの外周 form Type_LineForm 罫線書式 　関数名　 　CFG_SetCellLine2　 概要 【機能】：罫線書式を指定セルに反映 処理 罫線書式(form)の罫線書式「線書式/線太さ/線色」を、セル(r)に反映する 形式 Sub CFG_SetCellLine2(ByVal r As Range, pos1 As Integer, form As Type_LineForm) 可視性 パブリック 引数 r Range Rangeオブジェクト pos1 Integer 罫線位置(設定先)(xlEdgeTop/xlEdgeLeft/xlEdgeBottom/xlEdgeRight)、[0]:セルの外周 form Type_LineForm セル書式 　関数名　 　CFG_SetShapeLine　 概要 【機能】：図形(線)の書式変更 処理 「設定」シートの図形(nm)から「線書式」を取得し、図形(Square)に反映する 形式 Sub CFG_SetShapeLine(ByVal Square As Shape, nm As String) 可視性 パブリック 引数 Square Shape Shapeオブジェクト nm String 図形名称 　関数名　 　CFG_SetShapeBox　 概要 【機能】：図形(Box)の書式変更 処理 「設定」シートの図形(nm)から「書式」を取得し、図形(Square)に反映する 形式 Sub CFG_SetShapeBox(ByVal Square As Shape, nm As String) 可視性 パブリック 引数 Square Shape Shapeオブジェクト nm String 図形名称 　関数名　 　CFG_DataCopy_Conf　 概要 【機能】：Worksheet間での指定セルコピー 処理 Worksheet間で指定セル(nm)をコピーする 形式 Sub CFG_DataCopy_Conf(ByRef w_src As Worksheet, ByRef w_dst As Worksheet, nm As String, fm As Integer) 可視性 パブリック 引数 w_src Worksheet コピー元Worksheet w_dst Worksheet コピー先Worksheet nm String セル名称 fm Integer [1]:セル書式もコピー 　関数名　 　CFG_DataCopy_Conf_ONOFF　 概要 【機能】：Worksheet間での指定セルコピー(ON/OFF) 処理 Worksheet間で指定セル(nm)をコピーする 形式 Sub CFG_DataCopy_Conf_ONOFF(ByRef w_src As Worksheet, ByRef w_dst As Worksheet, nm As String, Optional fm As Integer) 可視性 パブリック 引数 w_src Worksheet コピー元Worksheet w_dst Worksheet コピー先Worksheet nm String セル名称 fm Integer ダミー 　関数名　 　CFG_DataCopy_Conf_Range　 概要 【機能】：Worksheet間での指定セル(範囲)コピー 処理 Worksheet間で指定セル(nm1〜nm2)をコピーする 形式 Sub CFG_DataCopy_Conf_Range(ByRef w_src As Worksheet, ByRef w_dst As Worksheet, nm1 As String, nm2 As String, fm As Integer) 可視性 パブリック 引数 w_src Worksheet コピー元Worksheet w_dst Worksheet コピー先Worksheet nm1 String セル名称(開始) nm2 String セル名称(終了) fm Integer [1]:セル書式もコピー 　関数名　 　CFG_CellNameChange　 概要 【機能】：セル名変更処理 処理 形式 Function CFG_CellNameChange(bname As String, sname As String, src As String, dst As String) As Boolean 可視性 パブリック 引数 bname String book名 sname String sheet名 src String 変換元 dst String 変換先 戻り値 Boolean 　関数名　 　CFG_CellNameChange_Ver109　 概要 【機能】：Ver1.09以前からデータ移行する場合の補完処理 処理 Ver1.09からの移行用 形式 Sub CFG_CellNameChange_Ver109(s_src As String) 可視性 パブリック 引数 s_src String book名 　関数名　 　CFG_DataCopyProc　 概要 【機能】：別のExcelファイルからのデータ移行処理 処理 別のExcelファイルから「スケジュール/標準工程/担当者一覧/設定」シートに対して「一覧表書式/日時表示形式/状態設定/日程表書式」などをコピーする 形式 Sub CFG_DataCopyProc() 可視性 パブリック 引数 なし 　関数名　 　CFG_TemplateCopy　 概要 【機能】：テンプレートのコピー処理 処理 指定セルsrc(〜num行)をコピー先セルdstにコピーする 形式 Sub CFG_TemplateCopy(src As String, dst As String, num As Integer) 可視性 パブリック 引数 src String コピー元セル名 dst String コピー先セル名 num Integer 相対行位置 　関数名　 　CFG_TemplateSet1　 概要 【機能】：「設定」シートのテンプレート１を設定に反映する 処理 「設定」シートのテンプレート１から「一覧表書式/日時表示形式/状態設定/日程表書式/背景画像設定」を設定に反映する 形式 Sub CFG_TemplateSet1() 可視性 パブリック 引数 なし 　関数名　 　CFG_TemplateSet2　 概要 【機能】：「設定」シートのテンプレート２を設定に反映する 処理 「設定」シートのテンプレート２から「一覧表書式/日時表示形式/状態設定/日程表書式/背景画像設定」を設定に反映する 形式 Sub CFG_TemplateSet2() 可視性 パブリック 引数 なし 　関数名　 　CFG_TemplateGet1　 概要 【機能】：「設定」シートの設定をテンプレート１に反映する 処理 「設定」シートの設定から「一覧表書式/日時表示形式/状態設定/日程表書式/背景画像設定」をテンプレート１に反映する 形式 Sub CFG_TemplateGet1() 可視性 パブリック 引数 なし 　関数名　 　CFG_TemplateGet2　 概要 【機能】：「設定」シートの設定をテンプレート２に反映する 処理 「設定」シートの設定から「一覧表書式/日時表示形式/状態設定/日程表書式/背景画像設定」をテンプレート２に反映する 形式 Sub CFG_TemplateGet2() 可視性 パブリック 引数 なし 　関数名　 　CFG_FileNameGet　 概要 【機能】：「設定」シートからファイル名書式を取得する 処理 「設定」シートからファイル名書式を取得し、変換した文字列を返す 形式 Function CFG_FileNameGet(kind As String, Name As String) As String 可視性 パブリック 引数 kind String 「設定」シートの該当セル名称 Name String "*"と置換する文字列 戻り値 String 　関数名　 　CFG_BackgroundImageGet　 概要 【機能】：背景画像ファイル名を「背景画像設定」に設定 処理 ファイル入力画面から背景画像ファイル名を取得し、「背景画像設定」を設定する 形式 Sub CFG_BackgroundImageGet() 可視性 パブリック 引数 なし 　関数名　 　CFG_WindowFrameFix　 概要 【機能】：チャート設定でのウィンドウ枠固定 処理 「TSK_BaseDateMake」から呼ばれ、ウィンドウ枠を固定(解除)する 形式 Sub CFG_WindowFrameFix() 可視性 パブリック 引数 なし

Copyright (c) 2007-2009 zudajijp. All Rights Reserved.