Question

全部，我对VBA完全不熟悉，但想要获得一个幻想足球选秀模拟代码，以便重置＆＃34;选择草案。

参数：数据大小为12个小组（列）和18个小组（行）。数据不相邻，所以我命名了我要重置的范围＆＃34; DataVal＆＃34;

联盟是一个守门员联盟，这意味着选秀前已经有选手参赛选手，所以我不想让那些被淘汰出局。为了区分保持和未保持的球员，未保守的球员在括号中占据一席之地。

请求：我想要一个代码清除所有包含＆＃34; （＆＃34; 或如果不可能的话，＃34;（RB）＆＃34;，＆＃34;（QB）＆＃34;，＆＃34;（WR）＆＃34;，＆＃34;（TE）＆＃34;，＆＃34;（TD）＆＃ 34;，＆＃34;（PK）＆＃34; 在范围＆＃34; DataVal＆＃34;我可以附加到按钮

Answer 1

尝试在常规模块中添加此代码：

Sub ClearCells()

Dim rng as Range

With Range("DataVal") 'You had a named range named "DataVal" right?
    For each rng in .cells
        If Left(rng.value, 1) = "(" Then 'All values that start with "("
           rng.ClearContents
        End If
    Next rng
End With
End Sub

如果单元格中的第一个字符为＆＃34;（＆＃34;它将清除该单元格。

，它会遍历您指定范围内的每个单元格。

接下来，添加一个按钮并附加＆＃34; ClearCells＆＃34;它的宏。

在发布下一个之前仍然阅读How do I ask a good question。

VBA清除指定范围内包含特定字符

1 个答案: