返回列表 上一主題 發帖

一個變色問題

回復 1# hong912

工作表右鍵事件,選取範圍後按下滑鼠右鍵
  1. Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
  2. With Selection
  3.   .Interior.ColorIndex = 6
  4.   .Merge
  5. End With
  6. End Sub
複製代碼
學海無涯_不恥下問

TOP

        靜思自在 : 有心就有福,有願就有力,自造福田,自得福緣。
返回列表 上一主題