Juan Carlos González Chavarría

Esto solo lo puedes hacer insertando un control ActiveX llamado ComboBox al cual puedes vincular las dos columnas que deseas y al presionar en el producto deseado te devuelve el código. Lo puedes insertar desde el menú Ver-Barras de...

A como me lo explicas lo veo un poco desordenado, mejor escríbeme al correo y te envío un archivo de ejemplo.

Tendrías que ver la forma en que se instaló tu Excel, puede que en tu trabajo lo hayan instalado completo y el tuyo no. También hay que ver la versión del 2007 de tu trabajo y el tuyo. Puedes intentar haciendo click en el Botón de Officina-Opciones...

Estuve probando y no sé que tipo de error tienes, si puedes trata de ser más específico porque a mí no me da problemas al copiar el rango. También asegúrate de no tener las hojas protegidas a la hora de ejecutar el código.

No puedes hacerlo a menos que desbloquees las celdas que van a contener los datos. Para desbloquear unas celdas solo tienes que marcar las que necesitas y presionas el botón derecho del mouse y escoges Formato de Celdas, en la carpeta de Proteger...

Para eso existen varias opciones que dependerán de lo que quieras, yo utilizaría el control RefEdit el cual me permite escoger un rango. Podrías poner: AreaTexto = RefEdit.Text / Puede ser RefEdit.Value, según los resultados.

Todo depende de tus ganas de aprender y presupuesto. En mi caso me topé con el problema que para aprender VBA en una academia me cobraban MUY CARO, por lo que decidí comprarme un libro y buscar manuales por Internet. Hasta ahora puedo decir que he...

Si quieres actualizar un dato de por columna en un ListBox tienes que hacerlo por medio del evento de DblClick del ListBox. Así por ejemplo, si estás en en registro 6 y quieres actualizar la columna del sueldo (voy a suponer que está en H5) puedes...

Para ir a la celda vacía utiliza este código: Dim SigFila As Long SigFila = Range("A65536").End(xlUp).Row + 1 Con esto avanzas a la siguiente fila vacía y después pones el resto de tu código.

Prueba de la siguiente forma: Sub BORRARTRAN2() ' ' BORRARTRANS Macro ' ' Range( _ "A8:E8,A10:E10,A12:E12,A14:E14,A16:E16,A18:E18,A20:E20,A22:E22,F26:F27,H26:H27,J26:J27,L26:O27,J29" _ ) = "" Range("A8").Select End Sub Estuve probando tu código y no...