Juan Carlos González Chavarría

utiliza la siguiente fórmula: =indice(hoja1!$a:$a,(fila()-1)*20+columna()) Esta fórmula la puedes poner en cualquier parte del libro, me refiero en cualquier hoja o en la misma hoja. La copias hasta la última columna que quieres y la arrastras hasta...

¿Me parece o leí mal, deseas ordenar por fila y no por columnas como se hace por lo general?. [email protected]

¿En qué evento estás realizando la evaluación (evento de Hoja, Libro, Celda, etc.)? [email protected]

a). ¿Los rangos a copiar serán siempre los mismos o varían? [email protected]

a), lógicamente tienes que decirle que el libro contiene o no más hojas. Prueba añadiendo este pedazo de código: Dim SheetNames() As String Dim SheetHidden() As Boolean Dim i As Integer Dim SheetCount As Integer Dim VisibleWins As Integer Dim Item As...

Ok, graba esos pasos con el grabador de macros y lo incorporas a tú código. [email protected]

a), lo que puedes hacer es guardarlo como archivo Txt. [email protected]

Prueba de esta forma: Columns("F:F").Select Selection.Locked = False ' la marca como desbloqueada (para que me permita buscar por esa columna) Selection.FormulaHidden = False ActiveSheet.Protect Password:="contraseña", DrawingObjects:=True,...

Por la forma en que planteas tu solicitud me parece que es para alguna acción dañina hacia alguien o alguna empresa o negocio, por lo cual te quedo mal. No me presto para esas cosas. [email protected]

Primeramente tendrías que declarar una variable para el monto. No sé si estas utilizando UserForm o haces las colas en la misma hoja. Este es un ejemplo de búsqueda que puedes utilizar: Dim MiCantidad as Long Cells.Find(What:=Codigo,...