ActiveX Data Objects (ADO) 让我们能够用一个工具来操作SQL Server, Access DB, Worksheet

ADO有很多用法，首先介绍一个：把excel中的表用SQL语法来处理

使用ADO流程是

• 建立连接
• 写SQL语句
• 执行SQL语句

要使用ADO，首先要打开编辑VBA的界面，上面的菜单栏里面有一个是Tools，点击Tools, 里面找到reference。勾选上Microsoft ActiveX Data Objects 6.1 Library（如果没有6.1版本，也可以用2.8版本）

建立连接的基本语法如下

Dim Con as new ADODB.Connection
Con.Open "Connection string" 
        '运行SQL语句
Con.Close

这里的connection string需要根据不同的Excel版本确定

https://www.connectionstrings.com/ 这个网站提供了不同情况下需要用到的connection string

我的excel版本是2016，我用的connection string如下

strFileName=ThisWorkbook.Fullname
"Provider=Microsoft.ACE.OLEDB.12.0; Data Source=" & strFileName & "; Extended Properties=""Excel 12.0 Macro;HDR=Yes"";"

就可以成功连接到目前用的工作表啦

大家都知道如何安装CRAN的R包，只要输入

install.packages("包名称")

就可以直接从CRAN下载包啦！
但是有的包CRAN中没有，只有Github版本。这个时候我们需要用一个叫做devtools的工具帮我们的忙啦！
一般的流程是

install.packages('devtools')

library(devtools)

devtools::install_github("你要下载的包的github网页路径")

但是我自己实际测试之中出现了如下的Bug：

Error: Failed to install 'unknown package' from GitHub:
schannel: failed to receive handshake, SSL/TLS connection failed

好叭。
只能手动从Github下载包辽。
下载好zip文件解压之后之后在R中输入如下指令：

install("解压后的文件路径")

大功告成！

第二步是运行SQL。首先讲讲SELECT要怎么用

• 创建新对象：Recordset，用于储存SELECT运行出来的结果

Dim rs As New ADODB.Recordset
'如果你想要运行SQL的表是一个命了名的区域
strSQL="SELECT * FROM range"
’如果要运行的表是一整个worksheet
‘如果数据超过65536行，由于一个excel bug，只能用下面这种方法引用表
strSQL="SELECT * FROM [Sheet1$\$$]"
'如果是一个未命名区域
strSQL="SELECT * FROM [Sheet1$\$$A1:O60]"
'con是刚刚用到的ADO connection
rs.Open strSQL, con
rs.Close

• 把运行出来的结果保存到一个新建的excel表

Dim ws As Worksheet
        Set ws = output 'Application.Sheets.Add
        ws.Cells.ClearContents
        'Write the header
        Dim i As Long
        For i = 0 To rs.Fields.Count - 1
            ws.Cells(1, i + 1).Value2 = rs.Fields(i).Name
        Next i
        ws.Range("A2").CopyFromRecordset rs

完整代码如下

Sub ADOBD_SELECT()
Dim strFileName As String
Dim ConnectionString As String
'Fullname means the folder path is included
strFileName = ThisWorkbook.FullName

'From website https://www.connectionstrings.com/
'HDR=Yes -> my data set has heading
ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=" & strFileName & "; Extended Properties=""Excel 12.0 Macro;HDR=Yes;"";"

Dim conn As New ADODB.Connection
'Recordset: where the result of the query will be placed
Dim rs As New ADODB.Recordset
Dim strSQL As String
'Write the query
strSQL = Range("Query")
conn.Open ConnectionString
        rs.Open strSQL, conn
        Dim ws As Worksheet
        Set ws = output 'Application.Sheets.Add
        ws.Cells.ClearContents
        'Write the header
        Dim i As Long
        For i = 0 To rs.Fields.Count - 1
            ws.Cells(1, i + 1).Value= rs.Fields(i).Name
        Next i
        ws.Range("A2").CopyFromRecordset rs
        rs.Close
conn.Close
Set conn = Nothing
Set rs = Nothing
End Sub

小珂珂是 ActuaryGarden 公司的精算实习生，这天，她在做精算表写VBA的时候遇到了一个问题。
她手上目前有两套精算假设，想利用这两套假设计算年金现值a，还有定期寿险现值A。

因为不想重复工作，她想到，每一套假设都可以看作一个Object呀！可以利用Class model来避免重复工作。
可以把利息率和死亡率设置成Class module的属性，计算A和a设置成Class model的方法~

