请问如何通过PB来定义excel表格的行高？？？？
xlsub=ExcelServer.Application.ActiveWorkBook.WorkSheets("sheet1")
//r+2为当前行数，即第几行
xlsub.rows("(r+2):(r+2)").rowheight = 32
问题点数：38、回复次数：5Top
1 楼ao（皮卡丘）回复于 2002-01-25 11:12:50 得分 0
难道就没人知道吗？
Top
2 楼ao（皮卡丘）回复于 2002-04-22 21:49:03 得分 0
有谁进来我就结贴，看谁运气好啦：）
Top
3 楼bpfrom（天籁之音）回复于 2002-06-30 16:54:06 得分 4
对于这个问题，如果你能够在excel里面用VB实现，那么你就可以在pb中得到解决。我用Access做数据库后台就经常这样。所以，建议先到excel中找方法。Top
4 楼SOFTFUN_CSDN（不知所云~）回复于 2002-06-30 23:43:03 得分 4
看看VBA应该可以解决的~Top
5 楼swjtu95（老狼）回复于 2002-07-03 22:05:52 得分 30
integer excelok, i, j
string myvalue
OLEObject ExcelServer
ExcelServer = CREATE OLEObject
ExcelOK = ExcelServer.ConnectToNewObject( "excel.application" )
ExcelServer.Visible = True
ExcelServer.Workbooks.Open("f:\book.xls)
//下面这两句是你需要的
ExcelServer.ActiveSheet.Rows("5:5").Select
ExcelServer.Selection.RowHeight = 32
Destroy ExcelServerTop
