Estoy tratando de acceder a un archivo de texto (CSV) de excel y cuando hago
mi consulta me sale el error, Fuente de Datos incompleta.
En realidad no he tenido mucha experiancia accediendo a archivos de texto y
menos por el excel, asi que no se que esta mal, quizas esta mal la cadena de
coneccion o no se... aqui les pongo el codigo que estoy usando.
Sub Macro2()
With
ActiveSheet.QueryTables.Add(Connection:="OLEDB;Provider=Microsoft.Jet.OLEDB.
4.0;Data Source=\\cgarcia\cotizaciones\;Extended
Properties=""text;HDR=Yes;FMT=Delimited""", Destination:=Range("A1"))
.CommandText = Array("Select * From Junio2004")
.Name = "Consulta a Texto"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = True
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.PreserveColumnInfo = True
.Refresh BackgroundQuery:=False
End With
End Sub
Espero me puedan ayudar esta vez.
Saludos a todos.
> ... acceder a un archivo de texto (CSV) de excel ... me sale el error, Fuente de Datos incompleta [...]
cuando 'construyes' [en la cadena de conexion] 'la parte' =>de la 'fuente de datos'<= :((
tu cadena de conexion 'dice': =>...;Data Source=\\cgarcia\cotizaciones\;...<=
[aparentemente] NO le estas 'indicando' la ruta =>completa<= al archivo [CSV ???]
[se supone que...] 'espera' que le indiques =>Unidad:\Directorio\Sub carpetas\Nombre del archivo Y EXTension<=
p.e. c:\cgarcia\cotizaciones\archivo.csv [o... c:\cgarcia\cotizaciones\archivo.txt] ;)
¿comentas datos adicionales?
saludos,
hector.
Connection:="OLEDB;Provider=Microsoft.Jet.OLEDB.
4.0;Data Source=\\cgarcia\cotizaciones\;Extended
Una vez que has terminado el proceso de seleccion del driver para texto y has selecionado el archivo de texto y salvado el query en un archivo ejecuta el proceso grabando la macro. En esta ocasion no nesecitas volver a crear el Data Source sino que seleccionarlo de la lista ya creada. Ahi lo encontraras con el nombre que le definiste cuando lo creaste. Continua con todo el proceso hasta que importas los datos en tu hoja de calculo y finalizas la grabacion de la macro para ejecutarla posteriormente.
--
David Canales
"Cesar Garcia Hernandez" <zap...@hotmail.com> escribió en el mensaje
news:ebsJ067T...@TK2MSFTNGP10.phx.gbl...