Preguntas esperando respuesta
Actividad pública reciente
Ha preguntado en el tema en
Visual Basic
Formulario para carga de cantidades iniciales y modificaciones.
Pregunta para Dante Hola Dante; Me gustaría saber si me pudieras ayudar nuevamente con una consulta que tengo. Me gustaría poder programar un formulario para poder cargar unas cantidades y poder modificarlas Te envié el archivo
Sin respuestas
Ha empezado a seguir a 
Programar Excel
Programar Excel
Ha valorado "Excelente" la respuesta
Reducir código vba en proyecto.
H o l a: Cuando tienes las mismas tareas en varios controles, lo puedes reducir creando un procedimiento general, por ejemplo, de esto que tienes: Private Sub Op_Limpieza_Diaria_Click() If Op_Limpieza_Diaria.Value = True Then Cmb_Denominacion1.Value...
Ha valorado "Excelente" la respuesta
BuscarV condicionado a un Combobox y haga la búsqueda en diferentes rangos según se seleccione.
H o l a: Tienes que declarar al principio del formulario, como Public la variable rango: Te anexo los eventos para llenar el textbox US Private Sub CMB_DENOMINACION1_Change() 'Por.Dante Amor PonerUs 1 End Sub Private Sub CMB_DENOMINACION2_Change()...
Ha valorado "Excelente" la respuesta
Formulario que coge los datos de las hojas según sea su backcolor.
H o l a: Ajuste el código para abrir el formulario: Private Sub CMB_VEHICULOS_Click() IngresarDatos &HFF00FF End Sub Private Sub CMB_HERRAMIENTAS_Click() IngresarDatos &HFFFF& End Sub Private Sub CMB_MAQUINARIA_Click() IngresarDatos &HFF0000 End Sub...
Ha valorado "Excelente" la respuesta
Cargar celda con registro de la hoja que corresponda según se seleccione en otra celda.
Te anexo los códigos actualizados Private Sub Worksheet_Change(ByVal Target As Range) 'Por.Dante Amor Set h1 = ActiveSheet Select Case Target.Address(False, False) Case "A13": Set img = h1.Image1 Case "A27": Set img = h1.Image2 Case "A41": Set img =...
Ha valorado "Excelente" la respuesta
Nombre de hoja en una celda para poder usarla en una fórmula después.
En la columna de "A CARGO" pon esta fórmula: =CONTAR.SI.CONJUNTO(INDIRECTO("'"&$A$3&"'!$D$2:$D$5000"),$D3,INDIRECTO("'"&$A$3&"'!$A$2:$A$5000"),$A$13) En la columna de "OPERATIVO" pon esta fórmula:...
Ha empezado a seguir el tema Microsoft Excel
Ha empezado a seguir el tema VBA
Ha empezado a seguir el tema Visual Basic
Ha valorado "Excelente" la respuesta
Adaptar código insertar imágenes a nuevo diseño.
H o l a: Puedes enviar el archivo con explicaciones de lo que necesitas.
