Cáculo de tamaños fotográficos

hola, Miguel !

- en las paginas que has visto (calculo de hipotecas) de seguro algunos campos son "no manipulables" -?-
- si entiendo bien, lo que buscas es resolver UNA incognita conociendo dos (de tres) "factores variables" -?-
- en el caso que expones, (aparentemente) pretendes que los tres campos sean "inter-dependientes" -?-
- (entonces) para resolver DOS (de tres) incognitas conociendo solo una, el procedimiento no resultara sencillo

prueba con el siguiente procedimiento:

1) formulas auxiliares (p.e.) en el rango B1:B3
[B1] ¢*24/A3
[B2] £*A1/24
[B3] ¢*24/A1
2) escribe DOS (de las tres) variables en el rango A1:A3
OJO: deberas BORRAR la tercera variable (la que se supone que estas buscando)

3) "descubre" la variable faltante en su "celda espejo" [B1:B3]

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

__ OP __
En la columna A de una hoja tengo las giguientes entradas:
A1 Tamano del papel
A2 Tamaño fotografia
A3 Resolucion
Lo que quiero hacer es que cada vez que en las celdas B1, B2 Y B3 ponga unos valores determinados
me vaya dando los valores de los restantes campos, de acuerdo con la siguiente formula:
Tamano del papel = (Tamano fotografia x 2,4 cm) / Resolucion.
Lo que me ocurre es que cuando adapto las formulas a cada una de estas entradas (B1, B2 y B3)
al poner el dato correspondiente se me borra la formula y entonces no funciona.
He visto paginas web en las que, por ejemplo, para el calculo de una hipoteca
vas metiendo los datos en el campo correspondiente y te va calculando el resto de los datos.
Como lo puedo hacer?

On 1 feb, 23:19, "Héctor Miguel"
wrote:

hola, Miguel !

- en las paginas que has visto (calculo de hipotecas) de seguro algunos campos son "no manipulables"    -?-
- si entiendo bien, lo que buscas es resolver UNA incognita conociendo dos (de tres) "factores variables" -?-
- en el caso que expones, (aparentemente) pretendes que los tres campos sean "inter-dependientes"    -?-
- (entonces) para resolver DOS (de tres) incognitas conociendo solo una, el procedimiento no resultara sencillo

prueba con el siguiente procedimiento:

1) formulas auxiliares (p.e.) en el rango B1:B3
    [B1] ¢*24/A3
    [B2] £*A1/24
    [B3] ¢*24/A1
2) escribe DOS (de las tres) variables en el rango A1:A3
    OJO: deberas BORRAR la tercera variable (la que se supone que estas buscando)

3) "descubre" la variable faltante en su "celda espejo" [B1:B3]

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

__ OP __
En la columna A de una hoja tengo las giguientes entradas:
A1 Tamano del papel
A2 Tamaño fotografia
A3 Resolucion
Lo que quiero hacer es que cada vez que en las celdas B1, B2 Y B3 ponga unos valores determinados
me vaya dando los valores de los restantes campos, de acuerdo con la siguiente formula:
Tamano del papel = (Tamano fotografia x 2,4 cm) / Resolucion.
Lo que me ocurre es que cuando adapto las formulas a cada una de estas entradas (B1, B2 y B3)
al poner el dato correspondiente se me borra la formula y entonces no funciona.
He visto paginas web en las que, por ejemplo, para el calculo de una hipoteca
vas metiendo los datos en el campo correspondiente y te va calculando el resto de los datos.
Como lo puedo hacer?

Héctor Miguel, en primer lugar darte la gracias por tu respuesta. A
continuación, te comento lo siguiente:

En cuanto a las fórmulas facilitadas, no hay nada que objetar, realizan los los cálculos que necesito. Pero la presentación no es muy buena, puesto que al dejar una de las celdas vacías del rango A1:A3, para el cálculo de sus respectivas variables, más exactamente la A1 ó A3 que, según las fórmulas utilizadas, son las que dividen, sus celdas espejo, la B1 y B3, presentan el típico error de división entre cero, y no es estético para una presentación.
Por otra parte, me gustaría que los resultados apareciesen en un mismo rango de celdas; es decir, si la celda A1, se encuentra titulada como "Tamaño del papel"; la A2 como "Tamaño fotografia" y la A3 como "Resolución", qué debería hacer para que en las celdas espejo (B1:B3), como tú las denominas, aparezcan los resultados, al dejar una de sus variables en blanco; ya que las fórmulas ya no las podría poner en el rango A1:A3, ya que se encuentran tituladas. Es básicamente lo que ocurre en el ejemplo que te puse en el post, referente al cálculo de las hipotecas, que ponen en un rango Ej.:

En A1:A4 > Nombres de las variables.
En B1:B4 > Celdas vacías para introducción datos
En C1:C4 > Botones calcular
A1 Hipoteca: B1 Dato C1 Calcular
A2 Interes (%): B2 Dato C2 Calcular
A3 Años: B3 Dato C3 Calcular
A4 Cuota: B4 Dato C4 Calcular

