santiagomf

santiagomf

Más de 35 años en la informática y más de 20 trabajando con Visual Basic, Access, Excel y otras B
 166K puntos  Castilla y León, España @santiagomf desde - visto
Preguntar

Preguntas esperando respuesta

Actividad pública reciente

Ha cambiado su perfil.
  • Lema: Más de 35 años en la informática y más de 20 trabajando con Visual Basic, Access, Excel y otras B.
Ha cambiado su perfil.
  • Ha cambiado su experiencia.
Ha empezado a seguir el tema
Ha respondido en

Buen día. Tengo una base en access y deseo agrupar edades menor1, 1 a 4, 5 a 14 etc

La forma correcta sería crear una tabla con: - IdOrden (clave y orden del grupo) - NombreGrupo - EdadInicial - EdadFinal Puedes cruzar esa tabla con tus datos poniendo en criterios de la "edad" "between [EdadInicial] and [EdadFinal]".
Ha respondido en

Necesito fórmula o utilizar bien el "buscarv" para hacer lo siguiente

=si.error(buscarv(referencias!Axxx;descripciones!$A$B;2;falso);"No encontrado") Pon el "Axxx" la celda que contenga la referencia y, si no me equivoco, la función devuelve lo que buscas. Por cierto, entiendo que no debería haber referencias...
Ha respondido en

Faltan registros en el formulario

Sólo se me ocurren 2 opciones: Que el formulario acceda a la tabla con una consulta (o su SQL en 'origen del registro'), o bien que tengas puesto un filtro en el formulario. Revisa esos dos puntos y si no encuentras el problema sube la base de datos...
Ha respondido en

Como hacer que una variable permanezca constante.

Yo crearía una página con los cambios diarios y una función que me busque el cambio en función de la divisa y fecha. La función sería: Option Explicit Function buscarUltimoCambio(ByVal fecha As Date, ByVal divisa As String) As Double Dim i As Integer...
Ha respondido en y en 1 temas más

Urgente! Cómo resolver "crror 57121 en tiempo de ejecución" excel vba

Así, sin más, no adivino el motivo del error. Habría que ver la ejecución. En cuanto al usuario del ordenador puedes crear fácilmente una función como esta: function nombreUsuario() as string nombreUsuario=environ("username") end function Con eso no...
Ha respondido en

Como evitar que un campo correlativo 001/2013 se repita

Prueba a ver si te gusta más este código: Dim rs As Recordset Dim txtSql As String Dim n As Integer txtSql = "select max(NUMEXPTE) as maxNum from Entrada " & _ "where NUMEXPTE like '*/" & Format$(Me.fecha, "yyyy") & "'" Set rs =...
Ha respondido en

Macro para copiar celdas

No sé si te servirá este código: Sub copiarCadaMediaHora() Dim i As Integer Dim sh As Worksheet Dim celda As Range Set sh = ActiveSheet ' Copiamos la linea 132 en la 133 hasta la 182 For i = 133 To 182 Set celda = ActiveCell sh.Rows(132).Copy...
Ha respondido en

Access Archivo ya existe ¿Desea reemplazarlo?

Supongamos que estás guardando un archivo cuyo nombre está en la variable "nomSalida". Justo delante de la instrucción que graba la salida pon: On Error Resume Next kill nomSalida ' Borra el fichero On Error Goto 0 Ese código borra el fichero y no da...
Ha respondido en

Macro que multiplique directo

sub multiplicaPor2() dim i as integer for i = 1 to 12 Cells(i, 2) = cells(i, 2) * 2 ' Multiplica por 2 lo que hay en la fila "i" columna 2 (B) y lo deja en la misma celda next i end sub Creo que es lo que buscas.
Ha respondido en

Crear txt con macro, concatenar y darle formato a cada dato con ceros a izquierda, en varias lineas.

¿A qué te refieres con 'varias líneas al tiempo'? ¿Tienen distinto formato las líneas? ¿Cómo sabes que formato aplicar a cada línea? Si en alguna columna marcas el formato que lleva, supongamos 1, 2 y 3, puedes llamar a una función que formatee cada...
Ha respondido en

Necesito abrir base de datos access muy antigua

Si estás usando Access 2013... la respuesta la tienes en la página de Microsoft: usa una versión anterior de Access. http://support.microsoft.com/kb/2755119/es Si lo que quieres es abrir la base de datos para recuperar la información, prueba a...
Ha respondido en

¿Cómo ejecutar macro si valor de fecha en una celda es el correcto?

En el código de la página "resumen" pon esto: Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) Dim i As Integer Dim aux As Variant If Target.Address <> "$A$1" Then Exit Sub ' No es la celda A1 If Target.Value = "" Then Exit Sub If...
Ha respondido en

¿Cómo puedo mostrar u ocultar una imagen dependiendo del valor de la celda en access?

Si intentas poner como no visible el objeto, la propiedad será para todo el informe y se verá igual en todos los registros. Yo intentaría jugar con el "origen del control", pondría algo así como: =iif(nuevos<2;<campo de la foto>;null)

Mejores respuestas proporcionadas

1
1

Experiencia

Más de 35 años en la informática y más de 20 trabajando con Visual Basic, Access, Excel y otras B.D. como Oracle, etc...
Haced preguntas concretas con una respuesta relativamente corta (no quiero escribir el manual).
Si os interesa, también puedo ofrecer cursos a medida en Madrid.