Comentarios en: Exporta Automaticamente DataTable a Microsoft Excel

Por: f.delgado

f.delgado — Thu, 12 Jan 2012 00:17:44 +0000

Oye el codigo no me funciona me marca un erro en da.fill (ds)

el error me marca que no se encontro sqlException

me puedes ayudar

Por: Patricia

Patricia — Thu, 17 Nov 2011 16:22:01 +0000

Gracias!!! Fue de mucha ayuda

Por: neji

neji — Tue, 15 Nov 2011 00:33:05 +0000

muy bueno, felicidades, son de los mejores post que he leido y consultado

Por: Exporta Automaticamente DataTable a Microsoft Excel | LG online

Exporta Automaticamente DataTable a Microsoft Excel | LG online — Tue, 20 Sep 2011 17:27:58 +0000

[...] [...]

Por: JUAN

JUAN — Fri, 01 Jul 2011 21:09:23 +0000

Mano, eres lo maximo funca perfecto.

Por: PABLO

PABLO — Sun, 19 Jun 2011 11:40:57 +0000

necesito ayuda trate de hacerlo todas las formas que estan aca y me da error todo

Por: aderson

aderson — Tue, 10 May 2011 21:39:14 +0000

mira yo estoy haciend una conecion a my sql

no se como hare lo estube haciendo pero aja

Por: raysip

raysip — Fri, 06 May 2011 13:38:55 +0000

Cuando ejecuto la aplicacion local funcioana correctamente, pero cuando lo subo en un sitio web no genera el excel pero tampoco sale error

Por: Eliseo

Eliseo — Thu, 17 Mar 2011 19:25:11 +0000

TECKNOCK, muchas gracias por colaborar!, pero hay que tener en cuenta que si el libro que creamos es compatible con excel 97-2003 el máximo de columnas permitidas es de 256 (hasta IV). Solo como comentario para que lo tengan en cuenta.

Eliseo

Por: TECKNOCK

TECKNOCK — Mon, 14 Mar 2011 17:29:47 +0000

Este código me ha ayudado mucho, por eso colaboro con mi granito de arena:

He optimizado la función “nombreColumna” para que llegue ahsta la columna ZZ (702 cols.)

Acá les dejo el código:

Public Function nombreColumna(ByVal numero As Integer) As String
Dim columna(703) As String

columna(1) = “A”
columna(2) = “B”
columna(3) = “C”
columna(4) = “D”
columna(5) = “E”
columna(6) = “F”
columna(7) = “G”
columna(8) = “H”
columna(9) = “I”
columna(10) = “J”
columna(11) = “K”
columna(12) = “L”
columna(13) = “M”
columna(14) = “N”
columna(15) = “O”
columna(16) = “P”
columna(17) = “Q”
columna(18) = “R”
columna(19) = “S”
columna(20) = “T”
columna(21) = “U”
columna(22) = “V”
columna(23) = “W”
columna(24) = “X”
columna(25) = “Y”
columna(26) = “Z”

Dim i = 27
For Ltr1 = 1 To 26
For Ltr2 = 1 To 26
columna(i) = columna(Ltr1) & columna(Ltr2)
i += 1
Next
Next

Return columna(numero)
End Function