返回列表 上一主題 發帖

[發問] 請問當滑鼠移到B1上方時,如和利用VBA讓C1~E1字體和欄框放大?

回復 1# 棋語鳥鳴
只要滑鼠游標移到指定的儲存格就要做變更而不是點選它後才變更嗎?
這個需求在我印象中 Excel 好像沒有提供此事件的驅動功能,
我猜可能要用 Windows API 層級的函數才能做到吧?

然而如果是點選指定儲存格後才做變更那麼可以用 SelectionChange 事件函數來實現 :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  With Target
    If .Column = 2 And .Row < 9 Then
      With Range(.Offset(0, 1), .Offset(0, 3))
        .Columns.ColumnWidth = 21
        .Rows.RowHeight = 57
        .Font.Size = 30
      End With
    End If
  End With
End Sub

TOP

        靜思自在 : 能付出愛心就是福,能消除煩惱就是慧。
返回列表 上一主題