VFP 愛用者社區

[KKKLYNN]

我寫到如下
(eole.rows(vrow).select
eoloe.select.hide

變數卻無法帶入
也嘗試
&vrow
也是失敗
敬請協助

另打開 xls 若內附公式連結
會出現提示警告
不是否可自動取消
我是寫到
eole.updatelink=0
也是失敗
另
eole.workbooks.open(cc,ipdatelink=0)
也是失敗
以上敬請

[garfield]

1.
vrow='6'
表示要將第6行select
執行起來很正常, 不須使用 &vrow

2.
eole.workbooks.open(cc,0)

==== help ===
expression.Open(FileName, UpdateLinks, ReadOnly, Format, Password, WriteResPassword, IgnoreReadOnlyRecommended, Origin, Delimiter, Editable, Notify, Converter, AddToMRU)

expression 必要的運算式。該運算式傳回一個 Workbooks 物件或 RecentFile 物件。

FileName 必要的 String 資料型態。要開啟的活頁簿檔案名稱。

UpdateLinks 選擇性的 Variant 資料型態。指定檔案中的連結的更新模式。如果省略本引數，則提示使用者選擇連結的更新模式。否則，該引數的取值應為下表的某個值。

取值 意義
0 不更新任何參照。
1 更新外部參照，但不更新遠端參照。
2 更新遠端參照，但不更新外部參照。
3 更新所有遠端參照和外部參照。


如果 Microsoft Excel 正在開啟以 WKS、 WK1 或 WK3 格式儲存的檔案並且 UpdateLinks 引數設為 2，則 Microsoft Excel 根據與該檔案關連的圖形建立圖表。如果該引數設為 0 ，則不建立任何圖表。

[KKKLYNN]

1.
eole.workbook.open(cc,0)
是成功了!

2.問題還是出現
eole.rows(vcolumn).selection
eole.selection.hide

有問題?(程式段如下,給CELLS值正常,但ROWS就出問題)

DO while .t.
eole.cells(vcolumn,1).value=陽光理財a.年度 && 給單元格賦值
eole.cells(vcolumn,2).value=陽光理財a.年齡 && 給單元格賦值
eole.cells(vcolumn,.value=陽光理財a.解約金 && 給單元格賦值
eole.cells(vcolumn,9).value=陽光理財a.保障額度 && 給單元格賦值
eole.cells(vcolumn,11).value=陽光理財a.可能分紅 && 給單元格賦值

vcolumn=vcolumn+1

sele 陽光理財a
SKIP
IF EOF()
DO WHILE .t.
vx=1
eole.rows(vcolumn).Selection
eole.Selection.hide
vx=vx+1
IF vx=5
vx=1
vcolumn=vcolumn+2
ELSE
vcolumn=vcolumn+1
endif

IF vcolumn<v總年齡+5
exit
endif
ENDDO

eole.rows(vcolumn).Select
eole.Selection.hide

GO TOP
EXIT
ENDIF
ENDDO
敬請協助!謝謝!

[KKKLYNN]

一直是不出來(從excel 巨集錄製,然後套用至cfp)

後來我就開新檔,直接錄製,得到不同的code
就試試而成功

eole.rows(vcolumn).Select
eole.Selection.EntireRow.Hidden=.t.

我也不知為何?反正成功
謝謝! garfield 的指導
尤其是 檔案開啟免除 公式連結的提示說明
再次謝謝!