Abraham Valencia respondió:
Suponiendo que tus datos comienzan en "A1" y que el dato de los archivos de texto son solo el valor de las celdas de la columna "B", algo así te ayudará: Sub CearTxT() Dim Celda As Range Dim UltimaFila As Long Dim NombreArchivo As String Dim Valor As...