Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

49042 / 76732

←次へ　｜　前へ→


	【32614】Re:Wクリックで画像を挿入するには再投稿

Kein - 05/12/19(月) 16:46 -


	引用なし

	パスワード

>FName = Application.GetOpenFilename
の直後に

If FName = "False" Then Exit Sub

が無いからです。ま、この書き方には何とおりかあって
>Dim WDT, HGT, CTP, CLF, PWD, PHT, FName
というように全部 Variant型で宣言しているなら

If TypeName(FName) = "Boolean" Then Exit Sub

とか

If VarType(FName) = 11 Then Exit Sub

などでも結構です。要は、キャンセルを押したときの"定石"とも言うべきコードが
抜けているからエラーになる、ということです。

1 hits

▼

【31027】Wクリックで画像を挿入するには よしお 05/11/9(水) 14:49