Código VBA en Excel para implementarlo en Access
Hola quiero preguntarle lo siguiente, resulta que tengo el siguiente código en una Macro VBA en Excel, para calcular el rango de notas dependiendo del numero de preguntas que se pidan en una prueba:
Sub Carasonriente_Haga_clic_en()
Dim k, n, nmax, nmin As Integer
Dim i, l, nrc, npreg As Integer
nmax = Cells(2, 6) ' Campo en una tabla llamada Materias valor predeternminado 50
nmin = Cells(3, 6) ' Campo en una tabla llamada Materias valor predeternminado 10
npreg = Cells(4, 6) ' Campo de la tabla Materias llamado Numerodepreguntas
n = 10 ' valor predeterminado en la tabla Materias
'l = 0
For i = 1 To npreg + 1
k = (nmax - nmin) / npreg
n = n + k
Cells(i, 1) = i - 1
Cells(i, 2) = n - k
Next i
End Sub
Necesito saber como puedo crear dicho proceso en Access pero ya sea para una tabla o una consulta, los valores para nmax, nmin, npreg y n, yo los puedo pedir por formulario en Access, pero necesito saber como haría dicho proceso en Access no se si con un trigger, un modulo en VBA.
Gracias
Att. Hernán Camilo!
Sub Carasonriente_Haga_clic_en()
Dim k, n, nmax, nmin As Integer
Dim i, l, nrc, npreg As Integer
nmax = Cells(2, 6) ' Campo en una tabla llamada Materias valor predeternminado 50
nmin = Cells(3, 6) ' Campo en una tabla llamada Materias valor predeternminado 10
npreg = Cells(4, 6) ' Campo de la tabla Materias llamado Numerodepreguntas
n = 10 ' valor predeterminado en la tabla Materias
'l = 0
For i = 1 To npreg + 1
k = (nmax - nmin) / npreg
n = n + k
Cells(i, 1) = i - 1
Cells(i, 2) = n - k
Next i
End Sub
Necesito saber como puedo crear dicho proceso en Access pero ya sea para una tabla o una consulta, los valores para nmax, nmin, npreg y n, yo los puedo pedir por formulario en Access, pero necesito saber como haría dicho proceso en Access no se si con un trigger, un modulo en VBA.
Gracias
Att. Hernán Camilo!
1 respuesta
Respuesta de Orley Palma Renteria
1