利用Excel建立人体生物节律表

利用Ｅｘｃｅｌ建立人体生物节律表

Microsoft Excel是一款功能强大、使用方便的数据处理软件。它具有直观的操作界面、出色的计算功能和图表工具，可完成数据的计算、统计、分析等工作，并可生成精美直观的图表。本文介绍利用Microsoft Excel建立人体生物节律表的操作。

关键词：Microsoft Excel；人体生物节律；VBA；体力；情绪；智力

1人体生物节律介绍

人体生物节律理论起源于19世纪末20世纪初，由奥地利心理学家赫尔曼·斯瓦波达(Hermann Swoboda)、德国内科医生威尔赫母·弗里斯(Wilhelm Fliess)、澳大利亚机械工程学教授阿尔弗雷德·特尔茨谢尔(Alfred Teltscher)等人，通过对大量人群的统计发现，人自出生日起，体力、情绪、智力状态会随着时间的推移呈周期性波动变化。这种变化可以用正弦函数来描述。人出生时的初始状态值为0，随后按照固有周期在-1与1之间波动。该值为正时表示体力、情绪、智力饱满，等于或接近1时最强；该值为负时表示体力、情绪、智力疲软，等于或接近-1时最弱。这几位科学家经过统计分析得出人体生物节律的体力波动周期为23天、情绪波动周期为28天、智力波动周期为33天。

2制作人体生物节律表及图表

Microsoft Excel具有操作简单而功能强大的统计计算功能，通过它可以十分方便地计算出各种统计数据并制作出相应的图表。下面介绍利用Microsoft Excel 建立人体生物节律表及图表的操作过程，其制作过程及运行结果参考图1。

图1 利用Excel制作人体生物节律表及图表

1) 打开Microsoft Excel并建立空白文档

2) 输入个人信息

●在单元格A1、C1、E1中分别输入文本“姓名”、“出生日期”、“当前日期”；

●在单元格B1、D1、F1中分别输入读者姓名、出生日期、公式“=today()”，注意日期的格式为“年-月-日”，公式内的括号必须是半角括号；

●在单元格A2中输入文本“当前日期距出生日期的天数：”，单元格D2中输入公式“=F1-D1”，更改D2单元格的显示格式为“常规”格式(单击“格式”→“单元格”菜单命令，选择“数字”选项卡下的“常规”)；

●在单元格A3、C3、E3中分别输入文本“体力周期”、“情绪周期”、“智力周期”，单元格B3、D3、F3中分别输入数值“23”、“28”、“33”。

3) 建立人体生物节律表

●在单元格A5、B5、C5、D5、E5内分别输入文本“日期”、“相对日期”、“体力”、“情绪”、“智力”；

●在单元格B6至B36内输入数值0、1、2、…、30，单元格A6内输入公式

“=today()+B6”，单元格C6、D6、E6内分别输入公式：

C6：“=SIN(MOD(($D$2+B6),$B$3)/$B$3*2*3.1415926)”

D6：“=SIN(MOD(($D$2+B6),$D$3)/$D$3*2*3.1415926)”

E6：“=SIN(MOD(($D$2+B6),$F$3)/$F$3*2*3.1415926)”

注意公式内所有符号都必须是半角符号；

●将单元格A6、C6、D6、E6内的公式向下复制到区域A7~A36、C7~C36、D7~D36、E7~E36中。

4) 制作人体生物节律图表

●选择区域B5:E36；

●单击常用工具栏的“图表向导”按钮打开“图表向导”对话框；

●选择“XY 散点图”图表类型的“无数据点平滑线散点图”子类型，单击“完成”按钮完成图表的建立。

对建立好图表的显示格式进行适当修改，如增加图表宽度、添加图表标题、调整X轴与Y轴的刻度及字号属性等，参考图1所示的“人体生物节律图表”。

图表的横轴表示日期，最左端的0表示当前日期，数值每加1表示日期增加一天。图表的竖轴表示人体生物节律值，取值范围从-1到1，数值的大小表示人体生物水平的高低，1表示最佳状态，-1表示低谷状态，0为临界点，也是波动最大的状态。图表内的三条正弦曲线表示人体生物节律随时间的变化，其中蓝色曲线表示体力、紫色表示情绪、黄色表示智力。

3利用Microsoft VBA自动生成人体生物节律表及图表

上面介绍了利用Microsoft Excel的基本操作与图表功能建立人体生物节律表及图表的过程。下面介绍应用VBA程序设计在Excel内自动制作人体生物节律表及图表的操作。

1) 建立工作簿，并输入读者姓名与出生日期

●打开Microsoft Excel并建立空白工作簿；

●选择“sheet1”工作表，并将工作表名称更改为“Biorhythm”；

注意：由于在程序代码中需要引用工作表的名称，所以本操作必须按要求正确完成。

●在下列单元格内输入要求的内容：

■A1单元格内输入文本“姓名：”；

■B1单元格内输入读者的名字；

■C1单元格内输入文本“出生日期：”；

■D1单元格内输入读者的生日，要求按照“年- 月-日”的格式输入；

2)在工作表内添加命令按钮

●单击“视图”→“工具栏”→“控件工具箱”菜单命令显示出“控件工具箱”工具栏；

●单击“控件工具箱”工具栏上的“命令按钮”图标；

●在工作表下侧偏右位置用鼠标拖动出一个命令按钮；

●单击“控件工具箱”上的“属性”按钮打开命令按钮的属性窗口；

●在属性窗口内更改命令按钮的名称属性为“cmd计算”，更改Caption属性为“计算节律值”；

●利用同样方法制作第二个命令按钮，更改其名称为“cmd制表”、Caption属性为“制做图表”

3) 为命令按钮添加程序代码

●选择工作表内的“cmd计算”命令按钮，然后单击“控件工具箱”上的“查看代码”按钮打开Microsoft Visual Basic集成开发环境并进入“cmd计算”命令按钮的“单击事件”代码窗口；

●为工作表声明模块级变量、常量及输入“cmd计算”命令按钮的单击事件程序代码；

Option Explicit