Question

vb OLE控件中显示excel不正常的问题

我在ole中打开一个excel工作簿，设置了每次打开的时候都是显示的第一张工作表，但是打开后控件中显示的是如图1.即使刚开始正常，我有一个切换工作表的按钮，切换了下一页工作表后还是显示如图1.我想不论怎么操作。都显示的是正常的如图2，怎么弄啊？





Answer 1

在窗体添加ole1控件和一个按钮command1，command1命令代码：
OLE1.SizeMode = 2
OLE1.CreateLink "c:\1.xls"

追问

完全和我问的不是一回事

Answer 2

1楼虽然说的不是一个流程但也指出了关键点，很可能是这个属性的问题：SizeMode
试试改成 2 - AutoSize，即根据文件的布局自动调整OLE控件

追问

OLE1.SizeMode = 2
OLE1.CreateLink CommonDialog1.FileName
OLE1.object.Sheets(i).Activate '保证打开时显示excel的第一个工作表
问题就在这最后一句。打开后ole是拉长的，怎么能永久显示正常