共通変数を書き忘れていました。
Formモジュールの頭の方で下記を宣言して置きます。

Dim serSec As Single
Dim canFlg As Integer