Respuesta
en
Microsoft Excel
a
Ejercicio sencillo con macro
Espero haber entendido bien tu pregunta. Pienso que tienes esa lista de 25 edades y quieres obtener el promedio de cada tramo (menores de 18, de 18 a 64 y 65 o más). Lo que yo haría es, usando las funciones "contar.si" y "sumar.si" obtener el número...
Respuesta
en
Microsoft Excel
a
¿Cómo hago aparecer un texto aleatorio cada vez que haga clic en el botón?
Prueba a llamar a este código desde tu botón: Sub elegirColorAleatorio() Dim n As Integer ' Inicializamos los números aleatorios Randomize Timer ' Generamos un número aleatorio entre 1 y 6 n = Int(Rnd * 6) + 1 ' Cogemos el valor que tiene la columna...
Respuesta
en
Microsoft Excel
a
Tengo abierto un user en hoja2 y quiero pasar datos a hoja1 y volver
No necesitas activar ni seleccionar la "hoja1" para escribir en ella, basta con que pongas algo así: sheets("hoja1").cells(linea,columna)=valor De esta forma no tienes que ir activando y desactivando las páginas. Otra forma sería que el botón del...
Respuesta
en
Microsoft Excel
a
Eliminar celdas excel si cumplen dos condiciones
Prueba a usar este código: Sub borrarLineasSinStock() Dim i As Long Dim sh As Worksheet Set sh = ThisWorkbook.ActiveSheet For i = sh.Cells.SpecialCells(xlCellTypeLastCell).Row To 1 Step -1 ' Comprobamos la columna 16 (P) y 17 (Q) If (sh.Cells(i, 16)...
Respuesta
en
Microsoft Excel
a
Poner contraseña para abrir userform
Pon al final de tu código estas dos instrucciones: Menu. Repaint DoEvents Con ellas se actualizará el formulario "menu". Por cierto, ten cuidado con la propiedad "showModal" de los formularios. No puedes tener 2 formularios "modales" al mismo tiempo.
Respuesta
en
Microsoft Excel
a
Ayuda para fórmula
Pon esta fórmula en H4: =SI(O(I4="VENTA TARJETA";I4="INGRESO BANCO");"ingreso";"pago") Creo que es lo que buscas.
Respuesta
en
Microsoft Excel
a
Necesito borrar caracteres en excel
Pon esta función en un módulo de la hoja de cálculo (tienes que guardarla como xlsm): Option Explicit Function quitarCaracteresQueNoQuiero(ByVal txt As String) As String Const caracteresQuitar = "+-/%" Dim i As Integer ' Cada uno de los caracteres...
Respuesta
en
Microsoft Excel
a
Ayuda con una fórmula
=N2+M3*si(K4="restar";-1;1) Esta fórmula sumaría M3 multiplicado por -1 si en K4 pone la palabra restar. Creo que es algo así lo que buscas.
Respuesta
en
Microsoft Excel
a
En Excel 2007 fórmula que arroje uno de cuatro posibles resultados basado en 4 rangos.
Supongamos que el valor a comparar está en A1. La fórmula a poner sería: =si(A1<125;1;si(A1<=134;2;si(A1<=144;3;4)) OJO: El menor (<) no incluye el valor comparado, como pasa con el 125 para el nivel 1. Con el menor o igual (<=) sí se incluye el...
Respuesta
en
Microsoft Excel
a
Detener la macro si no han contestado una pregunta (selección de checkbox)
Desconozco el nombre de tus objetos, pero supongamos que son algo así como "p01chk1", "p01chk2", "p01chk3", "p02chk1", etc... para la pregunta 01 checkbox 1, 2 y 3, pregunta 02 checkbox 1, etc... Y el botón se llama "btnOk". En el evento "click" del...