Buenas tardes estuve haciendo esta pequeña macro para abrir un archivo csv,
pero al importar la columna F, no me esta respetando el formato de texto que
le pongo, me pone formato general, ya movi configuracion de la maquina
separador de listas y tampoco, espero me puedan ayudar por favor ya que
cuando hago la macro grabandola paso por paso, si me lo pone correcto, el
problema es cuando la corro por segunda vez ya no me respeta los formatos de
texto de dicha columna.
Array(6, 2)
Sub aefaefaef()
'
'
Workbooks.Open Filename:="O:\Remate\Actual\REMATE_POSTURAS_20080826.csv"
Columns("A:A").Select
Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False,
Tab:=False, _
Semicolon:=False, Comma:=True, Space:=False, Other:=False, FieldInfo _
:=Array(Array(1, 2), Array(2, 5), Array(3, 2), Array(4, 2), Array(5,
2), Array(6, 2), _
Array(7, 1), Array(8, 1), Array(9, 1), Array(10, 1), Array(11, 1),
Array(12, 1), Array(13, 1 _
), Array(14, 1), Array(15, 2), Array(16, 2), Array(17, 1)),
TrailingMinusNumbers:= _
True
End Sub
Muchas gracias.
Leer las respuestas