1
 Abra Microsoft Excel 2007 . 
 
 2 Pulse las teclas de " F11 " al mismo tiempo para abrir el editor de VBA "Alt " y . 
 
 3 
 Haga clic en la opción "Insertar " de la barra de navegación superior y luego haga clic en " módulos". 
 4 
Escriba (o copie y pegue) el siguiente script en el editor de VBA. CSVQuotes ( Sub ) guía
 SrcRange As RangeDim CurrRow Como RangeDim CurrCell Como RangeDim CurrTextStr Como StringDim ListSeparator Como StringDim NombreArchivo As Variant 
 
 filename = Application.GetSaveAsFilename ("", "Archivo CSV (*. csv ) , * . csv " ) 
 
 ListSeparator = Application.International ( xlListSeparator ) Si Selection.Cells.Count > 1 ThenSet SrcRange = SelectionElseSet SrcRange = ActiveSheet.UsedRangeEnd IfOpen nombre de archivo de salida como # 1 Para Cada CurrRow En SrcRange.RowsCurrTextStr = ìîFor Cada CurrCell En CurrRow.CellsCurrTextStr = CurrTextStr & "" "" & CurrCell.Value & "" "" & Derecho ListSeparatorNextWhile ( CurrTextStr , 1 ) = ListSeparatorCurrTextStr = izquierda ( CurrTextStr , Len ( CurrTextStr ) - 1 ) WendPrint # 1 , # 1 CurrTextStrNextClose 
 
 End Sub 
 5 
 Cierre el editor de VBA , haga clic en la "X" en la la esquina superior derecha. La macro se guarda . 
 6 
 clic en la opción " Herramientas " en la barra de navegación superior y , a continuación, haga clic en "Macro ". 
 7 
 Seleccione la opción " Macros " . La nueva macro , llamada « CSVQuotes ", ya está disponible. 
 8 
 Abra el archivo Excel para exportar a CSV entre comillas. Haga todos los cambios para preparar la hoja de cálculo para la exportación al formato de archivo CSV. 
 9 
 Pulse las teclas " F8 " simultáneamente para abrir la lista de macros existente " Alt " y . 
 10 
 Haga clic en la opción "Ejecutar" al lado de la macro " CSVQuotes " para ejecutar el script. Se abrirá un cuadro de Guardar Archivo . 
 11 
 Escriba un nombre para el archivo CSV en la casilla " Nombre de archivo " . 
 12 
 clic en el botón " Guardar" . El archivo CSV se exporta, con citas . 
 
 
          
