Entiendo que en el momento que tuviera dos celdas consecutivas sin fórmula que tuviera que recuperar ese código que planteas no me valdría, porque estoy copiando una fórmula que no existe de la celda de arriba en la celda de abajo de ella.
imagino que con borrar unas lineas te refieres a eliminar esos registros, estirar hacia abajo la tabla y en las nuevas líneas creadas añadirlos al final con los datos que tuvieran los antiguos, con las fórmulas arrastradas y creadas de nuevo. Entonces habria que escribir a mano todos los datos de cada columna a rellenar de todas las filas nuevas, dando lugar a cometer errores de copia/pega o reeescritura. Además, los registros los tengo ordenados con cierto orden , le perdería.
es lo que comentaba antes, era solución funcional trabajando con un excel en el mismo idioma en los dos ordenadores, por eso esto queda descartado, ya que por lo que veo excel no reconoce las funciones de un idioma a otro.
No sé, la verdad que me sorprende un poco que no se pueda hacer lo que planteo aquí al inicio.. Al final me voy a conocer todos los foros, ajja. Un saludo!
Por
MANTONIOPM, · publicado
Navegando por la red he encontrado un código para seleccionar objetos de autocad, es el siguiente:
Public AcadDoc As Object
Public AcadUtil As Object
Dim objLinea As AcadObject
Dim Punto As Variant
Sub MacroSeleccion()
Set AcadDoc = GetObject(, "Autocad.Application").ActiveDocument
Set AcadUtil = GetObject(, "Autocad.Application").ActiveDocument.Utility
AcadDoc.Utility.GetEntity objLinea, Punto, "Selecione objeto: "
End Sub
Sin embargo, al ejecutarse en autocad sólo me pone que designe los objetos. No me los selecciona automáticamente.
He encontrado otro código similar, pero no me funciona. Creo que es más adecuado que el otro: es el siguiente:
Dim SS As AcadSelectionSet
Set SS = ThisDrawing.SelectionSets.Add("Prueba")
Call SS.SelectOnScreen
SS.Delete
Dim Entidad as AcadEntity
Set Entidad = SS(0)
el problema creo que está en ThisDrawing.SelectionSets.Add("Prueba")
Si alguien puede echar una mano. Lo único que deseo es seleccionar las líneas del espacio modelo de autocad para copiarlas.