quisiera darle a cada celda un formato específico: 12 x 22 mm.

[ferrovam]

No pueo darle ese tamaño a las celdas. Ya fui a opciones de
excel/avanzadas/unidades de regla, y no hay caso. También hice la
equivalencia entre puntos y milímetros, como dice en AYUDA: 12,75 puntos
equivalen a 4 mm, pero en la realidad no coinciden. Tengo el Excel 2007.
Gracias

[Héctor Miguel]

hola, (...) ???

> No pueo darle ese tamano a las celdas. Ya fui a opciones de excel/avanzadas/unidades de regla, y no hay caso.
> Tambien hice la equivalencia entre puntos y milimetros, como dice en AYUDA: 12,75 puntos equivalen a 4 mm
> pero en la realidad no coinciden. Tengo el Excel 2007...

(hasta donde se) el detalle de necesitar/querer ajustar "al milimetro" las medidas de celdas (excel)
para (tratar de) "encajar" sus textos en lugares "especificos" de (p.e.) formatos pre-impresos... "ya trae lo suyo"

1) no te aseguro que obtendras medidas EXACTAS (de cierto que) habra alguna variacion -supongo que- aceptable ?

2) al final del presente te propongo dos alternativas (que son perfectamente modificables/adaptables/...)
para ajustar a medidas (centimetros, milimetros, ...) el alto y ancho de una celda (p.e. la celda activa)

3) de todas formas (y solo por si las...) transcribo las consideraciones (que considero) relevantes para tomar en cuenta

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

a) toma muy en cuenta que...
los ajustes posibles del ancho de una columna SOLO se pueden dar en 6 intervalos entre un entero y el siguiente...
0.17, 0.33, 0.50, 0.67, 0.83 y 1.00 (1 seria el siguiente entero) y son medidas =>en puntos<= (p.e.)
si tratas de establecer (aun por codigo) el ancho de una columna en 12.25 (finalmente) quedara en 12.33
intervalos que se deberan tener en cuenta si se pretende ajustar a medidas en centimetros, pulgadas, -???-

b) con respecto de las propiedades de medidas de los objetos...
- ColumnWidth devuelve el ancho de la columna (basado en la fuente normal... en uso)
- Width y RowHeight devuelven una medida en puntos (1/72 de pulgada... 72 pixeles por pulgada)
- la propiedad RowHeight (la altura de una fila) NO puede exceder de 409.5 puntos
- Zoom (aplicable a un objeto Window) afecta la proporcionalidad entre ambos tipos de medida
- la resolucion de salida (impresora) puede mostrar proporcionalidades diferentes (vs. pantalla)
- en las propiedades de la pantalla (windows) cada usuario puede personalizar los puntos por pulgada
- se necesita factorizar las diferentes unidades de medida (etc. etc. etc.)

c) el ejemplo que te expongo en seguida, ajusta las dimensiones de la celda activa a un cuadrado de +/- 12 cms
puedes adaptarlo para trabajar con grupos/bloques de celdas y/o por medio de bucles/ciclos
NO te aseguro que las medidas sean exactas (por los factores) pero de que la celda se cuadra... se cuadra !!!

=== en un modulo de codigo normal ===
Sub CuadrarCeldaActiva()
Dim Cms As Double, Fx As Double
Cms = 12
With ActiveCell
.ColumnWidth = Cms
Fx = .Width / .ColumnWidth
.ColumnWidth = Application.CentimetersToPoints(Cms) / Fx
Fx = .Width / .ColumnWidth
.RowHeight = .ColumnWidth * Fx
End With
End Sub

d) otra forma de dimensionar alto de fila y ancho de columna...

=== en un modulo de codigo normal ===
Sub CeldaActivaEnMilimetros()
Dim Ancho As Single, Alto As Single, Fx As Single, Fy As Single
Ancho = 80 <= indica al ancho en milimetros
Alto = 80 <= indica al alto en milimetros
Ancho = Ancho / 10
Alto = Alto / 10
Fy = Alto / Ancho
With ActiveCell
.ColumnWidth = Ancho
Fx = .Width / .ColumnWidth
.ColumnWidth = Application.CentimetersToPoints(Ancho) / Fx
Fx = .Width / .ColumnWidth
.RowHeight = .ColumnWidth * Fx * Fy
End With
End Sub

[gben...@gmail.com]

Gracias por la respuesta Hector.
Lo probé y funciona perfecto!
Saludos
Guido