Actividad pública reciente
Ha valorado "Excelente" la respuesta
Aqui debe estar el asunto
Intenta con: ActiveWorkbook.SaveAs Filename:="C:\F42LEC.txt", FileFormat:=xlTextPrinter_ , CreateBackup:=False -o- ActiveWorkbook.SaveAs Filename:="C:\F42LEC.txt", FileFormat:=xlTextWindows_ , CreateBackup:=False Bueeeno, eso digo yo...
Ha valorado "Excelente" la respuesta
Celda activa + la celda de la derecha
Una forma no muy "elegante" de hacerlo es: ActiveCell.Offset(0, 83).Range("A1").Select ActiveCell.FormulaR1C1 = "=RC[-83]+RC[-82]" ActiveCell.Select Selection.Copy Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _ False,...
Ha valorado "Excelente" la respuesta
Macro
Se me ocurre que... Suponiendo que el primer nombre se encuentra la celda "A2", inserta una columna a la izquierda y escribe en la celda "A2" (de la columna insertada) "=SI(ESBLANCO(B2), A1, B2)" y copia la fórmula a lo largo de todo el listado....