Dante Amor

Dante Amor

https://www.youtube.com/@CursosDeExcelyMacros
 5.749K puntos  Ciudad de México, México @aprendemos desde - visto
Preguntar

Respuestas en Visual Basic

Respuesta en y en 1 temas más a

Macro para colocar tamaño de fila

Revisa si el siguiente código lo puedes adaptar para tu necesidad. Macro para ajustar alto de fila en celdas combinadas
Respuesta en y en 2 temas más a

Desbloquear todas las hojas de un libro

Revisa el código aquí: Desproteger hoja de Excel porque olvide la contraseña
Respuesta en y en 2 temas más a

Error al quiere poner una fórmula en una celda desde vba

Cambia estas líneas: uFila = .Range("A" & Rows.Count).End(xlUp).Row ' determina la ultima fila con datos Call insertacolumna 'llama a una insercion de columna B 'temporal.Range("B2:B" & uFila).Formula=...
Respuesta en y en 2 temas más a

Unificar código en uno solo

Prueba así: Private Sub SpinButton1_Change() 'hoja actual Dim n%, valor As String ' <= variable agregada ' Dim i As Long Application.ScreenUpdating = False With Sheets("actual") .Range("A1").Value = Sheets("Hoja2").Range("H1").Value If .[A1] = "0000"...
Respuesta en y en 1 temas más a

¿Rellenar y actualizar formulario con datos en tiempo real?

Prueba lo siguiente: Pon todo el código dentro de tu userform Option Explicit ' Dim nombres As New Collection Dim sh As Worksheet ' Private Sub CommandButton1_Click() Dim f As Range Dim lr As Long, i As Long 'VALIDACIONES If NewCargo = "" Then MsgBox...
Respuesta en y en 2 temas más a

Enviar numero a siguiente hoja excel

Así: Sub macro1() Sheets("Hoja1").Range("A1").Value = Sheets("Hoja2").Range("H1").Value End Sub
Respuesta en y en 2 temas más a

Image1 en UserForm no carga fotografía

El código funciona. Solamente considera que en el evento change del textbox, por cada caracter que vas ingresando se va a ejecutar el código. Podrías validar si el archivo existe, solamente si el archivo existe, cargará la imagen. Private Sub...
Respuesta en y en 1 temas más a

Macro Pasar tabla filtrada a Matriz

Puedes utilizar una hoja temporal: Sub TEST() Dim sh As Worksheet Dim matriz() As Variant Set sh = Sheets("Temp") sh.Cells.Clear With Worksheets("DATOS").ListObjects("Tabla1").Range .AutoFilter 6, ">=" & Date, xlOr, "" .Copy sh.Range("A1") End With...
Respuesta en y en 1 temas más a

Macro de Excel a txt y se guarde en una carpeta, pero con el nombre de la celda A4

A qué te refieres con "y así sucesivamente" Puedes poner una ejemplo de lo que tienes y de lo que esperas de resultado.
Respuesta en y en 1 temas más a

Obtener Ultima Celda con valores

Tienes pendiente valorar estas respuestas: Cambiar color al cambiar de una celda a otra excel 2003 Editar una celda excel a su vez muestre la cantidad de caracteres ingresados. Comprar Rangos con data similar