使用 Excel 的 VBA 宏(适用于大量标记)

如果你有很多需要标记的行,可以通过编写一个 VBA 宏来自动化这个过程。以下是 VBA 宏的示例代码:

  1. Alt + F11 打开 VBA 编辑器。
  2. 在左侧的“VBAProject”窗口中,右键点击你的工作簿,选择“插入” > “模块”。
  3. 在打开的模块窗口中,粘贴以下代码:

    Sub AddMarkInFirstColumn()
        Dim ws As Worksheet
        Dim searchRange As Range
        Dim cell As Range
        Dim searchValue As String

        ' 设置工作表和搜索值
        Set ws = ActiveSheet
        searchValue = "IEEE TRANSACTIONS ON VEHICULAR TECHNOLOGY"  ' 你可以直接指定搜索值

        ' 搜索范围,可以根据需要调整范围
        Set searchRange = ws.UsedRange

        ' 遍历所有单元格,查找并标记
        For Each cell In searchRange
            If cell.Value = searchValue Then
                ' 如果找到匹配的值,在该行的第一列添加标记
                cell.EntireRow.Cells(1, 1).Value = 1
            End If
        Next cell

        MsgBox "操作完成!"
    End Sub

  4. 关闭 VBA 编辑器,回到 Excel。
  5. Alt + F8 打开宏窗口,选择 AddMarkInFirstColumn,然后点击“运行”。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值