Excel VBA質問箱 IV

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

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


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

74554 / 76738

←次へ　｜　前へ→


	【6646】Re:ちょっと、訂正

こうき - 03/7/17(木) 9:26 -


	引用なし

	パスワード

▼ichinose さん：

>>いろんな設定をユーザーに選択させたいなら、
>>Excelに全部頼んでしまうと言う方法は？
>>'===========================================
>>Sub test()
>　　 on error resume next
>>　　Dim ans
>>　　ans = Application.Dialogs(xlDialogImportTextFile).Show
>　　 if err.number<>0 then ans=false
>>　　If ans = True Then
>>　　　 MsgBox "処理完了"
>>　　Else
>>　　　 MsgBox "処理中断"
>>　　　 End If
>　　 on error goto 0
>>End Sub
>>
>>どうでしょうか？

ユーザーがインポートの形式を選択する形になりますね。
こういう方法もあるという勉強になりました。
教えて頂いたコードを基にいろいろと加えてこれから試してみようと思います。
ありがとうございました。

0 hits

▼

【6639】テキストファイルのインポート こうき 03/7/16(水) 15:14