santiagomf

Prueba con: ROUND(iif(nz(producto, 0)=0,0, nz(gastos, 0)/producto), 1) Y el promedio también lo puedes poner con... ROUND(iif(agv(nz(producto, 0)=0,0, nz(gastos, 0)/producto)), 1) Si lo estás poniendo directamente en el diseño de la consulta,...

Crea una consulta y pon el siguiente SQL: SELECT [nombreTablaPrincipal].[Barrio], [nombreTablaPrincipal].[NºManzana], [nombreTablaSecundaria].[NºManzana_ayuntamiento] FROM [nombreTablaPrincipal] LEFT JOIN [nombreTablaSecundaria] ON...

El SQL en Access sería: UPDATE tabla2 INNER JOIN tabla1 ON tabla2.campo_texto=tabla1.campo_texto SET tabla2.id= tabla1.id; Esto puede dar problemas si en la tabla1 se pueden repetir valores de "campo_texto". Si ocurre eso tendrás que crear una...

¿Has comprobado el contenido real de las celdas con los guiones? ¿No será que contienen un 0 y aparecen guiones por el formato de la celda? Es una posibilidad. Pon un "stop" a tu programa cuando vaya a ejecutar una celda de los guiones y mira a ver...

En principio te falta un punto en: Sheets("hoja1")Select Tiene que ser: Sheets("hoja1").Select Te plantearía otra posiblidad mucho más sencilla de hacer lo mismo: sheets("hoja2").range("E7")=sheets("hoja1").range("C3") Es mejor porque no va activando...

Dependerá de cómo estés mandando imprimir los datos. Si estás usando "Docmd.PrintOut" desde el formulario... usa: Docmd.PrintOut PrintRange:=acSelection Si lo que haces es imprimirlo a través de un informe, entonces tendrás que hacer que el informe...

No sé si es esto exactamente lo que buscas pero creo que se parecerá: Sub prueba() Dim nLin As Integer Dim nbreHoja nbreHoja = "hoja2" For nLin = 2 To ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row ' La hoja de destino será "Hoja2" para la...

Se trata de un problema de la configuración que nos toca sufrir a los que usamos el formato "dd/mm/aaaa". La solución es relativamente sencilla: pasar los datos a un formato fecha y de ese formato a un texto. Resumiendo: - Si quieres guardar el valor...

Sub Tomadedatos(ByVal fi, ByVal ci, tamresp) ReDim matriztotales(tamresp) As Integer For i = 1 To tamresp matriztotales(i) = Cells(fi + i - 1, ci) Next En principio se puede definir la matriz dependiendo del parámetro que le pases.

Lo que está claro es que las consultas que podrás ejecutar son siempre consultas que modifiquen datos, los añada, cree una tabla, la borre o... en general, actualice datos. No te servirá una consulta que presente los datos por pantalla, ya que si...