VFP 愛用者社區

kueisen1 · 註冊時間: 2005-02-20 文章: 27 第 1 樓

請問各位大大 ,我有二段 VB 控制 Excel 的程式不知
要如何更改成 Foxpro 才能在 Foxpro 上執行謝謝 !!

1. 將 Excel 背景設定成 04_05_1.jpg 圖檔
ActiveSheet.SetBackgroundPicture Filename:="C:\04_05_1.jpg"

2. 將 Excel [設定格式化條件] ,當 F5:F54 中數質<10 則出現淡黃色 .

Range("F5:F54").Select
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlLess, _
Formula1:="10"
Selection.FormatConditions(1).Interior.ColorIndex = 19

謝謝 !!

marvin · 註冊時間: 2004-06-01 文章: 321 第 2 樓

何不先看看這裡:

http://vfp.sunyear.com.tw/viewtopic.php?t=92

或者搜尋一下更多.

garfield · 發表於: 星期二二月 06, 2007 2:27 pm 文章主題:

1.一般像 ActiveSheet.SetBackgroundPicture Filename:="C:\04_05_1.jpg"
只要將 Filename:="C:\04_05_1.jpg" 放到函數的參數列即可
像 .ActiveSheet.SetBackgroundPicture( "C:\04_05_1.jpg" )

2.Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlLess, _
Formula1:="10"
跟1雷同, 但 xlCellValue 代表的數值是多少, 請到vba 裡的"即時運算"視窗查看.

kueisen1 · 註冊時間: 2005-02-20 文章: 27 第 4 樓

謝謝!! 各位先進....