VB.NET Word文章をテキストに変換するには？ (ID：115406)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

>wdFormatTextって変数ですか？
WdSaveFormat クラスの定数です。ワードのヘルプで
SaveAs メソッドを調べれば分かることですが…。
[VB.NET]でのフルの名前空間は
  Word.WdSaveFormat.wdFormatText
となります。…これも[VB.NET]のオブジェクト
ブラウザで検索すればすぐに引っかかります。

結局、さんたくんさんの[VB6]のコードはワードの
Object Library オブジェクトライブラリを参照する
事によってワードにテキストファイルを作成するように
命令してます。つまり[VB6]側では特別な処理をして
いません。[VB.NET]に移行してもこの手法は有効で、
コードもほぼそのまま利用できます。
[VB.NET]
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim wAppFullPath As String = System.Reflection.Assembly.GetExecutingAssembly.Location
        Dim wAppFolderPath As String = System.IO.Path.GetDirectoryName(wAppFullPath)

Dim wdApp As New Word.Application
        Dim wdDoc As Word.Document
        Dim strTemplate As String

wdDoc = wdApp.Documents.Open(wAppFolderPath & "\TEST.doc")

'テキストファイルを作成
        wdDoc.SaveAs(wAppFolderPath & "\TESTdoc.txt", Word.WdSaveFormat.wdFormatText)

wdDoc.Close()
        wdDoc = Nothing
        wdApp.Quit()
        wdApp = Nothing

MsgBox("ファイルを作成しました")

End Sub

←解決時は質問者本人がここをチェックしてください。

戻る