Fråga : Hur kan jag visa strömkolonnbredderna av en Excelarbetssedel?

I Excel 2003, jag skulle något liknande för att vara kompetent att välja en singelarbetssedel, och därefter att köra en makro, som skulle, skapa en ny arbetssedel och visa ror in 1 kolonnbredderna av den utvalda worksheet. " klar "

Svar : Hur kan jag visa strömkolonnbredderna av en Excelarbetssedel?

Om du önskar att matcha värderar anmält av objektet för menyn för bredden för den formatera… cell… kolonnen, då den ska efter makroen gör så. Den frågar användaren att välja en spänna av celler som inkluderar de önskade kolonnerna. Den ska tillfogar därefter en arbetssedel på avsluta av arbetsboken för att visa kolonnbredderna.

Brad

1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16:

UnderColumnWidths () Dunkel targ som spänner, cel som spänner På felmeritförteckning därefter Fastställd targ = Application.InputBox (”behaga valt spänna som du önskar att anmäla kolonnbredder för”, typ: =8) På fel GoTo 0 Om targ är ingenting därefter, gå ut suben Application.ScreenUpdating = falskt Fastställd targ = targ. Ror (1) Med Worksheets.Add (after: =Worksheets (Worksheets.Count)) För varje cel i targ. Celler . Celler (1, cel. Kolonn) = cel.EntireColumn.ColumnWidth Därefter Avsluta med Application.ScreenUpdating = True Avsluta suben