Dante Amor

Dante Amor

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

Respuestas en Visual Basic

Respuesta en y en 3 temas más a

Guardar datos de textbox en diferentes hojas.

Escribe la hoja y la celda donde deses guardar. Agregué la función Val( ) para almacenar el dato numérico como número. Private Sub CommandButton1_Click() Sheets("Hoja1").Range("A2").Value = TextBox1.Value Sheets("Hoja2").Range("A2").Value =...
Respuesta en y en 1 temas más a

En excel en un formulario rellenar un textbox3 y volcar el resultado de restar ese textbox3 al textbox2 y si es negativo volver

Envíame tu archivo y me explicas con ejemplos qué debo capturar en cada textbox y qué acciones debe realizar la macro. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “Alfredo Blanco”
Respuesta en y en 3 temas más a

Guardar Datos textbox verticalmente de un formulario

Sería de esta forma: Private Sub CommandButton1_Click() Set h1 = Sheets("Hoja1") h1.Range("A2").Value = TextBox1.Value h1.Range("A3").Value = Val(TextBox2.Value) h1.Range("A4").Value = Val(TextBox3.Value) End Sub . 'S aludos. Dante Amor. Recuerda...
Respuesta en y en 1 temas más a

Saber si existe PDF, Por Valor dado en una celda de excel.

H o l a: Te anexo la macro. En las celdas deberás tener el nombre del archivo con todo y extensión, por ejemplo: "facturas.pdf" Cambia en la macro "\\DAMOR\Users\damor\Documents\Docs\Soporte expertos\Blog\Archivos\" Por tu ruta de red. La macro...
Respuesta en y en 1 temas más a

Problema de definición de variables, btt.comando e inputbox, buscan un valor en un rango, copiando el resultado.

Efectivamente tu problema es en la declaración de la variable "midestino", la tienes declarada como Integer, entonces si capturas "0023", en la variable se almacena 23. En VBA no es necesario declarar variables. Revisa el siguiente enlace sobre la...
Respuesta en y en 1 temas más a

Macro para ordenar si cumple la condición

Te anexo la macro actualizada Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 4 Then Application.ScreenUpdating = False With Range("A2:G" & ActiveSheet.UsedRange.Rows(ActiveSheet.UsedRange.Rows.Count).Row) .Sort Key1:=.Cells(1,...
Respuesta en y en 2 temas más a

Macro: ¿Cómo hago para que este relacionada con el nombre de una columna y no a la columna en si?

A qué te refieres con "al nombre de la columna" tienes un encabezado en cada columna y quieres buscar ese encabezado, y una vez localizada la columna con ese encabezado, ¿qué se ejecute la macro? ¿O de qué forma tienes pensado hacerlo? Podrías poner...
Respuesta en y en 2 temas más a

Macro según el valor de una lista desplegable modifique el formato de otra

Para que cada dato de la lista desplegable tome un formato distinto, te sugiero lo siguiente. Suponiendo que en la columna G tienes tus nombres de la lista desplegable, entonces en la columna H pon el formato que le corresponde a cada nombre, por...
Respuesta en y en 2 temas más a

Buscar dato en todas las hojas, actualizar dato en todas las hojas encontradas

Te anexo el código: Private Sub CommandButton1_Click() 'Por.Dante Amor If IsNumeric(TextBox1.Value) Then valor = CDbl(TextBox1.Value) Else valor = TextBox1.Value For Each h In Sheets Set r = h.Cells Set b = r.Find("cuotas", lookat:=xlWhole) If Not b...
Respuesta en y en 2 temas más a

Como hacer operaciones en un textbox VBA excel

Pon el siguiente evento en tu formulario Private Sub TextBox1_Change() TextBox2 = "" If IsNumeric(TextBox1) Then TextBox2 = TextBox1 / 60 End If End Sub Si es lo que necesitas, no olvides valorar la respuesta. Sal u dos