vfp全面控制excel(存儲(chǔ)版)
【正文】 agebox(39。) = DDETerminate(mChanNum) = DDESetOption(SAFETY,lOldSetOpt) RETURNENDIF。,64,39。Excel39。amp。amp。amp。amp。最小化=4140，最大化=4137，還原=4143◆后臺(tái)操作報(bào)警關(guān)閉：=.F. amp。lnSheetCnt為工作表總數(shù)◆激活工作表：(Sheet1).Activate amp。新建工作表數(shù)量定為1個(gè)◆新增EXCEL工作?。骸舢?dāng)前工作薄工作表總數(shù)： amp。amp。例：ExcelSheet = GetObject(39。 39。 Exit 39。 If Not Empty((k).acame )(ID:39。 obj=(i).Controls(j) Str1=Str1+Chr(13)+Alltrim(Str(i))+39。amp。*!* 33．設(shè)置字體(2,1).=黑體*!* 25．設(shè)置頁(yè)面垂直居中=.T.后面的28可以自定義，表示字體的大小P頁(yè)*!* 15．設(shè)置頁(yè)眉(字體大小)=amp。*!* 9．設(shè)置指定行的高度(單位：磅)(1).RowHeight=1(設(shè)定行高為1磅，1磅=)(50:100).RowHeight=1 amp。這就需要我們?cè)赩FP中直接來(lái)控制Excel。amp。 設(shè)置四個(gè)邊框線條的類型(FWQ).Borders(4).LineStyle=1amp。amp。amp。 設(shè)置行顏色為[淡蘭](A1:BE29).NumberFormatLocal = ；_ * , 。amp。amp。 設(shè)置指定行的高度(單位：磅) 在第2列之前插入一列(1,2).value=ABTMCamp。amp。amp。 退出Excel單元格的設(shè)置amp。amp。amp。amp。最近正好有空，看到不少人對(duì)VFP控制EXCEL有興趣，現(xiàn)將上次的“精華貼”重新整理一下，供各位愛好者參考！ = amp。 顯示Excel窗口=.F.amp。amp。 放棄存盤 存盤（自動(dòng)存盤不提問(wèn)）amp。 刪除列(A:B).Delete 設(shè)置四個(gè)邊框線條的類型(A1:BE29).Borders(3).LineStyle=1 amp。 在第1行之前插入一行(2).Insertamp。BBBB 清除單元格公式(1).RowHeight=1/amp。amp。amp。 指定區(qū)域內(nèi)的數(shù)字顯示格式打印頁(yè)面的設(shè)置=3/amp。 設(shè)置頁(yè)面垂直居中=8(1－窄行8 5 11 39－寬行14 11)=2 在第4列之前刪除分頁(yè)符=.t.縮放90%記錄條數(shù)的利用 設(shè)置四個(gè)邊框線條的類型(FWQ).Borders(3).LineStyle=1amp。amp。比如我們可以利用VFP進(jìn)行處理數(shù)據(jù)，而利用Excel的預(yù)覽打印功能進(jìn)行報(bào)表打印。*!* 8．設(shè)置指定列的寬度(單位：字符個(gè)數(shù))(1).ColumnWidth=5*!* 14．設(shè)置頁(yè)眉=報(bào)表1*!* 16．設(shè)置頁(yè)腳=第amp。39。*!* 24．設(shè)置頁(yè)面水平居中=.T.*!* 32．在第2列之前插入一列(2).Insert*!* 40． (1).Controls(1).accChild(18).Execute amp。)39。+(i).Controls(j).acame+39。 Str1=Str1+Chr(13)+39。 Endtry+Alltrim(Str(bars))+39。) 返回結(jié)果為類，則成功。lcFileName) amp。amp。amp。amp。關(guān)閉EXCEL后通常應(yīng)釋放實(shí)例變量：Release oExcel◆打印當(dāng)前工作簿：(1,1,.T.)
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1