%3F.png)
Ich möchte eine große Anzahl von Office-Dateien in neuere Versionen konvertieren, z. B. .doc in .docx. Ich brauche etwas für alle unterschiedlichen Dateitypen der MS-Office-Anwendungen.
Welches ist das beste Werkzeug für diese Aufgabe (Windows XP)?
Ich suche etwas Kostenloses (Bier) und kann eine große Anzahl von Dateien verwalten (das manuelle Öffnen von Dateien ist einfach nicht praktikabel).
Danke.
Antwort1
Die Antwort ist so strukturiert, dass alle Dokumente konvertiert werden, nicht nur Word-Dokumente.
Angenommen, Sie haben jede Menge Excel-Tabellen, PowerPoint-Präsentationen und Word-Dokumente auf Ihrem Computer, die in Office XP oder 2003 geschrieben wurden. Wie konvertieren Sie all diese Dateien in das neue Office 2007-Format?
Eine Möglichkeit besteht darin, dass Sie alle Dokumente im zugehörigen Office-Programm öffnen und manuell im neueren Format (docx, xlsx oder pptx) speichern. Oder folgen Sie diesen Schritten und konvertieren Sie alle Dokumente auf einmal.
Schritt 1: HerunterladenMigration Manager-Kitund extrahieren Sie es in einen neuen Ordner, beispielsweise: c:\office.
Büropaket
Schritt 2: Downloaden und installieren Sie dieBüropaket– dieser Schritt ist erforderlich, auch wenn Microsoft Office 2007 bereits auf Ihrem Computer installiert ist.
Schritt 3: Angenommen, Sie haben die Office Manager-Dateien im Verzeichnis c:\office\tools extrahiert, gehen Sie zu c:\office\tools, öffnen Sie ofc.ini mit dem Editor und fügen Sie die folgende Zeile hinzu.
fldr=c:\Benutzer\labnol\Dokumente
Dies bezieht sich auf den Ordner, in dem Ihre Office-Dateien gespeichert sind. Ich verweise hier auf meinen Ordner „Dokumente“, aber auf Ihrem Computer könnte es anders sein.
Schritt 4: Öffnen Sie die Eingabeaufforderung und gehen Sie zu c:\office\tools. Dort sehen Sie ein Dienstprogramm namens ofc.exe – das ist der Office-Dateikonverter, der alle alten Office-Dateien in großen Mengen in das neue Office-Dokumentformat 2007 konvertiert. Führen Sie es aus.
Dokumente konvertieren
Alle alten Office-Dateien in diesem Ordner (und Unterordnern) werden sofort in das neue Format konvertiert und in einem neuen Ordner gespeichert.
Dieses Dienstprogramm funktioniert mit Word- (doc zu docx), Access-Datenbanken, PowerPoint- (ppt zu pptx), Visio-Diagrammen, Excel- (xls zu xlsx) und Microsoft Project-Dateien. Bei kennwortgeschützten Dokumenten kann die Konvertierung jedoch fehlschlagen.
Genommen vonHier.
Antwort2
Die folgendevba-Makrokonvertiert alle Dokumente in einem ausgewählten Ordner
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
Gutschrift anGraham Mayor – Wort-MVP
Antwort3
Massenkonvertierung von DOC in DOCX
Microsoft verfügt über ein Dienstprogramm zur Massenkonvertierung, mit dem mehrere DOC-Dateien in DOCX-Dateien konvertiert werden können. Dieser Blogbeitrag enthält grundlegende Informationen zu seiner Verwendung.
Antwort4
Ich kann diese Lösung nicht für mich beanspruchen, da ich sie vonMicrosoft-Foren. Der Einfachheit halber hier noch einmal gepostet:
Legen Sie alle .doc-Dateien in einem Ordner ab, z. B. **D:\doc**.
Öffnen Sie Word und drücken Sie Alt+ F11, um den VBA-Editor zu öffnen.
Klicken Sie nun auf „Normal” Projekt und klicken Sie auf „Einfügen” > “Modul“, um ein neues Modul in das Projekt einzufügen.
Doppelklicken Sie auf das Modul, um den Bearbeitungsbereich zu öffnen, und fügen Sie den folgenden Code ein:
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
Klicken "Laufen”-Schaltfläche. Sekunden später werden Sie feststellen, dass alle .doc-Dateien in .docx-Dateien konvertiert wurden. Die ursprünglichen .doc-Dateien bleiben erhalten.