Cuestión : ¿Cómo puedo exhibir las anchuras de columna actuales de una hoja de trabajo de Excel?

En Excel 2003, quisiera poder seleccionar una sola hoja de trabajo, y después funcionar con una macro que crearía una nuevas hoja de trabajo y exhibición en la fila 1 las anchuras de columna del worksheet. seleccionado class= del

Respuesta : ¿Cómo puedo exhibir las anchuras de columna actuales de una hoja de trabajo de Excel?

Si usted quiere emparejar los valores divulgados por el artículo de menú de la anchura de columna de las células del formato……, después la macro siguiente hará tan. Pide que el usuario seleccione una gama de células que incluya las columnas deseadas. Entonces agregará una hoja de trabajo en el extremo del libro de trabajo para exhibir las anchuras de columnas.

Brad
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
ColumnWidths secundario ()
Targ dévil como gama, cel como gama
En curriculum vitae del error después
Fijar el targ = Application.InputBox (“seleccionar por favor la gama que usted quiere divulgar las anchuras de columnas para”, mecanografiar: =8)
En el error 0 indicado
Si el targ no es nada entonces salir el submarino

Application.ScreenUpdating = falso
Fijar el targ = el targ. Filas (1)
Con Worksheets.Add (después: =Worksheets (Worksheets.Count))
    Para cada cel en targ. Células
        . Células (1, cel. Columna) = cel.EntireColumn.ColumnWidth
    Después
Extremo con
Application.ScreenUpdating = verdad
Submarino del extremo
Otras soluciones  
 
programming4us programming4us