Question

VB查询excel里面的内容，ctrl+F

我想实现点击按钮时，就到excel里面根据按钮的名称（例如按钮caption叫AA）找到AA这一格（例如找到是在C2这里），然后我想读取C2+1（C3）这一格的内容，放到一个文本里，并在C2+2（C4）里面写入一个数据，这应该怎么实现？

还有我想这个excel表是点击按钮输入密码后才进入的，但excel文本放在文件夹里面，就起不到保密功能，要怎么解决？是把excel表内置到exe里面？
在另外一个窗体画一个excel的sheet就可以起到保密了对吧？

Answer 1

在Sheet里可以直接用Find方法查找值，找到目标后可以用Offset去取相对目标位置的单元格的值。
在Excel里说安全保密，高手面前都是浮云。真想保密还是抛开Excel想其他办法,比如EXE+加密文本。

追问

能不能写个简单例子

追答

下面是关于Find的简单例子：

'........
lookFor = "AA" '按钮caption是AA
Set Rng = ActiveSheet.UsedRange.Find(lookFor)
If Not Rng Is Nothing Then
str1 = Rng.Offset(1) '取出下偏移一行的值
'Debug.Print str1
Rng.Offset(2) = "鸡肉发芽营养更高" '下偏移二行的单元格赋值
Else
MsgBox "No find!"
End If
'........

Answer 2

保密问题在excel里加密码就可以啊 相关实例可以提供

追问

可以把实例上传到 "知道" 吗

追答

不可以 2140586