列選擇和工作表_更改

當用戶選擇工作表中的代碼嘗試評估對每個單元格所做的更改時，整個列都出現問題。我怎麼能寫一個簡單的if語句，如果整個列或列被選中退出子？列選擇和工作表_更改

我相信我的問題在於這條線For Each cell In target.Cells。

這樣之後發生，所以我想我可以在一條線上，如嵌入此幾件事情：

如果選擇= .Columns。（「A：A」）EntireColumn.Select然後退出子。

如何定義「.Columns（」A：A「）」爲任何列選擇？

來源

2014-10-30 RL001

請將您正在嘗試的代碼添加到問題中 – user3271518 2014-10-30 16:17:09

選擇列不會觸發'Worksheet_Change'事件......這是怎麼回事？ – 2014-10-30 16:24:54

**發佈你的代碼。** – 2014-10-30 16:33:57

Private Sub Worksheet_SelectionChange(ByVal Target As Range) 

    If Application.Selection.Rows.Count = Application.Selection.EntireColumn.Rows.Count Then MsgBox ("entire column") 'do something here 

End Sub

很明顯，這不是完整的代碼，你需要將它合併到你現有的宏中。

來源

2014-10-30 17:24:30 ExactaBox

列選擇和工作表_更改

回答

相關問題