Estoy intentando copiar un rango de celdas de una hoja de cálculo de Excel 2010 y pegarlas en una tabla en AutoCAD LT 2016. Mi problema es que Excel aplica información de formato a cada una de las celdas. AutoCAD utiliza este formato para anular sus estilos celda por celda, por lo que mi tabla no cumple con los estándares de diseño.
Lo que me gustaría hacer es eliminar todo el formato del archivo de Excel como se podría hacer en Excel <97. De lo contrario, si hubiera una utilidad de portapapeles que eliminara el formato de la tabla (pero dejara la información de combinación de celdas), sería una alternativa aceptable.
Intenté cortar y pegar desde Google Docs y LibreOffice, pero AutoCAD interpreta los objetos del portapapeles de manera diferente y no crea una tabla a partir de los datos cuando se pegan.
He visto algunas rutinas LISP que eliminarán este formato dentro de AutoCAD, pero como mi empleador ejecuta LT, no están disponibles para mí.
¿Algunas ideas?
Respuesta1
Para eliminar todo el formato, seleccione las celdas en cuestión y desde la cinta haga clic en:
Home > Editing > Clear > Clear Formats
Respuesta2
Solución alternativa barata y alegre:
¿Has intentado copiar una columna en el Bloc de notas y luego copiarla desde el Bloc de notas a Autocad?
Es posible que incluso puedas copiar toda la tabla en el bloc de notas y luego en Autocad (no lo tengo, así que no lo he probado), pero lo más probable es que importe cada fila en una celda con un montón de pestañas. caracteres, y tendrás que hacerlo columna por columna.
Supongo que ya ha intentado "pegar valores" en otra hoja y luego copiarlos desde esa hoja. Si hace eso, ¿copia "calibri, tamaño 10" o cualquier estilo predeterminado de Excel en lugar de texto sin formato, o funciona?
Espero que uno de estos ayude
Respuesta3
Si desea borrar todos los formatos de una hoja de trabajo, pero conservar la combinación de celdas, entonces:
- copiar la hoja de trabajo
- borrar todos los formatos en la copia(esto también separará las celdas)
- volver a combinar celdas en la copia basándose en las celdas combinadas en el original
Esta breve macro hará esto:
Sub qwerty()
Dim orig As Worksheet, r As Range
Dim neww As Worksheet
Set orig = ActiveSheet
ActiveSheet.Copy After:=Worksheets(Sheets.Count)
Set neww = ActiveSheet
Cells.ClearFormats
For Each r In orig.UsedRange
If r.MergeArea.Address = r.Address Then
Else
neww.Range(r.MergeArea.Address).Merge
End If
Next r
End Sub
Respuesta4
- Copiar de Microsoft Excel.
- Pegar en LibreOffice Calc (Pegado especial -> Texto sin formato).