本人用繁体中文做文件,但每次均要转成简体给同事用,为简化工作,想到用VFP写个小程序来代替,在WORD下,录制了繁转简的宏代码,但在VFP程序引用,提示’语法错误’,恳请各位大神帮忙,不胜感激!!


      *2018-07-08

*在WORD錄制的宏代碼

Sub 宏99()
'
' 宏99
' 繁體中文轉成簡體中文
'
    WordBasic.ToolsTCSCTranslate Direction:=0, Varients:=0, TranslateCommon:=0
End Sub

*以下為在VFP6.0下寫的小程序

    *1設定對象
     public oWord
     oWord=Createobject("Word.Application")      
      
    *2打開文檔
    oDoc=oWord.Documents.Open("D:\9001\word-all\12.docx")
    oWord.Visible=.f. &&不顯示文檔
 
  *3轉繁體中文為簡體中文      
oWord.WordBasic.ToolsTCSCTranslate Direction:=0,Varients:=0,TranslateCommon:=0

    *上句(oWord....)會提示: ‘語法錯誤’ /2018-07-08

    oWord.Visible=.T. &&顯示文檔

 *4存檔,退出        
                oDoc.save
                oDoc.Close
                oWord.Quit      
 
     *2018-07-08

     非常感謝各位版主/大神們的指教,幫助!!!
     謝謝!!!

我的疑問已圓滿解決,再次感謝各位版主的幫助,謝謝!!!