保健室利用データ_マクロ実行前 1.xlsm 仕様書

概要

ファイル名: 保健室利用データ_マクロ実行前 1.xlsm
シート数: 20
VBAモジュール数: 23
VBA保護: なし

シート一覧

保健室利用
マスタ情報
月別利用者数集計
保健室月別来室者グラフ
保健室月別来室者グラフ（男女別）
【外科】日別利用者数集計
【内科】日別利用者数集計
【その他】日別利用者数集計
曜日別利用者数集計
個人別利用回数集計
症状別集計（クラス別）
症状別集計（月別）
けが別集計（クラス別）
けが別集計（月別）
場合別集計（クラス別）
場合別集計（月別）
場所別集計（クラス別）
場所別集計（月別）
部位別集計（クラス別）
部位別集計（月別）

VBAモジュール

ThisWorkbook (class)

行数: 72
プロシージャ数: 2

プロシージャ一覧

名前	種別	アクセス	戻り値	行数
Workbook_Open	sub	Private	-	6
Workbook_Activate	sub	Private	-	11

Workbook_Open

種別: sub
アクセス修飾子: Private
位置: 行 42 - 47

シグネチャ:

Private Sub Workbook_Open()

Workbook_Activate

種別: sub
アクセス修飾子: Private
位置: 行 59 - 69

シグネチャ:

Private Sub Workbook_Activate()

Sheet12 (sheet)

行数: 10
プロシージャ数: 0

Sheet1 (sheet)

行数: 10
プロシージャ数: 0

Sheet3 (sheet)

行数: 10
プロシージャ数: 0

Sheet6 (sheet)

行数: 10
プロシージャ数: 0

Sheet4 (sheet)

行数: 10
プロシージャ数: 0

Sheet5 (sheet)

行数: 10
プロシージャ数: 0

Sheet7 (sheet)

行数: 10
プロシージャ数: 0

Calc (standard)

行数: 2842
プロシージャ数: 9

プロシージャ一覧

名前	種別	アクセス	戻り値	行数
CalcCount	sub	Public	-	1274
MakeTable	sub	Public	-	866
SetPrintArea	sub	Public	-	64
DelSheet	sub	Public	-	53
InitSheet	sub	Public	-	82
SetArray	sub	Public	-	84
FindCol	function	Public	Integer	26
ConvChr	function	Public	String	31
GraphDataSet_Monthly	sub	Private	-	103

CalcCount

種別: sub
アクセス修飾子: Public
位置: 行 46 - 1319

シグネチャ:

Public Sub CalcCount()

MakeTable

種別: sub
アクセス修飾子: Public
位置: 行 1490 - 2355

パラメータ:

n: Integer
intMax: Integer

シグネチャ:

Public Sub MakeTable(n As Integer, intMax As Integer)

SetPrintArea

種別: sub
アクセス修飾子: Public
位置: 行 2360 - 2423

パラメータ:

n: Integer

シグネチャ:

Public Sub SetPrintArea(n As Integer)

DelSheet

種別: sub
アクセス修飾子: Public
位置: 行 2428 - 2480

パラメータ:

n: Integer

シグネチャ:

Public Sub DelSheet(n As Integer)

InitSheet

種別: sub
アクセス修飾子: Public
位置: 行 2485 - 2566

シグネチャ:

Public Sub InitSheet()

SetArray

種別: sub
アクセス修飾子: Public
位置: 行 2573 - 2656

パラメータ:

n: Integer
blnGrdTtl: Boolean

シグネチャ:

Public Sub SetArray(n As Integer, blnGrdTtl As Boolean)

FindCol

種別: function
アクセス修飾子: Public
位置: 行 2662 - 2687
戻り値型: Integer

パラメータ:

strTitle: String

シグネチャ:

Public Function FindCol(strTitle As String) As Integer

ConvChr

種別: function
アクセス修飾子: Public
位置: 行 2698 - 2728
戻り値型: String

パラメータ:

n: Integer

シグネチャ:

Public Function ConvChr(n As Integer) As String

GraphDataSet_Monthly

種別: sub
アクセス修飾子: Private
位置: 行 2732 - 2834

シグネチャ:

Private Sub GraphDataSet_Monthly()

Sheet11 (sheet)

行数: 10
プロシージャ数: 0

Sheet8 (sheet)

行数: 10
プロシージャ数: 0

Sheet23 (sheet)

