☰

.doc를 .docx로 일괄 변환하시겠습니까(다른 사무실 형식에도 동일)?

tag-icon • tag-icon windows-xp microsoft-office conversion batch
.doc를 .docx로 일괄 변환하시겠습니까(다른 사무실 형식에도 동일)?

많은 수의 Office 파일을 최신 버전으로 변환하고 싶습니다. .doc를 .docx로 변환합니다. MS Office 응용 프로그램 파일 형식의 모든 차이에 대해 뭔가가 필요합니다.

작업에 가장 적합한 도구는 무엇입니까(Windows XP)?

나는 무료(맥주)를 찾고 있으며 많은 수의 파일을 관리할 수 있습니다(수동으로 파일을 열어 이 작업을 수행하는 것은 실행 가능하지 않습니다).

감사해요.

답변1

답변은 Word 문서뿐만 아니라 모든 문서를 변환하도록 구성되어 있습니다.

컴퓨터에 Office XP 또는 2003에서 작성된 수많은 Excel 시트, PowerPoint 프레젠테이션 및 Word 문서가 있다고 가정해 보겠습니다. 이러한 모든 파일을 새로운 Office 2007 형식으로 어떻게 변환합니까?

한 가지 옵션은 관련 Office 프로그램에서 모든 항목을 열고 최신 형식(docx, xlsx 또는 pptx)으로 수동으로 저장하는 것입니다. 또는 다음 단계에 따라 모든 문서를 한 번에 변환하세요.

1단계: 다운로드마이그레이션 관리자 키트새 폴더(예: c:\office)에 압축을 풉니다.

오피스팩

2단계: 다운로드 및 설치오피스 팩- 이 단계는 컴퓨터에 Microsoft Office 2007이 이미 설치되어 있는 경우에도 필요합니다.

3단계: c:\office 디렉터리에 Office Manager 파일을 추출했다고 가정하고 c:\office\tools로 이동하여 메모장을 사용하여 ofc.ini를 열고 다음 줄을 추가합니다.

fldr=c:\users\labnol\documents

이는 사무실 파일이 들어 있는 폴더 위치를 나타냅니다. 나는 이것을 내 문서 폴더로 가리키고 있지만 귀하의 컴퓨터에서는 다를 수 있습니다.

4단계: 명령 프롬프트를 열고 c:\office\tools로 이동합니다. 거기에서 ofc.exe라는 유틸리티를 볼 수 있습니다. 이는 모든 이전 Office 파일을 새로운 2007 Office 문서 형식으로 일괄 변환하는 Office 파일 변환기입니다. 달리다.

변환 문서

즉시 해당 폴더(및 하위 폴더)에 있는 모든 이전 Office 파일이 새 형식으로 변환되어 새 폴더에 저장됩니다.

이 유틸리티는 Word(doc에서 docx), Access 데이터베이스, PowerPoint(ppt에서 pptx), Visio 다이어그램, Excel(xls에서 xlsx) 및 Microsoft Project 파일에서 작동합니다. 그러나 암호로 보호된 문서의 경우 변환이 실패할 수 있습니다.

에서 가져옴여기.

답변2

다음과 같은VBA 매크로선택한 폴더의 모든 문서를 변환합니다

Sub SaveAllAsDOCX()
Dim strFileName As String
Dim strDocName As String
Dim strPath As String
Dim oDoc As Document

With Dialogs(wdDialogCopyFile)
If .Display <> 0 Then
strPath = .Directory
Else
MsgBox "Cancelled by User"
Exit Sub
End If
End With

If Documents.Count > 0 Then
Documents.Close SaveChanges:=wdPromptToSaveChanges
End If
If Left(strPath, 1) = Chr(34) Then
strPath = Mid(strPath, 2, Len(strPath) - 2)
End If
strFileName = Dir$(strPath & "*.doc")

While Len(strFileName) <> 0
Set oDoc = Documents.Open(strPath & strFileName)

strDocName = ActiveDocument.FullName
intPos = InStrRev(strDocName, ".")
strDocName = Left(strDocName, intPos - 1)
strDocName = strDocName & ".docx"
oDoc.SaveAs FileName:=strDocName, _
FileFormat:=wdFormatDocumentDefault
oDoc.Close SaveChanges:=wdDoNotSaveChanges
strFileName = Dir$()
Wend
End Sub

신용그레이엄 시장 - Word MVP

답변3

DOC를 DOCX로 대량 변환

Microsoft에는 여러 DOC 파일을 DOCX 파일로 변환할 수 있는 대량 변환 유틸리티가 있습니다. 이 블로그 게시물은 사용에 대한 매우 기본적인 정보를 제공합니다.

답변4

나는 이 솔루션을 다음에서 얻었으므로 이 솔루션에 대한 공로를 인정할 수 없습니다.마이크로소프트 포럼. 편의를 위해 여기에 다시 게시합니다.

  1. 모든 .doc 파일을 **D:\doc** 폴더에 넣습니다.

  2. Word를 열고 Alt+를 눌러 F11VBA 편집기를 엽니다.

  3. 이제 “를 클릭하세요.정상” 프로젝트를 클릭하고 “끼워 넣다" > "기준 치수”를 선택하여 프로젝트에 새 모듈을 삽입합니다.

  4. 모듈을 두 번 클릭하여 편집 영역을 열고 다음 코드를 붙여넣습니다.

     Sub TranslateDocIntoDocx()
   Dim objWordApplication As New Word.Application
   Dim objWordDocument As Word.Document
   Dim strFile As String
   Dim strFolder As String

   strFolder = "D:\doc\"
   strFile = Dir(strFolder & "*.doc", vbNormal)

   While strFile <> ""
     With objWordApplication      
       Set objWordDocument = .Documents.Open(FileName:=strFolder &strFile, AddToRecentFiles:=False, ReadOnly:=True, Visible:=False)

       With objWordDocument
         .SaveAs FileName:=strFolder & Replace(strFile, "doc", "docx"), FileFormat:=16
         .Close
       End With
     End With
     strFile = Dir()
   Wend   

   Set objWordDocument = Nothing
   Set objWordApplication = Nothing
 End Sub

  5. “를 클릭하세요.달리다"버튼. 몇 초 후에 모든 .doc 파일이 .docx 파일로 변환된 것을 확인할 수 있습니다. 원본 .doc 파일은 그대로 유지됩니다.

관련 정보