hola, Miguel !

... las formulas... realizan los los calculos que necesito. Pero la presentacion no es muy buena
puesto que al dejar una de las celdas vacias del rango A1:A3... presentan el tipico error de division entre cero
y no es estetico para una presentacion.
... me gustaria que los resultados apareciesen en un mismo rango de celdas; es decir
si la celda A1, se encuentra titulada como "Tamano del papel"; la A2 como "Tamano fotografia" y la A3 como "Resolucion"
que deberia hacer para que en las celdas espejo (B1:B3)... aparezcan los resultados, al dejar una de sus variables en blanco ...

(creo que) podriamos empezar por probar con el siguiente procedimiento (de acuerdo con esta exposicion)...
copia/pega (o escribe) lo siguiente en el modulo de codigo de "la hoja" donde pondras los datos en [B1:B3]
-> haz un clic-secundario sobre la etiqueta con su nombre y (de ser necesario) reemplaza el evento '_change' por esto:

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("b1:b3")) Is Nothing Then Exit Sub
If [count(b1:b3)<>2] Then Exit Sub Else [b1:b3].Find(Empty).Select
Select Case ActiveCell.Address
Case "$B$1": [b1] = [b2*24/b3]
Case "$B$2": [b2] = [b3*b1/24]
Case "$B$3": [b3] = [b2*24/b1]
End Select
End Sub

despues de (re)llenadas dos de las tres celdas, la tercera variabe se auto-determina con base a las conocidas

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

On 2 feb, 22:00, "Héctor Miguel"
wrote:

hola, Miguel !

> ... las formulas... realizan los los calculos que necesito. Pero la presentacion no es muy buena
> puesto que al dejar una de las celdas vacias del rango A1:A3... presentan el tipico error de division entre cero
> y no es estetico para una presentacion.
> ... me gustaria que los resultados apareciesen en un mismo rango de celdas; es decir
> si la celda A1, se encuentra titulada como "Tamano del papel"; la A2 como "Tamano fotografia" y la A3 como "Resolucion"
> que deberia hacer para que en las celdas espejo (B1:B3)... aparezcan los resultados, al dejar una de sus variables en blanco ...

(creo que) podriamos empezar por probar con el siguiente procedimiento (de acuerdo con esta exposicion)...
copia/pega (o escribe) lo siguiente en el modulo de codigo de "la hoja" donde pondras los datos en [B1:B3]
-> haz un clic-secundario sobre la etiqueta con su nombre y (de ser necesario) reemplaza el evento '_change' por esto:

Private Sub Worksheet_Change(ByVal Target As Range)
  If Intersect(Target, Range("b1:b3")) Is Nothing Then Exit Sub
  If [count(b1:b3)<>2] Then Exit Sub Else [b1:b3].Find(Empty).Select
  Select Case ActiveCell.Address
    Case "$B$1": [b1] = [b2*24/b3]
    Case "$B$2": [b2] = [b3*b1/24]
    Case "$B$3": [b3] = [b2*24/b1]
  End Select
End Sub

despues de (re)llenadas dos de las tres celdas, la tercera variabe se auto-determina con base a las conocidas

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

De nuevo, muchas gracias Héctor Miguel.
Tu propuesta funciona perfectamente. Únicamente hay que tener en
cuenta que, una vez introducidas dos de las tres variables, hay que
situarse en la celda a calcular y borrar su contenido para que te dé
el resultado.
Danto una vuelta más, ¿cómo lo haríamos insertándo CommandButton para
realizar los cálculos?

hola, Miguel !

__ 1 __

... funciona... unicamente hay que tener en cuenta que, una vez introducidas dos de las tres variables
hay que situarse en la celda a calcular y borrar su contenido para que te de el resultado.

1) "eso" pasa cuando tienes llenas las 3 celdas en el rango... revisa este comentario en el mensaje anterior...

despues de (re)llenadas dos de las tres celdas, la tercera variabe se auto-determina con base a las conocidas

- o sea, la segunda linea del codigo

If [count(b1:b3)<>2] Then Exit Sub Else [b1:b3].Find(Empty).Select

- tiene los siguientes efectos:
si en el rango [B1:B3] el numero de celdas con numeros es <>2 el codigo "no hace nada"
de lo contrario, se auto-selecciona la correspondiente celda "vacia"

__ 2 __

Danto una vuelta mas, como lo hariamos insertando CommandButton para realizar los calculos?

2) un boton "en donde" (exactamente) ?
que se espera que haria ese boton ? (me explico):
- si estan llenas las 3 celdas cual se debiera borrar ?
- si esta llena solo una celda... cual debiera ser considerada como la segunda variable necesaria "omitida"
y que valor debiera asignarsele para poder calcular "la tercera variable" ?

(creo que aun tienes algun detalle "en el tintero") -?-
saludos,
hector.