fffffxxxxxk 2023-09-25 15:34 采纳率: 0%
浏览 5

WPS的宏插件无法使用,一直显示bug

WPS宏插件无法正常使用

img


Sub Mapping_Click()

Dim i, j, dr, hr As Integer
Dim data, code As String


  dr = Worksheets("Êý¾Ý").Range("T65536").End(xlUp).Row
  hr = Worksheets("Ìæ»»Æ·Ãû").Range("B65536").End(xlUp).Row
  
  
For i = 2 To dr
  
  If Worksheets("Êý¾Ý").Cells(i, 20) <> "" Then
    
    For j = 2 To hr
    
    data = Worksheets("Êý¾Ý").Cells(i, 20)
    code = Worksheets("Ìæ»»Æ·Ãû").Cells(j, 1)
    
      If data = code Then
      
        Worksheets("Êý¾Ý").Cells(i, 20).Value = Worksheets("Ìæ»»Æ·Ãû").Cells(j, 2)
        
        Exit For
        
      End If
      
    Next j

  End If
    
Next i

MsgBox "OK"

End Sub

![img](https://img-mid.csdnimg.cn/release/static/image/mid/ask/896489626596146.png "#left")

  • 写回答

2条回答 默认 最新

  • 专家-赤兔[在线] 优质创作者: 编程框架技术领域 2023-09-26 04:00
    关注

    该回复引自免费微信小程序-皆我百晓生:


    根据提供的代码和截图看,似乎你正在使用WPS来编写一个宏插件,但遇到了问题并无法正常使用。根据你提供的信息,问题似乎与代码本身没有直接关系,而是在插件的运行过程中出现了 bug。

    在处理这种类型的问题时,我建议你尝试以下几个步骤来解决问题:

    1. 检查代码逻辑:确保代码的逻辑正确性,没有拼写错误、语法错误或其他常见错误。确保插件的逻辑与你的预期一致。

    2. 调试代码:可以尝试在代码中增加一些打印语句或调试断点,以跟踪代码的执行过程并查看变量的值。这将帮助你确定插件中可能出现错误的地方。

    3. 查找错误提示:如果在插件运行时显示了错误提示,尝试仔细阅读错误提示并搜索相关错误信息,以找到解决方案或更多的线索。

    4. 更新插件和版本:确保你正在使用最新版本的 WPS 和插件。有时,更新软件和插件可能修复一些已知的问题。

    5. 与社区寻求帮助:如果无法通过上述步骤解决问题,你可以尝试在 WPS 的官方社区或相关论坛上提问,向其他使用者和开发者寻求帮助。他们可能能够提供更具体的解决方案或指导。

    希望这些步骤能对解决你的问题有所帮助。如果问题仍然存在,请尽可能提供更多详细信息,以便我提供更准确的解决方案。请注意,由于没有具体的错误信息或更多的上下文,我只能提供一般性的指导。

    评论

报告相同问题?

问题事件

  • 创建了问题 9月25日