VBAで外部ファイル（HTMLソース）を読み込んで書き込む時の問題 - OKWAVE
こんにちは。 > 4:tf.write strBuf '読み込んだ1行のデータ行を追加する この tf というのが、File System Object の Text Stream なら #1 ご回答のとおりです。 余計なお世話かもしれませんが、折角 File System Object を使っている なら、テキストを開く部分でも従来の Open ステートメントではなく、 Text Stream をもう一つ用意すれば良いのでは？ File System Object か Open ステートメントか、どちらかに統一した方が 良いと思います。 また、長くなるので下記ソースではやってませんが、ファイル入出力処理 はエラー発生時でもちゃんとファイルを閉じる処理を書いた方が良いです。 Sub Sample() Dim Fso As Object ' FileSystemObject Dim TS_
☆ Excelでお仕事！(Excel全般の解説サイト) ☆
Excelに関するサイトが数ある中、お越しいただいてまことにありがとうございます。 こちらは仕事に「Microsoft Excel」を活用しようという方を応援するサイトです。 一般事務作業でもプログラム開発分野でも、Microsoft Excelは非常に利用頻度の高いソフトです。 Excelは、ワープロソフトのような単なる文書作成ツールではなく、「データ処理」を行なうことができるもっとも身近なツールです。 豊富なツールや計算式、マクロ等を活用して仕事の合理化・迅速化・精度向上に役立ててもらいたいと思います。 そのために、各ジャンルで目的別のワンポイント集をできるだけ網羅しようとしています。ある程度Excelの経験がある人でも、目的を逆引きに利用していただくと面白い内容が見つかると思います。 また、「ダウンロード」コーナーには、Excelがインストールされていない環境でも利用できるフリーソフ
エクセルＶＢＡ 文字の置き換え - OKWAVE
こんにちは。 セルに色をつける必要がないなら、ループは不要です。 Sub い() ' // A1:A100 セルにある解約を解除に置換します。ループは不要。 Range(Cells(1, 1), Cells(100, 1)).Replace What:="解約", Replacement:="解除" End Sub セルに着色する場合でも、Excel2002 以降限定になりますが、 Sub う() ' // A1:A100 セルにある解約を解除に置換し、セル着色 Application.ReplaceFormat.Interior.Color = vbRed Range(Cells(1, 1), Cells(100, 1)) _ .Replace What:="解約", _ Replacement:="解除", _ ReplaceFormat:=True End Sub とするとループが不
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Excel VBA 入門講座