Private Sub LoginMasuk_Click()Dim Level As StringSet WsUserName = Sheets("Data")Set c = RgUserPas.Find(TextBox1.Value, LookIn:=xlValues, MatchCase:=False)
Passwor
我已经为Excel创建了一个外接程序,它决定了ActiveSheet和ActiveWorkbook的名称。我使用的代码如下所示。当我运行插件时,它在消息框"variables set“之后显示上述错误。但是当我在宏中运行它时,它工作得很好。我不明白外接程序是怎么回事。有人能帮我这个忙吗? Dim bk As Workbook, sht1 As Worksheet, sht2 As Worksheet, sht3 As Worksheet
Dim book As String, sht As String, i As Integer,
我正在解决一个“问题”,我需要使用VBA,否则我会使用excel公式。 我正在查找列的最大值,每一列都是该条目的对应名称。我想提取列的最大值并填充到单元格(2,17)中,然后在单元格(2,16)中填充相应的名称。希望这是有意义的。下面是我脚本中的部分(最后一行是我出错的地方): Dim max As Double 'values column defined above
我在VBA中运行此代码,但找不到为什么会出现91错误。我在发帖前真的在谷歌上查过了,谢谢你的回答。Dim ws As WorksheetSet ws = Sheets("Tirage_1")Dim i As Integer, j As Integer, n As Integer, m As Integer, tempString As Int
我已经在这个问题上挣扎了一段时间,但都没有成功。我写了一段代码来从数据库中导入一些数据,但添加的问题是它们的格式不同。所以我写了一个部分,它将遍历另一个库,并按正确的顺序返回数据(这不是整个代码。我已经为对象做了所有正确的set语句):Dim sheet_atual, sheet_verificar As WorksheetDim is_equal As Boolean