var rowIds = jQuery("#list1").jqGrid('getDataIDs'); for (var k = 0; k < rowIds.length; k++) { var curRowData = jQuery("#list1").jqGrid('getRowData', rowIds[k]); var cur = $("…
你想这样啊,试试这段代码看行不:右键工作表名称--查看代码,在空白处粘贴就可以 Private Sub Worksheet_SelectionChange(ByVal Target As Range) Cells.Interior.ColorIndex = xlNone Target.Interior.ColorIndex = 8 End Sub 复制代码…
在你要实现此功能的工作表标签右击,在弹出的菜单中选择编辑代码,然后输入下面代码保存即可! 如没有出现效果,则可能是禁用了宏的关系.所以要在安全选项中启用宏选项. Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim Rng As Range Set Rng = Target.Range("a1") Cells.Interior.ColorIndex = 0 '清除所有背景色 Rng.EntireColumn.I…