如何实现分段计价功能

例题描述

Excel文件中有两个表,表一中的电价、备注需要根据充电开始时间查询表二中对应时段的电价和备注。如下图所示:

实现步骤

1、  运行集算器

可去润乾官网下载职场版,同时下载一个免费授权就够了,首次运行时会提示加载。

2、  编写脚本:

把代码列出来看得清楚点:

A1复制Excel中B2-F39区域的数据,在集算器中双击A1,按Ctrl+V把数据复制到A1格中

B1复制Excel中H2-K7区域的数据,在集算器中双击B1,按Ctrl+V把数据复制到B1格中

A2把A1中的数据读成序表,选项@t表示首行是列标题

B2把B1中的数据读成序表,选项@t表示首行是列标题

A3取B2中的开始时间列的所有值组成序列

A4循环A2中每一行

B4查询充电开始时间在A3中的分段区间中的段号

B5如果段号为0(即0到6点),则改为第5段(22点以后)

B6将电价设为B2中对应时间段的电价

B7将备注设为B2中对应时间段的备注

A8取A2中的电价、备注列转成字符串后放到剪贴板中

3、  按F9运行程序,运行结束后再回到Excel文件,点击E3,按Ctrl+V就可以把剪贴板中的数据粘贴过来。如下图所示:

【附件】fdjj.zip

你可能感兴趣的:(如何实现分段计价功能)