Eduardo Pérez Fernández

La función de link está mal. Por ejemplo, para 1.112.556.893,20 retorna Un mil millones ciento doce millones quinientos cincuenta y seis mil ochocientos noventa y tres 20/100 MN. Y la conversión correcta es: Mil ciento doce millones quinientos...

Puede utilizar una variable booleana a nivel de módulo del formulario, algo como Dim boolGrabado As Boolean El evento del botón Al hacer clic del botón "Confirmar venta", adicione este código IF boolGrabado Then msgbox "Ya registró esta...

Puede utilizar esta función a nivel de formulario. Function ordenar() Me.OrderBy = Screen.ActiveControl.Name Me.OrderByOn = True End Function Pero el nombre del campo debe ser el mismo al nombre del campo en la tabla. Para llamar la función lo puede...

¿Cuándo dice borrar se refiere al archivo físico o los objetos tablas, consultas, etc?

Pruebe con esto Dim A As Byte For A=1 To 15 CurrentDb.Execute "Update ASIG" & _ " Set FOL_FILIACION= '" & Me.Controls("FOL" & A) & "', " & _ " CCT1= '" & Me.Controls("ct" & A) & "' " & _ " Where ID_PLAZA = " & A) & "" Next A End Sub

Tengo esta tabla de numeración Pruebe con esta función Public Function falta(mperiodo As Integer) As String Dim lnPrimero As Long Dim lnUltimo As Long Dim strSQl As String Dim x As Long Dim aux As Long Dim strWhere As String strWhere =...

Si le sirve le regalo un ejemplo que tengo pero en Access, en este caso puede solicitarlo a [email protected]

Debe detectar si hay más de 1 usuario conectados, 1 sería el administrador. Puede utilizar esta función Public Function verifica_Laccdb(basedatos As String) As Boolean On Error GoTo hay_error Dim stm As TextStream, fso As FileSystemObject, strLine As...

Además, si dice igual no puede utilizar el operador OR, cámbielo por AND.

Pruebe con este código, puede llamarlo desde un botón de comando Dim x As Integer For x = 1 To 25 If DCount("*", "PLAZAS", "PLAZA='" & Controls("clave" & x) & "'") = 0 Then Controls("PLA" & x) = "No existe" End If Next x