行数: 10
プロシージャ数: 0

Sheet18 (sheet)

行数: 10
プロシージャ数: 0

Sheet17 (sheet)

行数: 10
プロシージャ数: 0

Sheet19 (sheet)

行数: 10
プロシージャ数: 0

Sheet20 (sheet)

行数: 10
プロシージャ数: 0

Sheet13 (sheet)

行数: 10
プロシージャ数: 0

Sheet14 (sheet)

行数: 10
プロシージャ数: 0

Sheet15 (sheet)

行数: 10
プロシージャ数: 0

Sheet16 (sheet)

行数: 10
プロシージャ数: 0

Sheet2 (sheet)

行数: 10
プロシージャ数: 0

Sheet9 (sheet)

行数: 10
プロシージャ数: 0

Common (standard)

行数: 232
プロシージャ数: 11

プロシージャ一覧

名前	種別	アクセス	戻り値	行数
xCLng	function	Public	Long	17
xCInt	function	Public	String	17
dateToWarekiNendo	function	Public	String	21
seirekiToWarekiNendo	function	Public	String	14
seirekiToWarekiNendoOrg	function	Public	String	14
dateToWarekiNendoGengo	function	Public	String	21
dateToWarekiGengo	function	Public	String	8
seirekiToWarekiNendoGengo	function	Public	String	13
seirekiToWarekiGengo	function	Public	String	9
dateToWarekiNengappi	function	Public	String	25
dateToWarekiNengappiOrg	function	Public	String	25

xCLng

種別: function
アクセス修飾子: Public
位置: 行 7 - 23
戻り値型: Long

パラメータ:

var: Variant

シグネチャ:

Public Function xCLng(var As Variant) As Long

xCInt

種別: function
アクセス修飾子: Public
位置: 行 28 - 44
戻り値型: String

パラメータ:

var: Variant

シグネチャ:

Public Function xCInt(var As Variant) As String

dateToWarekiNendo

種別: function
アクセス修飾子: Public
位置: 行 49 - 69
戻り値型: String

パラメータ:

Hiduke: Date

シグネチャ:

Public Function dateToWarekiNendo(Hiduke As Date) As String

seirekiToWarekiNendo

種別: function
アクセス修飾子: Public
位置: 行 74 - 87
戻り値型: String

パラメータ:

seirekiNen: Integer

シグネチャ:

Public Function seirekiToWarekiNendo(seirekiNen As Integer) As String

seirekiToWarekiNendoOrg

種別: function
アクセス修飾子: Public
位置: 行 92 - 105
戻り値型: String

パラメータ:

seirekiNen: Integer

シグネチャ:

Public Function seirekiToWarekiNendoOrg(seirekiNen As Integer) As String

dateToWarekiNendoGengo

種別: function
アクセス修飾子: Public
位置: 行 110 - 130
戻り値型: String

パラメータ:

Hiduke: Date

シグネチャ:

Public Function dateToWarekiNendoGengo(Hiduke As Date) As String

dateToWarekiGengo

種別: function
アクセス修飾子: Public
位置: 行 135 - 142
戻り値型: String

パラメータ:

Hiduke: Date

シグネチャ:

Public Function dateToWarekiGengo(Hiduke As Date) As String

seirekiToWarekiNendoGengo

種別: function
アクセス修飾子: Public
位置: 行 147 - 159
戻り値型: String

パラメータ:

seirekiNen: Integer

シグネチャ:

Public Function seirekiToWarekiNendoGengo(seirekiNen As Integer) As String

seirekiToWarekiGengo

種別: function
アクセス修飾子: Public
位置: 行 164 - 172
戻り値型: String

パラメータ:

seirekiNen: Integer

シグネチャ:

Public Function seirekiToWarekiGengo(seirekiNen As Integer) As String

dateToWarekiNengappi

種別: function
アクセス修飾子: Public
位置: 行 178 - 202
戻り値型: String

パラメータ:

Hiduke: Date
strSplit: String = "d"

シグネチャ:

Public Function dateToWarekiNengappi(Hiduke As Date, strSplit As String = "d") As String

dateToWarekiNengappiOrg

種別: function
アクセス修飾子: Public
位置: 行 208 - 232
戻り値型: String

パラメータ:

Hiduke: Date
strSplit: String = "d"

シグネチャ:

Public Function dateToWarekiNengappiOrg(Hiduke As Date, strSplit As String = "d") As String