GotFocus

Preguntas y respuestas relacionadas

¿Por qué no hace efecto mi código en mi archivo?

Tengo el siguiente código con la finalidad de que evite que se venda la cantidad de un producto, mayor a la que se tiene en inventario. ElseIf DLookup("[EXISTENCIA]", "MATERIALES", "[CLAVE] = '" & Me.CLAVE & "'") < Me.Cantidad Then MsgBox "NO HAY...
2 respuestas

Comprobar si hay elemento seleccionado en ListBox

No veo como resolver la siguiente cuestión: Tengo un Listbox con datos y un botón para borrarlos. EL botón de borrado, no sólo elimina los elementos del ListBox, sino que también actúa sobre un contador. Lo que quiero es que el botón no haga nada (no...
2 respuestas

Crear respaldo de libro con nombre de fecha y en escritorio.

Tengo este código: Private Sub Workbook_BeforeClose(Cancel As Boolean)Dim Resp As BooleanResp = FalseResp = IIf(MsgBox("Desea Guardar una Copia?", _vbQuestion + vbYesNo, "Atención") = vbYes, True, False)If Resp...
1 respuesta

Evitar datos repetidos en una celda excel

Estoy creando un formulario, pero quiero que si los datos que introduzco en un texbox determinado están ya en la hoja excel me salga el mensaje que está repetido y no me deje continuar, Si introduzco texto me funciona, pero quiero introducir números....
1 respuesta

Validar - Registrar una solicitud sin celdas vacías Excel Macros

Yo Tengo el siguiente código que ya lo valida, pero quiero agregar excepciones. Es decir, que el campo Ubigeo(Columna M) y Clase de Activo(Columna R) no los valide. Sub ValidarVacios()Dim CeldaActa As StringDim CeldaDetalle As StringDim CeldaPxQ As...
1 respuesta

Vencimiento por fechas automatizar celda de al lado

Seguro que para vosotros es muy sencillo, pero para los que estamos empezando a hacer nuestros primeros macros es algo complicado. Yo tengo en un libro en cada una de las hojas el macro: [code] Private Sub Worksheet_Change(ByVal Target As Range) Dim...
1 respuesta

Como optimizar codigo largo IF - Else

Tengo este código y quisiera saber como optimizarlo o mejor dicho reducirlo, estoy utilizando If-Else. Muy agradecido de antemano. Private Sub combo_coordinador_Change() Sheets("ENERO").Activate If combo_coordinador.Value = ActiveSheet.Range("B5")...
1 respuesta

Filtrado por fechas en vb6 con access

Tengo un pequeño programa hecho en vb6 sobre ventas en un comedor y todo me trabaja bien, menos buscar por fecha en un base de datos, las base de datos esta en Access y me muestra la consulta en un datagrid, hasta ay todo bien, pero la consulta por...
1 respuesta

Abrir carpeta con ruta dinámica

En un formulario quería establecer para un botón: Crear una carpeta que se llame "Año Mes Dia - A gabinete" (p.e. 20201110 - A gabinete) dentro de una ruta que sigue este modelo: "\\unidad \carpetafija1 \carpetafija2 \tramite" donde tramite es un...
1 respuesta

Cómo hacer en access para que desde un formulario pueda almacenar una foto para cada nuevo registro

Me gustaría poder desde un formulario mediante un botón "examinar" elegir una foto de mi equipo y guardarla en un campo de mi tabla, cada registro una imagen diferente, tener para cada registro un campo imagen, o un campo donde se almacene la ruta de...
1 respuesta
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas del tema