返回列表 上一主題 發帖

[發問] 指定欄位標示底色

回復 1# ziv976688
  1. If Sheets("Sheet1").Range("A4") = "A" Then
  2. Sheets("Sheet1").Cells(ActiveSheet.Rows.Count, 1).End(xlUp).Resize(1, 3).Interior.ColorIndex = 6
  3. End If
複製代碼

TOP

        靜思自在 : 君子為目標,小人為目的。
返回列表 上一主題