エクセルマクロで外部ファイルを開きたい

質問

エクセルマクロで外部ファイルを開きたい
エクセルのマクロをまだ詳しく知らないため、
ここで教えていただき一連の作業の最後にデータをクリップボードに
納めるところまでのマクロを作っていただきました。
そしてこのクリップされたデータをエディタソフト(Em-Editor)をその都度起動して張り付けています。
ついては使用中のマクロの中に外部ファイル（エディタ）を呼び出すところまでできれば
都合がいいのですが、手元にある解説書などを見ると
ファイルの呼び出しマクロはエクセルのワークブックのことしか記述してありません。
外部ファイル（エディタ・新規）をマクロで呼び出すことは可能でしょうか。
WindowsXP-SP3/Excel2003/

回答No.25

DOUGLAS_

今、落ち着いて、過去の「お礼」なり「補足」なりを読み返してみました。

　No23 の「Sub Using_Web_query()」を実行し、No12 の「お礼」に書かれている サイト の １ページ を ワークシート に展開してみました。

　確かに、No12 の「お礼」に書かれている
＞(13)（空欄）
＞(14)（空欄）
のような行が存在し、
＞(8)1:00
のような列の場合には、
＞(M～R)がエラー表示され
ますね。

--------------------------------

　話を掘り返すようですが、
＞※(15)からはグループ２になります。
というのは、Ａ列に
＞(15)０２：００／ＯＬＤＭＩＸ
というような表示がある場合のみ スタート 行になり、その他の場合には、スタート 行にはならない、と考えてよろしいでしょうか？【質問13】

　ただし
＞(8)1:00
のような、半角の「1:00」だけの場合は除く、でよろしいでしょうか？【質問14】

--------------------------------

　１つ分からないことがあるのですが、どうして
＞※(7)は不要行
＞この場合12も不要
なのでしょうか？

＞(7)・ Ａ４○○○ ／ Ｂ４△△ ＜ AA12348 ＞
も
＞(12)・ Ａ８○○○ ／ Ｂ８△△ ＜ AA12385 ＞
も、他の行と同じような内容ですが、これは noro6857 さんの「趣味」の問題で、たまたま削除しただけのお話しでしょうか？【質問15】

　それとも、
＞(8)1:00
で ブロック が２つに区切られているとして、ブロック 前半の最終行と、ブロック 後半の最終行は、常に対象外にする、つまり、削除する、という意味でしょうか？【質問15】

--------------------------------

　【質問13・14】の答えが私の考えている通りだとすると、グループ の区切りは、Ａ列の値から求めることができそうです。

　「ただし、例外があります」というようなお話しでしたら、振り出しに戻ります。

　【質問15】の答えが、noro6857 さんの「趣味」の問題ではなくて、後者の意味だとしたら、計算式を改善して、余分な削除の手作業を減らすことができるかも知れません。

--------------------------------

　なお、No23 の「Sub Using_Web_query()」を実行した後のように、ＷＥＢページ から データ を貼り付けたばかりの段階で、

Columns("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.ClearContents

という コード を実行すると、「Ａ列が空白」の行全体の計算式をいっぺんに削除する（空白にする）ことができます。
　「Ｍ列～Ｒ列」の計算式だけを削除することもできます。

　また、
Columns("A:A").SpecialCells(xlCellTypeConstants, 1).Offset(, 11).ClearContents

という コード を実行すると、「Ａ列が数値だけ」（例えば「1:00」）の行の Ｌ列の 計算式をいっぺんに削除する（空白にする）ことができます。

--------------------------------

　このように、変わらない規則がある場合には、煩雑な作業を、たった １行 の マクロ でやっつけてしまうこともできるのですが、【質問15】のように noro6857 さんの「趣味」の範囲で、「削除したりしなかったり」というような作業形態の場合には、マクロ による統一作業は相応しくありません。

お礼

【質問13】
セルの関数式にもあるように全角２：００の様な場合「：」があると、タイトル扱い（グループの先頭行）になります。例外はありません。
【質問14】
2:00のような半角はグループ内の途中区切りなのでエラーとなるためこれは空欄とし、前後は同一グループになります。
グループごとの区切りは空欄が何行（不定）か存在します。
【質問15】
これはソースを説明することになりますが、各データは１時間内に納まる曲が放送され、
時間内の最終曲は１曲納まらない場合、フェイドアウト、または演奏のみとなっています。
この演奏のみの場合は、アーチストの欄で判別できます。
これは時間調整的な内容ですので不要というわけです。
したがって最終曲が演奏者だったら削除、アーチストだったら取り込みます。
そのため、これを分けるには個人の判断が必要になってしまうのです。

なお書きの部分はＡデータからの判定で関数式でも可能かもしれません。（さすがに関数では式削除は不可ですが）
当然、マクロもありかもしれませんね。
今のところまだその余裕がないのですが検討の余地ありです。

補足

今
Sub Using_Web_query()
のマクロと
Columns("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.ClearContents
と
Columns("A:A").SpecialCells(xlCellTypeConstants, 1).Offset(, 11).ClearContents
を入れてやってみました。おお！すごいですね。
見事、空白行、式削除行ができあがっている！
いやぁ、エクセルってとんでもないことができるんですねぇ！
タイトルの■の前に数値の1が入ってしまうのでこれは関数で対処可能です
あとの手動削除だけはムリとしても、これは使う気になります。
思いがけない知識を得ました。

この場合、htmlのアドレス（たぶん日付が入る部分が変化）はその都度変わる訳ですが
日にち指定もできるとあったので、たぶんアドレス記入コードに指示を与えるようになるのでしょうが
これができたらサイトを開く必要もなさそうですね。

※補足欄は本来回答者が使用する欄らしいですが、回答の場所がなくていつも使ってしまいごめんなさい。