Dante Amor

Dante Amor

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

Respuestas en Programación

Respuesta en y en 2 temas más a

Mejorar una Macro en Excel

Envíame tu archivo con la hoja "Modelo" y unos ejemplos en la hoja "Base de Datos", también agrega una tercera hoja para ver un ejemplo de cómo debería quedar cada hoja. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario...
Respuesta en y en 2 temas más a

¿Multiplicar 2 valores ingresos en textbox diferentes y mostrar automáticamente el resultado en un tercer textbox?

Pon el siguiente código en tu formulario Private Sub TextBox1_Change() Call Multiplicar End Sub ' Private Sub TextBox2_Change() Call Multiplicar End Sub ' Sub Multiplicar() TextBox3 = "" t1 = Val(TextBox1.Value) t2 = Val(TextBox2.Value) TextBox3 = t1...
Respuesta en y en 1 temas más a

Cómo sumar los valores de una columna que depende de la coincidencia de una valor dado?

[H o l a: Tengo algunas dudas. Qué columna quieres sumar, ¿la D o la E? Puedes poner un ejemplo de lo que tienes en la hoja "ENTRADA", procura poner un producto que tenga alguna diferencia en el nombre, después en la hoja balance pon el ejemplo de lo...
Respuesta en y en 2 temas más a

Como puedo hacer para que en Excel el programa me pregunte en que hoja me quiero situarme y en que celda y que quiero escribir

Te anexo la macro con algunas validaciones Sub Ejer02() Dim hoja As String, tex As String, celda As String celda = InputBox("En que celda desea situarse") tex = InputBox("Que desea escribir") hoja = InputBox("En que hoja desea situarse") ' If celda =...
Respuesta en y en 2 temas más a

MACRO para copiar un valor y filtrar otra hoja con ese valor

Te anexo la macro para lo siguiente: 1. Captura el dato en la hoja "actualización", celda C4 2. Ejecuta la macro. Si no hay dato, te envía un mensaje 3. La macro realiza los 2 filtros 4. Si hay información en la columna A, la copia y la pega en la...
Respuesta en y en 2 temas más a

Buscar Datos en una planilla excel y pegar en otra planilla cuando los valores coincidan

Te anexo la macro Sub Copiar_Valores() 'Por.Dante Amor Application.ScreenUpdating = False Set h1 = Sheets("Origen") Set h2 = Sheets("Destino") ' For i = 5 To h2.Range("A" & Rows.Count).End(xlUp).Row If h2.Cells(i, "A") <> "" Then Set b =...
Respuesta en y en 2 temas más a

Formulario VBA ComboBox "enlazado" a TextBox

Pon el siguiente código en tu Userform, te puse los ejemplos para los combos del 1 al 4 Private Sub Combo_Descripcion1_Change() Call Carga_Text(Combo_Descripcion1, Text_Codigo1) End Sub Private Sub Combo_Descripcion2_Change() Call...
Respuesta en y en 2 temas más a

Macro para proteger celdas con datos

Prueba lo siguiente: Private Sub Worksheet_Change(ByVal Target As Range) ' Dim N1 As String If Intersect(Target, Range("B1:CP150000")) Is Nothing Then Exit Sub End If ' If Target.Value <> "" Then Target.Select ActiveCell.Offset(0, 1).Select N1 =...
Respuesta en y en 2 temas más a

Macro para copiar valores en rango dinámico según selector

1. ¿El selector es un combobox de control activeX? 2. ¿En la fila 19 tienes fechas o textos? 3. ¿Los valores están en una tabla? ¿O es un rango de datos? 4. ¿En las filas inferiores tienes totales? 5. También hay que copiar la columna de Total 2018...
Respuesta en y en 2 temas más a

Solo poder imprimir mediante la macro

Pon la siguiente macro en los eventos de Thisworkbook Private Sub Workbook_BeforePrint(Cancel As Boolean) 'Por.Dante Amor If boton = False Then MsgBox "NO SE PUEDE IMPRIMIR POR ESTE MEDIO UTILICE EL BOTÓN SEÑALADO", vbCritical, "ERROR" Cancel = True...