VBA常用技巧代码解析

fanana8582 · 发表于 2010-8-17 11:22

thx..........................

康斯坦丁 · 发表于 2010-8-18 03:59

楼主辛苦了，示例文件.part01下载不了？

tjx77 · 发表于 2010-8-18 10:04

这里与叶枫的联系起来应该会更好。

ivanwangl · 发表于 2010-8-18 12:30

shihaodongxi a

ljw531 · 发表于 2010-8-19 13:23

为什么示例文件.part01下载不了啊?

独立宣言 · 发表于 2010-8-20 00:44

bu cuo xie xie

szxlai · 发表于 2010-8-20 13:53

袁竹平老师你好！
我学着编制了一段代码，解决处理编制"记账凭证"，并将编制好的"记账凭证"转入"凭证库"保存，这一步代码基本可正常操作运行。
现在我想进一步在"凭证库"中实现查询凭证的操作，即：在"凭证库"中点击或选择某一张凭证号后，使其自动将"凭证库"里这张被选的凭证号的凭证再回到"记账凭证"中显示，以实现查询凭证的功能，但我尝试了几次，都不成功，由于我是初学，搞的有点晕晕的，希望能得到袁老师你的帮助。给你添麻烦，谢谢了！

KTHZ · 发表于 2010-8-20 23:41

老师你好，我是新手，想请教一个问题。下面这段代码是我学习编制的，用于验证输入的柜员号是否存在于柜员列表中。其中从第6行到第12行是从第三十三楼抄来的，但无法运行。我使用的是OFFICE2007，不知是否与版本有关，或者是其他的问题，请老师指点，谢谢。

1                Private Sub CommandButton1_Click()
2                Dim Rng As Range
3                Dim StrFind As String
4                StrFind = TextBox1.Text
5                With Worksheets("柜员列表").Range("A:A")
6                Set Rng = .Find(What:=StrFind, _
7                            After:=.Cells(Cells.Count), _
8                            LookIn:=x1Values, _
9                            LookAt:=x1Whole, _
10                            SearchOrder:=x1ByRows, _
11                            SearchDirection:=x1Next, _
12                            MatchCase:=False)

lnlyhsn · 发表于 2010-8-21 06:48

ding,踩,mark

zjdh · 发表于 2010-8-21 09:50

你的问题并不难，你既然只求楼主，我就不多嘴了！

		自动登录	找回密码
密码			免费注册

VBA常用技巧代码解析

请袁老师帮助！

回复 3179楼 szxlai 的帖子