fendetestax2

Dante Amor respondió: Intenta guardar el archivo como: Texto con formato (delimitado por espacios). Prueba la siguiente: Sub Macro2() Application.DisplayAlerts = False ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" & "Libro1.txt", _ FileFormat:=xlTextPrinter End Sub

Tor Cheer respondió: Con esta macro guarda la hoja1 con el nombre de la hoja1 en la misma ubicación del archivo con formato .xls como esta en el código Sub GuardarHoja() Dim Nombre As String Nombre = ThisWorkbook.Path & "\" & Sheets("Hoja1").Name & ".xlsx"...

Luis Mondelo respondió: Veamos un primer ejemplo: Prueba a usar el buscarv así: (el rango de búsqueda y la columna 2 están inventados) =buscarv("*compu*";a2:h100;2;falso) Ya me cuentas

Elsa Matilde respondió: Entrá al Editor y seleccioná con doble clic el objeto HOJA donde vas a realizar esta operación. Allí copiá rutina que se ejecutará cada vez que ingreses un dato en B5 (luego podrás ampliar ese rango si te parece) Private Sub Worksheet_Change(ByVal...

jrgces respondió: Prueba poniendo comillas simples antes y después del nombre, por ejemplo: =INDIRECTO("'TA-250(1)'!A1")

calvuch respondió: Con indirecto no lo he realizado, lo he intentado pero me resulta más fácil y rapido mediante macro. Acá te dejo el macro que yo ocupo, por si te sirve de algo. En un modulo pones Sub formula(fila As Long) Dim libro As String, hoja As String, celda...

bacter582 respondió: Estuve dándole vueltas durante un rato a tu problema y por medio de fórmulas no conseguí como resolverlo, te dejo un macro muy sencillo que puede resuelve tu problema. Sub contar_hojas() For i = 1 To Sheets.Count Cells(i, 1).Value = Sheets(i).Name...