问题：ppt记分到指定（没有就创建）的工作簿中，有两处出问题。

weiyingde

代码见附件ppt中，Excel文件为两次启动ppt得到的结果。虽是目标样式，但它是ppt多次出问题，断续得到的结果，这说明程序存在bug，
预想可能是逻辑问题。
请大侠帮忙。
程序的要求是：

功能：此ppt要实现提问登记得分的功能。

要求：选择班级、学生、得分，点击登记。程序要走的过程是：
1、判断Excel程序是否启动，启动了就指定此程序，没有就启动并指定它；
2、判断目标位置是否有指定命名的工作簿，若没有就用指定或启动的Excel程序新建一个指定的工作簿；
   如果已经存在，再判断：
   （1）如果指定的工作簿已打开，就指定它；
   （2）如果没有打开，就用Excel程序打开并指定它。
3、判断是否有需要等分班级的工作表，有就指定他，没有新建并指定它。
4、在需要登分的工作表中，本ppt中的标题、文本和相关班级的学生名单写到指定的地方。
5、再把该学生的得分，填到目标地方。

weiyingde

再次求救，大侠路过援手，在此等候并先谢致敬。

weiyingde

一直在尝试解决问题，可不知为何，求救了，大侠援手。

weiyingde

已经自我解决问题，谢谢各位的关注。