返回列表 上一主題 發帖

[發問] 請教點選儲存格的問題

回復 3# mark15jill
須將以下之程式碼貼入到你的 "工作表1" 的程式碼區塊�� (而非 ThisWorkbook ��),貼完後再至 "工作表1"點點看!
  1. Private Sub worksheet_selectionchange(ByVal target As Range)
  2.     If target.Column = 1 Then
  3.        Cells.Interior.ColorIndex = xlNone
  4.        target.EntireRow.Interior.ColorIndex = 6
  5.     End If
  6.    
  7.     With ActiveWindow
  8.         .SplitColumn = 1
  9.         .FreezePanes = True
  10.     End With
  11. End Sub
複製代碼

TOP

        靜思自在 : 知識要用心體會,才能變成自己的智慧。
返回列表 上一主題