[求助]关于控件属性与文件修复

pengjie1

诸位大虾在上，小弟有难，还望援手： 难一：如何通过VBA设置控件工具箱中列表框控件的列宽？————好象Columnwidths不太好用,折腾半天还是默认的1EN，如何是好？——（VB帮助含糊不清，胡如一耄耋老者，以其昏昏，何以使人诏诏？！所以是指望不上了……） 难二：小弟历时一日整出来的EXCEL文件在非法关闭后死也打不开，后赶紧重装OFFICE2000、IE5.5、WIN98后仍无起色（具体症状是：打开EXCEL后，出现内容页面，同时立马没有响应，只能结束任务了事，而其它EXCEL文件照开如常），真是愁死我也。。。 眼看东西就要“交货”，所以特地向诸位大侠求援，还望念在VBA爱好与使用者一脉，赐予秘笈——他日小弟功成风光之际，一定感恩戴德，诸如立生祠、塑金身之类当不在话下。。。哈哈。。。

pengjie1

wswx: 一、大虾，所言不差，真是一言点醒梦中人——直接在属性框中输入像素数即可。 二、我已自行解决——先不启用宏进入，再把可能有问题的模块先导出、移除再重新进入编辑代码，一切OK，无论如何，感谢您的热情帮助。 小弟还有一事不明：您的回应怎地如此迅速？ 全职斑竹？ 这个网站相当不错，但我却看不出盈利模式——恕我驽钝。 无论是兴趣与爱好使您投身此项事业，还是有利益动机，您都使人钦佩——因为，奉献总应有回报，无论是精神还是物质上的。 有空的话，真的希望能向您讨教办站的心得。

shuiyuan

To pengjie1： 请参考下列语句修改即可： Sheets("Sheet1").Shapes("ListBox1").Width = 100

sqac

kevin的许多都令我感动，希望大家共同努力，把这个网站做的更好！

wswx

To:pengjie1 回应迅速只是碰巧。至于盈利模式，其实都是kevin在默默作贡献，我们今天能在这里交流，全仗kevin对Excel的一份热爱与他的一份责任心，在这里我们应该对他说声“谢谢”！

wswx

To:pengjie1 1）若为两列，Columnwidths="40;50" 2）如果方便把文件发给我，我帮你看看！