[英]Excel macro to insert certain characters into column
我目前正在使用這個。 雖然這暫時有效。 我希望添加允許我替換該列中所有內容的代碼。 不僅限於僅替換 0 或一個單詞。
.AutoFilter field:=6, Criteria1:="0"
Columns("F").replace What:="0", Replacement:="Not Needed", Lookat:=xlPart, searchOrder:=xlByRows, MatchCase:=False, Searchformat:=False, ReplaceFormat:=False
Worksheets("Sheet1").AutoFilterMode = False
Sub test()
Dim rg As Range
With ActiveSheet
Set rg = .Range("A1", .Range("C" & Rows.Count).End(xlUp)) 'change as needed
With rg
.AutoFilter Field:=3, Criteria1:="=0", Operator:=xlAnd 'change as needed
.Resize(.Rows.Count - 1, .Columns.Count).Offset(1, 0).SpecialCells(xlCellTypeVisible).Value = "X"
.AutoFilter
End With
End With
End Sub
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.