Excel VBA質問箱 IV

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

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


29627 / 76738 ←次へ | 前へ→

【52389】Re:ファイルの生成
発言  neptune  - 07/11/12(月) 14:17 -

引用なし
パスワード
   ▼kim さん:
こんにちは

>▼neptune さん:
>ご回答ありがとうございます。
>ですが、私の説明が言葉足らずであった為、今一度
>試したこととやりたいことを整理して書きます。
>(お手数おかけしてすみませんでした。)
今度は誰が読んでもよく解ると思います。

>
>■試したこと
>1.[挿入]→[オブジェクト]→[ファイルから]→ テキストファイルを挿入
>2.マクロの記録開始
>3.挿入したオブジェクトをダブルクリック
> (→メモ帳でファイルがオープンされた)
>4.メモ帳にてファイルの1行目をコピー
>5.マクロの記録終了
>
>マクロの記録には下記のコードしかありませんでした。
>
>  ActiveSheet.Shapes("Object 1").Select
>  Selection.Verb Verb:=xlPrimary
>
>■やりたいこと
>上記の4.でファイルの1行目を文字列(String型)のデータ
>として取得したいのです。
>Excelに挿入したオブジェクトに対して、TextStream型の
>ReadLineようなイメージでファイルの内容を取得したい
>のですが、・・・
少し検証してみました。

可不可は別として、思いつく方法としては
・上記の手操作をVBAで作る。これはAPIゴリゴリになります。
 (ちょっと試したけど、メモ帳の文字列データ取得で躓いてます。)
・ExcelBookをバイナリで読んで、そのファイルの文字列データを抜き取る
という方法が思いつきます。
 これはまだ試していません。・・多分試さないでしょう。

どちらにしても結構難易度高い(自分なりに自由にVBAを操れるスキルが必要と思う)です。

>いい方法はないでしょうか?
私の知識不足かもしれませんが、普通にFSOや、Openステートメントを
使うような簡単な方法は無いと思います。

もし、私が興味で作っても恐らくご自分でメンテナンスが出来ずに
困ると思いますので、別途ファイルを分けるか、Textをセルに入力して
配布する方法も検討する事をお勧めします。

0 hits

【52339】ファイルの生成 kim 07/11/9(金) 11:23 質問
【52345】Re:ファイルの生成 neptune 07/11/9(金) 18:45 回答
【52364】Re:ファイルの生成 kim 07/11/10(土) 23:37 質問
【52371】Re:ファイルの生成 neptune 07/11/11(日) 12:49 発言
【52366】Re:ファイルの生成 かみちゃん 07/11/10(土) 23:59 発言
【52377】Re:ファイルの生成 kim 07/11/11(日) 14:44 質問
【52378】Re:ファイルの生成 とおりすがり 07/11/11(日) 15:33 発言
【52379】Re:ファイルの生成 neptune 07/11/11(日) 18:46 回答
【52382】Re:ファイルの生成 kim 07/11/11(日) 22:08 質問
【52389】Re:ファイルの生成 neptune 07/11/12(月) 14:17 発言
【52390】Re:ファイルの生成 ichinose 07/11/12(月) 17:46 発言
【52395】Re:ファイルの生成 kim 07/11/12(月) 19:04 お礼
【52393】Re:ファイルの生成 kim 07/11/12(月) 18:43 お礼
【52403】Re:ファイルの生成 neptune 07/11/13(火) 10:45 発言
【52404】Re:ファイルの生成 kim 07/11/13(火) 12:27 お礼

29627 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free