Are you wanting to do this manually?
or with a macro?
To do it manually,
1. Select the sheets you want updated.
2. Select Sheet1
3. Right-click on the first column to change
4. Select Column Width from the menu
5. Hit "OK" (or change the ## and hit OK)
Repeat steps 3-5 for all columns...
--------------------------
If you want to use a macro:
This macro will change ALL sheets to be the same column width as the sheet
named
"Sheet1".
---------------------------------------------------------------------------------------------------------------------
Option Explicit
Sub Match_ColumnWidth()
Dim Col, ColFirst, ColLast
ColFirst = 1
ColLast = 30
ActiveWorkbook.Sheets.Select
Sheets("Sheet1").Activate
Application.ScreenUpdating = False
For Col = ColFirst To ColLast
Cells(1, Col).EntireColumn.Select
Selection.ColumnWidth = Selection.ColumnWidth
Next Col
Application.ScreenUpdating = True
Range("A1").Select
End Sub
---------------------------------------------------------------------------------------------------------------------
If you want only SPECIFIC sheets changed (not all sheets in the workbook)
then change the following macro to include only those sheets you want to update:
---------------------------------------------------------------------------------------------------------------------
Sub Match_ColumnWidth2()
Dim Col, ColFirst, ColLast
ColFirst = 1
ColLast = 30
Sheets(Array("Sheet1", _
"Sheet2", _
"Sheet3", _
"Sheet4", _
"Sheet5", _
"Sheet6", _
"Sheet7", _
"Sheet8", _
"Sheet9" _
)).Select
Sheets("Sheet1").Activate
Application.ScreenUpdating = False
For Col = ColFirst To ColLast
Cells(1, Col).EntireColumn.Select
Selection.ColumnWidth = Selection.ColumnWidth
Next Col
Application.ScreenUpdating = True
Range("A1").Select
End Sub
Paul
-----------------------------------------
“Do all the good you can,
By all the means you can,
In all the ways you can,
In all the places you can,
At all the times you can,
To all the people you can,
As long as ever you can.” - John Wesley
-----------------------------------------
________________________________
From: Prince Dubey <prince141...@gmail.com>
To: excel-macros@googlegroups.com
Sent: Thu, July 12, 2012 12:11:20 PM
Subject: $$Excel-Macros$$ Re: column width - Reg
Hi Mothi,
Please attach your workbook, your question is not clear.
regards
prince
On Thursday, 12 July 2012 20:48:49 UTC+5:30, mothi wrote:
Dear any one
>
>
>I am using sheet1 worksheet column a to n , Column width is differents based
>on
>datas. same data format different places up 20 sheets.
>i want align sheet 2 to 20 column width based on sheet1.
>
>
>Thanks with
>
>
>
>--
>
>J.Mothilal : Universal Computer Systems : # 16, Brindavan Complex :Otteri,
>Vellore-2
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Cross-promotion of, or links to, forums competitive to this forum in
signatures are prohibited.
NOTE : Don't ever post personal or confidential data in a workbook. Forum
owners
and members are not responsible for any loss.
------------------------------------------------------------------------------------------------------
To post to this group, send email to excel-macros@googlegroups.com
To unsubscribe, send a blank email to excel-macros+unsubscr...@googlegroups.com
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Cross-promotion of, or links to, forums competitive to this forum in
signatures are prohibited.
NOTE : Don't ever post personal or confidential data in a workbook. Forum
owners and members are not responsible for any loss.
------------------------------------------------------------------------------------------------------
To post to this group, send email to excel-macros@googlegroups.com
To unsubscribe, send a blank email to excel-macros+unsubscr...@googlegroups.com
