无惧混杂手账统计更简单

平淡

○獲取消费数据

手机备忘录里的数据一般是无法直接导入到Excel中的，因此我们需要手动提取。以华为手机操作为例，打开保存消费数据的备忘录后在空白处长按，选中所有的内容并单击“复制”（图1），然后利用手机QQ、手机微信等将其发送到电脑中。

○提取消费金额和日期

现在启动Excel，将接收到的内容粘贴到新建工作表1的A2单元格中。由于消费金额和日期是混杂在一起的，我们还需要将它们提取到不同的列中（图2）。数据提取可以通过VBA快速地完成，步骤如下：

1.到“https：//share.weiyun.com/D1eToWtD”下载所需的代码，然后在记事本程序中打开，全选代码并复制到剪贴板中备用。接着返回Excel窗口，按下“Alt+F11”快捷键打开VBA编辑窗口，依次点击“插入→模块”，将刚刚复制到剪贴板中的内容粘贴到代码输入框中（图3）。代码的主要作用是通过正则表达式对选择的数据进行遍历查询，然后将其中的数字依次提取到对应的列中。比如将A 2单元格中的数字依次提取到B2单元格、C2单元格、D2单元格……。

2.返回Excel窗口，选中A 2：A7区域，依次点击“开发工具→ 宏”，在弹出的对话框中选择“提取所有数字”的宏，再点击“执行”，这样上述的VBA脚本就会自动地将A列中的所有数字（包括日期）提取到B、C、D……等列中（每列一个数字）（图4）。

3.从图4中可以看出，在B列中提取到的是非标准格式的日期，我们还要将其转换为标准日期。选中B2：B7区域后按下“Ctrl+H”快捷键打开“查找和替换”对话框，在“查找内容”处输入“.”，“替换为”处输入“-”（半角符号），然后点击“全部替换”（图6）。替换完后，再将B2：B7单元格的格式设置为“日期”即可。