日记首页V1.0


	日记首页 \| 列表 \| 添加日记 \| 管理登陆


	标题：列宽全部自适应

<DIV style="WIDOWS: 2; TEXT-TRANSFORM: none; BACKGROUND-COLOR: rgb(255,255,255); FONT-STYLE: normal; TEXT-INDENT: 0px; FONT-FAMILY: Tahoma, 'Microsoft Yahei', Simsun; WHITE-SPACE: normal; ORPHANS: 2; LETTER-SPACING: normal; COLOR: rgb(68,68,68); FONT-SIZE: 14px; FONT-WEIGHT: 400; WORD-SPACING: 0px; overflow-wrap: break-word; font-variant-ligatures: normal; font-variant-caps: normal; -webkit-text-stroke-width: 0px; text-decoration-style: initial; text-decoration-color: initial" class=msgborder>
<P style="PADDING-BOTTOM: 0px; MARGIN: 0px; PADDING-LEFT: 0px; PADDING-RIGHT: 0px; PADDING-TOP: 0px; overflow-wrap: break-word">假设我有N列数据，我想让这N列的数据，可以自动匹配合适的列宽，应该如何编写程序哦？</P>
<P style="PADDING-BOTTOM: 0px; MARGIN: 0px; PADDING-LEFT: 0px; PADDING-RIGHT: 0px; PADDING-TOP: 0px; overflow-wrap: break-word"></P></DIV>
<P style="PADDING-BOTTOM: 0px; WIDOWS: 2; TEXT-TRANSFORM: none; BACKGROUND-COLOR: rgb(255,255,255); FONT-STYLE: normal; TEXT-INDENT: 0px; MARGIN: 0px; PADDING-LEFT: 0px; PADDING-RIGHT: 0px; FONT-FAMILY: Tahoma, 'Microsoft Yahei', Simsun; WHITE-SPACE: normal; ORPHANS: 2; LETTER-SPACING: normal; COLOR: rgb(68,68,68); FONT-SIZE: 14px; FONT-WEIGHT: 400; WORD-SPACING: 0px; PADDING-TOP: 0px; overflow-wrap: break-word; font-variant-ligatures: normal; font-variant-caps: normal; -webkit-text-stroke-width: 0px; text-decoration-style: initial; text-decoration-color: initial">只需一句vba，所有的列宽全部自适应</P>
<P style="PADDING-BOTTOM: 0px; WIDOWS: 2; TEXT-TRANSFORM: none; BACKGROUND-COLOR: rgb(255,255,255); FONT-STYLE: normal; TEXT-INDENT: 0px; MARGIN: 0px; PADDING-LEFT: 0px; PADDING-RIGHT: 0px; FONT-FAMILY: Tahoma, 'Microsoft Yahei', Simsun; WHITE-SPACE: normal; ORPHANS: 2; LETTER-SPACING: normal; COLOR: rgb(68,68,68); FONT-SIZE: 14px; FONT-WEIGHT: 400; WORD-SPACING: 0px; PADDING-TOP: 0px; overflow-wrap: break-word; font-variant-ligatures: normal; font-variant-caps: normal; -webkit-text-stroke-width: 0px; text-decoration-style: initial; text-decoration-color: initial">sub AutocolsFit()<BR style="overflow-wrap: break-word">Columns.EntireColumn.AutoFit<BR style="overflow-wrap: break-word">end sub</P>