Wie wird mit Zitaten in Excel 2007 speichern

May 19

Um eine durch Kommas getrennte Werte-Datei mit Zitaten in Microsoft Excel 2007 speichern, müssen Sie schreiben, ein VBA-Makro, um die Funktion zu erreichen. Die Funktion zum export der Werte, die in doppelte Anführungszeichen eingeschlossen ist nicht standardmäßig in Excel 2007 bereitgestellt. Dennoch erfordern viele Anwendungen, die CSV-Importe akzeptieren auch die doppelten Anführungszeichen, die Werte werden in der CSV-Datei. Erstellen Sie das Makro mit einer Codevorlage. Verwenden Sie jedes Mal Sie eine CSV-Datei mit Zitaten, speichern müssen das Makro anstelle der Option "Speichern unter". Wenn das Makro ausgeführt wird, ein Feld "Speichern" wird geöffnet und die CSV-Datei mit Anführungszeichen im Ort gespeichert.

Anweisungen

1 Öffnen Sie Microsoft Excel 2007.

2 Drücken Sie die Tasten "Alt" und "F11" gleichzeitig, um den VBA-Editor zu öffnen.

3 Klicken Sie die Option "Einfügen" auf der oberen Navigationsleiste und dann auf "Module".

4 Geben Sie (oder kopieren Sie und fügen Sie ein) das folgende Skript in den VBA-Editor. Sub CSVQuotes()

Dim SrcRange As RangeDim CurrRow As RangeDim CurrCell As RangeDim CurrTextStr As StringDim ListSeparator As StringDim Dateiname als Variante

FileName = Application.GetSaveAsFilename ("", "CSV-Datei (CSV), CSV")

ListSeparator = Application.International(xlListSeparator)Wenn Selection.Cells.Count > 1 dannSet SrcRange = AuswahlSonstSet SrcRange = ActiveSheet.UsedRangeEndIfOffenen Dateinamen für die Ausgabe als #1Für jede CurrRow In SrcRange.RowsCurrTextStr = ÌîFür jede CurrCell In CurrRow.CellsCurrTextStr = CurrTextStr & "" "& CurrCell.Value &" "" & ListSeparatorNächsteWährend rechts (CurrTextStr, 1) = ListSeparatorCurrTextStr = Left (CurrTextStr, Len(CurrTextStr) - 1)WendPrint #1, CurrTextStrNächste#1 zu schließen

EndSub

5 Schließen Sie den VBA-Editor durch Klicken auf das "X" in der oberen rechten Ecke. Das Makro wird gespeichert.

6 Klicken Sie die Option "Tools" auf der oberen Navigationsleiste und dann auf "Makro."

7 Wählen Sie "Makros". Das neue Makro mit dem Namen "CSVQuotes," ist jetzt verfügbar.

8 Öffnen Sie die Excel-Datei mit Anführungszeichen in CSV exportieren. Stellen Sie alle Bearbeitungsschritte für den Export in das CSV-Dateiformat die Tabellenkalkulation vorzubereiten.

9 Drücken Sie die Tasten "Alt" und "F8" gleichzeitig, um die vorhandenen Makros öffnen.

10 Klicken Sie auf die Option "Ausführen" neben dem "CSVQuotes"-Makro zum Ausführen des Skripts. Eine Datei speichern-Dialogfenster wird geöffnet.

11 Geben Sie einen Namen für die CSV-Datei in das Eingabefeld "Dateiname".

12 Klicken Sie auf "Speichern". Die CSV-Datei wird exportiert, mit Zitaten.