hocontreras

antares18 respondió: No se si lo he entendido bien, ¿quieres hacer una función para saber que celda es por ejemplo la AA te devuelve un 27 y si haces lo mismo con el 27 te ha de salir la AA? Si es así hay una forma más fácil que hacer todos los select Public Function...

Victor Perdomo respondió: Creo que esta es más sencillo: Function NumeroCol(ByVal LetraCol As String) As Integer NumeroCol = Range(LetraCol & "1").Column End Function Function LetraCol(ByVal nCol As Integer) As String LetraCol = Replace(Cells(1, nCol).Address(False, False),...

Isaac Reyes respondió: Hocontreras: Para poder ayudarte mejor, dame un ejemplo de lo que debería dar como resultado, partiendo de un determinado contenido del achivo datostab.txt. ¿El segundo txt lo estas utilizando como auxiliar o es estrictamente necesario? ¿Cuál es su...

Victor Perdomo respondió: Prueba en panel de control->configuracion regional y de idioma->perzonalizar-> y pon decimales con coma y miles con punto.

José Saúl Méndez Alonso respondió: Lo único que cambia es en la función split, porque ahora el caracter separador de columnas es una tabulación Dim sUltimaHoja As String Dim CntFilas As Integer Sub Llenar() Set fso = CreateObject("Scripting.FileSystemObject") Dim sRuta As String Dim...

José Saúl Méndez Alonso respondió: Según entiendo el problema radica en que para cada línea de tu TXT validas a que hoja deberán ir los datos. Si es así entonces lo único que te hace falta es que tu contador de línea sólo se incremente cuando la siguiente línea sea para la misma hoja...