Colocar el nombre del usuario que inicia después del login a un formulario ACCESS

Preguntas y respuestas relacionadas

Como soluciono el siguiente código

Dim numm As Double Dim strSQL As String If (DLookup("[Codigo]", "[TIP_COMPROBANTE]", "[codigo] = form![com_tipo]")) = False Then MsgBox "comprobante no exite" Else numm = DLookup("[Num_comp]", "TIP_COMPROBANTE", "[codigo] = form![com_tipo]")...
1 respuesta

¿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

No marca el error y cómo debe tratarse vba access

Estoy observando que en la siguiente rutina, al escribir un código de un cliente que aun no está de alta en el sistema simplemente pasa al siguiente textbox donde debe ir el nombre sin más ni más, obviamente al dar un tratamiento de error no va a...
1 respuesta

Rellenar campo con un botón de comando.

Necesito rellenar un campo, hora, con un botón de comando. Es decir, hacer clic y que se guarde la hora en el registro
1 respuesta

Como agregar datos a una tabla desde un form de access usando script vba que no me funciona?

Adjunto este código que no me funciona porque me dice que hay un error en la sentencia INSERT INTO ... Agradecería desde ya si me pudieran ayudar a resolverlo Private Sub Comando16_Click() Dim SENTSQL As String On Error GoTo ManipularError If...
2 respuestas

Ejecutar macro repetidamente más de 20 veces

Tengo un programilla hecho para llevar la planificación de un hotel. Para que lo entendáis rápidamente a partir de "n" reservas se asigna automáticamente una habitación en función de unas prioridades. Bien, la pregunta es, para hacer esto ejecuto la...
1 respuesta

Validar campo si existe en access

Tengo el siguiente código para validar si un campo existe en access pero me da error en y quisiera saber si me lo pueden checar y decirme donde esta mi error Private Sub Texto10_AfterUpdate() Dim vValor, vValorB As String vValor = Me.Texto10.Text If...
1 respuesta

Abrir formulario varias veces a la vez

Tengo un formulario para introducir búsquedas que llama a otro para mostrar los resultados, pero si me introducen un nueva búsqueda el resultado aparece en el mismo formulario y yo lo que necesito es que se me habrá una nueva copia con los nuevos...
1 respuesta

Como copiar datos al seleccionar un combor

Tengo el siguiente código: Private Sub Cuadro_combinado50_AfterUpdate() Dim vMatr As String Dim vNom As String vMatr = Me.Cuadro_combinado50.Value If IsNull(vMatr) Then Exit Sub vNom = DLookup("[CARP]", "DatosVarios", "[Responsable]='" & vEnc & "'")...
2 respuestas

Como puedo realizar que un texbox me de el valor en relación a otros Combos

1º Tengo na tabla llamada TCuotas con los siguientes campos: Tipo de cuota (anual, mensual, trimestral...) Concepto de Cuota (3 entrenos, 4 entrenos, ...) Importe (precios) Y esta rellenada con valores 2º Luego tengo un formulario basado en la tabla...
1 respuesta
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas de los temas