标题:VB6 取excel 区域(A6: F6)绝对值大的单元给,并复制到另外一工作表 C1
只看楼主
zhgfeng20
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2020-8-13
结帖率:100%
已结贴  问题点数:10 回复次数:1 
VB6 取excel 区域(A6: F6)绝对值大的单元给,并复制到另外一工作表 C1
想要把 Excel 1.xlsx sheet1.range("A6:F6") 绝对值大的单元格,复制 到Excel 2.xlsx 的 C1不知怎么操作,请大神指教。谢谢。
Dim xlApp As EXCEL.Application
Dim xlBook As EXCEL.Workbook
Dim xlSheet As EXCEL.Worksheet

Dim xlxlApp As EXCEL.Application
Dim xlxlBook As EXCEL.Workbook
Dim xlxlSheet As EXCEL.Worksheet

Set xlBook = xlApp.Workbooks.Open("C:\Users\Huaguo\Desktop\Temp1\1.xlsx")
Set xlSheet = xlBook.Worksheets(1)
...
Set xlxlBook = xlApp.Workbooks.Open("C:\Users\Huaguo\Desktop\Temp1\2.xlsx")
Set xlxlSheet = xlxlBook.Worksheets(1)
...
搜索更多相关主题的帖子: 绝对值 excel 复制 Dim Set 
2020-08-14 20:15
cwa9958
Rank: 10Rank: 10Rank: 10
等 级:贵宾
威 望:67
帖 子:247
专家分:1228
注 册:2006-6-25
得分:10 
求出指定区域里的最大值,写到C1就是了。
笨方法,对指定区域循环遍历。

函数 Max(A6:F6)

[此贴子已经被作者于2020-8-15 11:50编辑过]

2020-08-15 08:08



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-502858-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.136467 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved