Isaac Reyes

Isaac Reyes

Es mejor enseñar a pescar que dar el pescado
 76,9K puntos  Chile @granpeke desde - visto

Respuestas en Visual Basic

Respuesta en y en 1 temas más a

Como sumar varios Textbox en tiempo real sin errores

Me imagino que hay varias formas de hacerlo, pero respetando tu código, yo haría el siguiente procedimiento Sub subTotalNeto() Txt_TotalNeto.Value = CDbl(0 & Txt_Neto) + CDbl(0 & Txt_Neto2) + _ CDbl(0 & Txt_Neto3) + CDbl(0 & Txt_Neto4) + _ CDbl(0 &...
Respuesta en y en 2 temas más a

Código para multiplicar más porcentaje en visual basic

H0la Norbey: ¿Para qué quieres usar VBA para algo que se puede resolver simplemente con fórmulas? Si el valor de F8 está guardado con el formato de porcentacje basta con agregar en H8 =H7*F8 Y suponiendo que en H4 deseas poner la resta, H4 tendría...
Respuesta en y en 1 temas más a

Devolver un valor si el valor de una celda esta contenida en otra

H0la Aleida: Asumo hiciste tu función con sumo cuidado, por lo tanto, incluyo en tu función lo que tendría que funcionar si el criterio de búsqueda es una subcadena del contenido de alguna celda en en rango de búsqueda VLOOKUP("*" &...
Respuesta en y en 2 temas más a

Variable cambia valor según celda

H0la Beto: Puede ser así If Range("A5").Value = "A" Then TipoComp = 1 ElseIf Range("A5").Value = "B" Then TipoComp = 1 End If O asumir que si no es A entonces es B y hacerlo de esta otra forma TipoComp = IIf(Range("A5").Value = "A", 1, 6) S@lu2
Respuesta en y en 1 temas más a

¿Se puede bloquear el texto del encabezado de una tabla sin que se bloqueen sus opciones?

No estoy en el computador ahora, pero ¿Has intentado bloquear la hoja y jugar con las distintas opciones de bloqueo? Salu2
Respuesta en y en 1 temas más a

Macro para Ordenar por la ultima Columna activa

Intenta con estos cambios Sub Ordenar_Ultima_Columna() Range("A3").CurrentRegion.Select Selection.Sort Key1:=(Cells(3, Selection.Columns.Count)), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _...
Respuesta en y en 1 temas más a

Botón para sumar de uno en uno

H0la Norbey: Prueba con esto en el código de tu botón With Sheets("Tu hoja").Range("H2") .Value = .Value + 1 End With Reemplaza "Tu hoja" por el nombre de la hoja en que está la celda S@lu2
Respuesta en a

Copiar con vba incluso columnas en blanco

H0la: Esto copia todos los datos de Hoja Origen en Hoja Destino Sheets("Hoja Origen"). Cells. Copy Sheets("Hoja Destino"). Cells En caso de sólo querer copiar un rango (Ej: El rango A1:D100 de la Hoja Origen a un rango que comienza en C1 en Hoja...
Respuesta en y en 1 temas más a

Sintaxis para error en consulta de vba excel

H0la hacandiam: Podrías encerrar todo tu bloque With en el siguiente IF If IsNumeric(Me.TextBox1.Value) Then End If
Respuesta en y en 3 temas más a

Código VBA, sumar y contar notas por alumnos y asignaturas dependiendo del colegio.

H0la Felipe: Supongamos lo siguiente: Tu botón se llama cmdBuscarLa hoja en la que están los datos se llama AlumnosLa lista en donde se selecciona el nombre del estudiante se llama lstEstudianteLos cuadros de texto tienen por nombre...

Suscríbete RSS