如何替换VF中的一列数据

2024-12-19 21:37:35
推荐回答(2个)
回答1:

你得会编程才行,我只能提示,你搜索下面两行的关键词(文件名可以自定义)
oExcel = CREATE("Excel.Application")
oExcel.Workbooks.open("c:\abc\你的excel.xls")
......
思路如下,找班级所在列,不妨保存到col_ban;
从第2行(可定义从第x1行开始)开始处理,一直到出现空行为此。
x1 = 2
new_ban = oExcel.ActiveSheet.Cells(x1 , col_ban) &&从excel 读取班级
new_key = oExcel.ActiveSheet.Cells(x1 , 1) &&从excel 读取关键字(自定义)
sele vf_table
replace all 班级 with '' && 假设你有必要清完数据库的班级
do while new_ban > ""
replace for the_key = new_key 班级 with new_ban
x1 = x1 +1 && 下一行
new_ban = oExcel.ActiveSheet.Cells(x1 , col_ban) &&从excel 读取班级
new_key = oExcel.ActiveSheet.Cells(x1 , 1) &&从excel 读取关键字(自定义)
loop

回答2:

excel中的“文件”菜单“另存为”打开另存为对话框,保存类型选择“DBF 4”,保存为VF的表文件;再从VF中操作即可。反之,也可把vf中的表“导出”为Excel文件。