Um eine Comma Separated Value -Datei mit Anführungszeichen in Microsoft Excel 2007 zu speichern, müssen Sie ein VBA-Makro , um die Funktion zu erfüllen. Die Funktionalität , um Werte in Anführungszeichen exportieren wird nicht standardmäßig in Excel 2007 zur Verfügung gestellt. Doch viele Anwendungen, die CSV Importe akzeptieren erfordern auch die Anführungszeichen um Werte in der CSV-Datei . Erstellen Sie das Makro , indem Sie einen Code -Vorlage. Jedes Mal, wenn Sie brauchen, um eine CSV-Datei mit Zitaten zu speichern, verwenden Sie das Makro anstelle der Option "Speichern unter" . Wenn das Makro ausgeführt wird, öffnet sich ein "Speichern" -Box und die CSV-Datei wird mit Zitaten in Ort gespeichert. Anleitung
1
Öffnen Sie Microsoft Excel 2007.
2
Drücken Sie die "Alt " und " F11 "-Taste gleichzeitig , um den VBA-Editor zu öffnen.
3
Klicken Sie auf " Insert "-Option auf der oberen Navigationsleiste und dann auf "Module ".
4
Typ ( oder Kopieren und Einfügen ) das Skript unten in den VBA-Editor . Sub CSVQuotes () Dim
SrcRange Wie RangeDim CurrRow Wie RangeDim CurrCell Wie RangeDim CurrTextStr Wie StringDim ListSeparator Wie StringDim FileName As Variant
FileName = Application.GetSaveAsFilename ("", "CSV -Datei (*. csv) , * . csv " )
ListSeparator = Application.International ( xlListSeparator ) Wenn Selection.Cells.Count > 1 ThenSet SrcRange = SelectionElseSet SrcRange = ActiveSheet.UsedRangeEnd IfOpen FileName For Output As # 1Für Jeder CurrRow In SrcRange.RowsCurrTextStr = ìîFor Each CurrCell In CurrRow.CellsCurrTextStr = CurrTextStr & "" "" & CurrCell.Value & "" "" & ListSeparatorNextWhile Right ( CurrTextStr , 1 ) = ListSeparatorCurrTextStr = Left ( CurrTextStr , Len ( CurrTextStr ) - 1) WendPrint # 1, # 1 of CurrTextStrNextClose
End Sub
5
Schließen Sie den VBA-Editor , indem Sie auf das "X" in die obere rechte Ecke . Das Makro wird gespeichert.
6
Klicken Sie auf " Extras" -Option auf der oberen Navigationsleiste , und klicken Sie dann auf "Macro ".
7
Wählen Sie die "Macros " Option . Das neue Makro, mit dem Namen " CSVQuotes , " ist jetzt verfügbar.
8
Öffnen Sie die Excel-Datei zu exportieren CSV mit Zitaten . Nehmen Sie alle Änderungen an der Tabelle für den Export in die CSV -Datei-Format vorzubereiten.
9
Drücken Sie die "Alt" und "F8 "-Taste gleichzeitig , um die vorhandene Makros zu öffnen.
10
Klicken Sie auf die Option "Ausführen" neben dem " CSVQuotes " Makro, um das Skript auszuführen. Speichern einer Datei öffnet sich.
11
Geben Sie einen Namen für die CSV -Datei in den " File Name" Eingabefeld .
12
Klicken Sie auf die Schaltfläche "Speichern" . Die CSV-Datei exportiert wird, mit Zitaten .