说了这么多，其实CP3考试最大的要点还是多练习，多比较答案和自己写的内容的不同。

我也提供一对一CP3咨询和课程服务。会在第一节课主要讲考试技巧，之后的课程专注于考试练习。详情可以联系公众号后台。

考试技巧 (基于Course Note和我对考试答案的总结）

如何选择合适的语言

首先要了解你的听众的学术背景。如何从题目中了解？有两个方面。

• 问题中是如何描述听众的角色的？比如说金融从业人员比HR了解的金融知识多。
• 从你的听众使用的语言中进行判断。

如何选择语言？

• 使用术语会被扣分，如果真的要使用的话需要在文章中进行明确定义
• 小技巧：多描述术语的用途而不是它的算法，加例子进行解释 （Probability应该被换成likelihood / chance，Mortality rate可以换成Probability of death at a given age，Morbidity Rate可以换成Sickness rate）

如何justify自己使用的语言（是CP3考试最后10%的部分）
一般描述某个术语0.5分，描述它为什么对于特定听众是术语0.5分。

• 描述自己听众的特质
• 描述考试问题中听众不会听懂的术语
• 描述没有在考试问题中出现的，如果对于一个更有技术背景的听众可以讲的，但是这个听众不能理解的术语
• 例子： The survey on impact of price increases could be discussed as price elasticity. However, this would be a term unfamiliar to Mrs Freshman
• 描述这个听众应该了解的术语，并描述你是如何定义或者解释的
  例子：I have introduced Mrs Freshman to the concept of profit margin as it is a key financial driver and the new law impacts results
• 对于可能涉及Financial Advise的题目要注意不要给出建议！如何回答怎么避免给出建议的题目：
  Use of sections in the letter clearly distinguishes between positive sides and downsides
  The risk and opportunities sections are of a similar size and weight so as to avoid over-emphasising one over the other.
  Language used avoided any hyperbole or emotion.
  Statements are supported by verifiable data.
  The investor is left to make up his own mind...
  ... no suggestion is made (implicitly or explicitly) that ...

如何展现数字

该展示多少信息？

• 在可以说明要点的同时，使用最少的语言或者数字。
• 在可以说明要点的同时，使用最少的细节。比如在说明房价的时候，一般不需要保留至两位小数，而保留到十位或者百位就可以。

如何使用数字例子

• 最好用简短粗略的计算，只要说明自己的意思即可。

如何JUSTIFY使用数字信息的方式

• 描述题目中没有展现清楚的数字
• 解释自己要补充数字例子的理由， 比如
  the information has been simplified so as to remove an unnecessary level of distracting detail.
  the audience is not particularly technical and will not understand, or need to understand, how I have calculated the figures in the example.
  it is not necessary to include the information on ... in order to meet the objectives in communicating- 在展现数字的过程中可以使用图表的方式
• 答题一般最好有两个或者多个图表。

需要注意

• 图表中不要展现太多信息，只要表达要点即可。
• 除了图表本身，我们需要用文字的形式去解读图表，不这样做的话听众可能会用不同方式来看这个图表。图表只能用来支持文字表达的内容，而不能代替文字本身。
• 表的标签需要特别注意。因为写标签的地方很小，我们可能会一不注意就用了没有标注的术语或简写。

图表需要有

• 名称
• x轴和y轴的意义 （！我自己经常忘记标注）
• 如果有不止一个数据集，需要有合适的图标
• 最好用图片的方式从Excel把图表插入Word

如何JUSTIFY使用图表的原因

• 描述影响到使用图表选择的听众的相关特质
• 图表是如何帮助进行交流的
• both tables and charts were used so as "to add variety to the document"
  使用某一形式图表的原因，比如
  pie charts are effective at showing the split of a total
  bar charts are good at making comparisons
  line graphs are suitable for showing trends in data
  brevity, as lengthy tables can be hard for non-technical audiences to read
  focus, as tables attempting to communicate more than a couple of key messages can be hard for non-technical audiences to understand.

答题过程

需要花一定的时间先想好写什么，再下笔。

五个步骤：RASER

R: read
读题的过程中主要抓取的信息是
涉及的沟通对象
大概涉及哪些方面的内容
大致的写作风格

A: ask
写作的对象是什么人？
交流的目标是什么？想要达成的目的是什么？

S: select and sequence
要表达的关键点是什么，要描述哪些点来达到我的目标。

E: expand
从上面的想法和要点出发，开始写草稿。

R: review
需要做三种不同的回顾检查。
写作对象检查
准确性检查
语法检查
如果沒有做好这五点，那么就可能犯下面的常见错误：

使用了太多术语
结构混乱
写很多没有抓住要点的东西
很多语法错误
不专业的写作风格
没有回答到要点
给出了太多细节

选择内容，调整顺序

有五种常见的文章结构，不过用的最多的还是Top-Down或者Bottom-Up。
我比较喜欢的是用Top-Down的方式-- 先给结论然后再给论证。一般考官会找结论句，它能够占至少一分

Top Down
写出文章的结论，推荐接下来的行动
写这样推荐的原因
列出相关的事实

Bottom Up
介绍这篇文章的目的
回顾当下状况
找到问题
列出或者形容现有的可能选项
做出结论
推荐接下来怎么做
问听众有没有什么问题
如何回答为什么挑选这些信息 / 为什么选择这种结构的题目
形容使得你选择这个结构的听众的相关特质
比如给Senior或者需要快速得到结论的人看文章，那么最好把结论放到前面。
描述沟通的目的
如果结论是不受欢迎的，可能选择Bottom-up的写作方式，把结论放在后面。

如何行文

标题和小标题
大多数商业对话都会有一个清晰的标题。在CP3中，对于标题和小标题的使用是必须的。有两个原因

• 它们可以迅速向读者展示文章内容
• 它们可以引导读者了解全文信息和文章所展现的分析
• 标题的评分点一般是看有没有用到一些关键词。

段落
段落的要点是：

为新的主题或者想法开启一个新的段落
每段用一个开篇语总结这个新主题
每段最后的结束语可以

• 强调主旨
• 总结
• 提出结论
• 引领下一段
  应该避免很多小段落！平均而言每个段落应该有3-4句话。
  评分标准里一般会建议3-5个Section!! 段落和段落之间应该有流畅的逻辑关系。
  句子
  Simple, direct, clear
  避免写太长的句子。尽量用短且精炼的句子来表达你想说的内容。最好一句话在15词左右。
  超过35个词的句子会被扣分！

布局建议

• 多用一些空格！密集的文字会让读者很难follow。

如何写总结和结论

• 不要教育你的读者！只要给他们他们需要知道的信息。
• 尽量少用数学和数字来和你的读者交流。
• 不要用复杂的语言和术语。哪怕题目中有术语，也不意味着你可以直接用！只有当这些术语对于读者来说可以理解的时候才能用这些术语。比如说读者自己用过或者读者有相关背景。
• 试图用读者的视角想答案。
• 让你的回答越简单越好

很荣幸在4月的考试中可以一次考下CP3，正式从考试层面成为AIA。写一下我对CP3考试的心得，希望对大家有所帮助。

CP3和其它科目不同，它考察的不是知识水平，而是通过文字进行交流沟通的能力。所有的考试题目都是模拟真实工作中会遇到的情景，而我们的回答也要尽量贴近真实工作中会进行的沟通内容。我认为通过CP3需要达成下面几点

• [1]知道如何可以把自己的意思表达给听众 (50%) -> 平时工作中的锻炼和考试练习很重要。
• [2]英语语言水平 (20%) -> 雅思写作6 - 6.5应该是足够的。我和一些其他一次过的朋友写作都在6.5左右。
• [3]考试技巧 (30%) -> 练习考试题目，并且和答案对照，找到丢分点针对练习。可以参考下文内容。

我本人没有花很多时间复习，Course Note很快就能看完，练习了大概4-5篇文章左右。因为[1]和[2]基本过关，我的练习主要是针对考试技巧方面。

一些来源于其它小伙伴的考试技巧有

• 多写多刷题，写完之后找个既懂英文又不懂精算的朋友，把background material和你写的东西给他帮你看，如果他看完还有问题的话就重新写一份儿。
• BPP （ActEd）那個1 天CP3/ CP2 preparation day 很有用。

考试形式

线上考试。考试的三天前会收到一些文章进行阅读，文章的内容大概是一些数据，和一些相关的背景内容。背景内容有很多是和后面的考试无关的干扰信息。考试当天是三小时的线上笔试，笔试的内容和三天前的给文章相关。

考试分两个部分，第一个部分是写一个report，占90%的分数，第二个部分是要写自己为什么这么写report，占10%的分数。

1656423090374-示例数据.zip