Question

<div id="menubar">
        <menu id="menu">
          <menuitem class="current"><a href="index.html">Home</a></menuitem>
          <menuitem><a href="news.html">News</a></menuitem>
          <menuitem><a href="positions.html">Positions</a></menuitem>
          <menuitem><a href="pandp.html">Policy &amp; Procedure</a></menuitem>
          <menuitem><a href="guides.html">Guides & Links</a></menuitem>
          <menuitem><a href="forms.html">Forms</a></menuitem>
        </menu>
      </div><!--close menubar-->

我试图在SheetA的第五列被触发的条件下填充SheetB的单元格A12，而我分配的SheetB A12的值是A＆amp;触发器的行。

但是，我似乎无法让代码工作。

如果有人能指出代码有什么问题会很棒！我想知道是否有人有关于调试子工作的提示，如Workbook_SheetChange / worksheet_change

修改

我发布了我的新代码，而不是使用workbook_sheetchange，我正在尝试workheet_change。

它仍然无法正常工作，但是，当我手动运行它确实有效。在即时窗口中，我输入“？Application.EnableEvents = True”并返回true。

Answer 1

这对我有用。这是SheetA。

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, WorkSheets("A").Range("V:V")) Is Nothing Then

    'Application.EnableEvents = False

    thisrow = Target.Row
    Debug.Print thisrow

    WorkSheets("B").Cells(12, 1).Value = WorkSheets("A").Cells(thisrow, 1).Value

    'Application.EnableEvents = True

End If

End Sub

编辑：根据vacip的评论。

用于将值从一个工作表粘贴到另一个工作表的vba worksheet_change不起作用，但可以手动工作

1 个答案: