|
▼kobasan さん:
朝早くからありがとうございます。
下記を組み入れたところ
> '選択範囲がセル以外の時のエラー回避
> If Not TypeOf Target Is Range Then Exit Sub
> 'セルの選択範囲が1つ以上の時のエラー回避
> If Target.Count > 1 Then Exit Sub
正常に動いてます(T_T)
Targetの選択が複数のセルのだったから型が一致しないというエラーがでたんですね。
If Not TypeOf Target Is Range Then Exit Sub
これがなぜ入れられているのかが理解出来ませんがコントロール用なのでしょうか?
>On Error Resume Next はエラー内容が分かっていて、そのエラーをうまく利用するときに使うといいです。
>どんなエラーが起こっているか分からないまま使うと、逆に予期せぬ弊害が発生して、訳が分からなくなります。
これからは肝に命じておきます。忠告ありがとうございます。
ともかくアドバイスの内容も理解出来ないという、自分の知識不足を改めて実感しました。この作品が完成するまで、これからが思いやられます。
kobasan さん
neptune さん
ありがとうございました。
また投稿を見かけたときはよろしくお願いします。
|
|