⑴ 為什麼excel聚光燈輸入vba後實現不了自動跟蹤自動
excel聚光燈輸入vba後可以實現自動跟蹤。
1、excel中的聚光燈功能，當我們選擇行跟列的時候交叉部分的顏色會深一點，這就是聚焦效果。
2、然後我們進行點擊打開工作簿按ctrl+q進行打開點擊就可以出現效果。
3、接下來我們新建工作簿進行實現打開關閉，ctrl+q打開，ctrl+w關閉。
4、我們進行打開VBA進行編輯代碼如圖所示。
5、然後我們看一下mycls進行編輯如圖所示。
⑵ excel聚光燈設置 如果移動到其他沒有的話要怎麼做
1、首先ctrl+A全選單元格區域，然後打開開始選項卡中的條件格式——新建規則，
2、然後在新建格式規則對話框中，規則類型選擇使用公式確定要設置格式的單元格，在下面公式框中復制公式=OR(CELL(row)=ROW(),CELL(col)=COLUMN())，再打開下面的格式——填充——紅色——確定——確定，就可以看到表中有了聚光燈的效果了，但是怎麼移動到其他單元格就沒有聚光燈效果了？此時按下F9鍵就可以了。
3、對於函數=OR(CELL(row)=ROW(),CELL(col)=COLUMN())，邏輯函數or有兩個參數，表示滿足其中一個條件返回true，兩個條件都不滿足返回false。
4、CELL(row)=ROW()中的cell函數有兩個參數，第一個參數表示用於指定所需的單元格的信息類型，這個參數包括address（地址）、row（行數）、filename（工作表名稱）等十幾種，在單元格中輸入函數cell時會自動提示第一個參數。第二個參數表示了解信息的單元格，可以省略，這個函數實際應用比較復雜後續會專門進行介紹。
5、row表示行，col、cloumn表示列。cell（「row」）或者cell（「col」）表示指定單元格的信息類型為行數或者列數，即返回當前活動行或者列，而row（）函數和column（）函數表示當前所在單元格的行或者列。如果返回的活動行或者列滿足等於當前單元格所在的行數或者列數其中一個條件，則返回true，否則返回false。運用在條件格式中表示滿足條件，返回紅色填充。
6、至於F9鍵，表示手動刷新公式，在excel中利用函數實現一些動態顯示效果會用到這個鍵，比如製作隨機抽獎程序等。
⑶ Excel表格如何使用row函數和column函數和match函數來實現聚光燈效果
'按ALT+F11-插入模塊-粘貼代碼-將表格另存為啟用宏的格式
Private Sub Workbook_sheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
'Dim i As Range
Cells.Interior.ColorIndex = 0
'Set i = Application.Union(Target.EntireColumn, Target.EntireRow) '整行整列
Target.EntireRow.Interior.ColorIndex = 43 '整行
'Target.Cells.Interior.ColorIndex = 43'選擇單元格
End Sub
⑷ 製作核對數據聚光燈，excel怎麼突出顯示單元格
方法/步驟
1
我們做這個主要是要實現，在所選的單元格突出顯示，然後分別對應行和列。就跟橫縱坐標指示一樣，這樣在大量的工作表數據中就可以方便的進行核對。不然數據量大的看久了容易眼花。
2
我們選中數據內容。如果數據單元格比較大的話，可以直接在開始選項卡功能區的名稱框中輸入起始行列。比如我們輸入A1:F13，按下回車鍵就會選中該區域的數據。
3
在開始菜單功能區下，點擊條件格式，選擇新建規則。
4
在新建格式規則對話框中，點擊選擇「使用公式確定要設置格式的單元格」。
然後在「為符合此公式的值設定格式」中輸入公式。
我們輸入公式
=CELL("address") =ADDRESS(ROW(),COLUMN())
這個公式是什麼意思呢？
=CELL("address")這個是返回最後活動單元格的地址。
=ADDRESS(ROW(),COLUMN())這個是返回公式所在單元格地址。
整個公式就是活動單元格的地址如果等於公式所在單元格地址，那麼就返回一個邏輯值是。
公式寫好後，為其設置指定格式。點擊格式。格式中可以按實際需要設置需要的格式，這里我們為其選定一個填充黃色的底色。
這時預覽區就顯示了黃色，我們點擊確定。
看下效果，我們雙擊任意一個單元格時，這個單元格就會以黃色突出顯示。
下面我們要為其他設置行列跟隨突出顯示。
同樣我們選中數據，開始菜單功能區下點擊條件格式，選擇新建規則。
在新建格式規則對話框中，點擊選擇「使用公式確定要設置格式的單元格」。
然後在「為符合此公式的值設定格式」中輸入公式：
=OR(AND(CELL("row")=ROW(),CELL("col")>COLUMN()),AND(CELL("col")=COLUMN(),CELL("row")>ROW()))
然後點擊格式，選擇行列要填充的顏色，我們選擇一個藍色的，然後確定。
這里簡單說下=OR(AND(CELL("row")=ROW(),CELL("col")>COLUMN()),AND(CELL("col")=COLUMN(),CELL("row")>ROW()))這個公式的功能。這個有兩個條件。
條件一：AND(CELL("row")=ROW(),CELL("col")>COLUMN()) 最後活動單元格的行號等於公式所在單元格的行號，最後活動單元格的列號大於公式所在單元格的列號。
條件二：AND(CELL("col")=COLUMN(),CELL("row")>ROW()) 最後活動單元格的列號等於公式所在單元格的列號，最後活動單元格的行號大於公式所在單元格的行號。
這兩個條件滿足其一的，返回一個邏輯值 是。
這樣一個聚光燈的一個雛形就出來。但是我們發現當雙擊新的目標單元格時，條件格式並不能實時的跟蹤變化，需要按下F9才會刷新變化。這們的話就不夠便捷了，為此我們給他寫上一個簡單的VBA代碼，當活動單元格變化時強制立即更新窗口。
按ALT+F11打開VBA窗口，在資源管理器中，雙擊最下面的那個 ThisWorkbook。
在代碼輸入
Private Sub workbook_SheetSelectionChange(ByVal Sh As Object, ByVal target As Range)
Application.ScreenUpdating = True
End Sub
然後關閉這個VBA窗口。
現在我們再看看，單擊任意一個單元格，聚光燈就立即更新了。這樣就完成了，保存即可。
這樣的一個聚光燈就可以幫我們在大量的數據中精確顯示對應相關的內容，不容易造反對應錯誤，減少眼睛疲勞
剛才我們用到的函數補充說明：
CELL("address")是返回最後活動單元格的地址。
CELL("row")和CELL("col")分別返回最後一個活動單元格的行號和列號信息。
⑸ 電子表格聚光燈設置無反應怎麼回事
方法1：
第一步：選取區域 - 開始 - 條件格式 - 新建規則 - 使用公式... - 輸入以下公式：
=OR(CELL("row")=ROW(),CELL("col")=COLUMN())
再點擊格式按鈕，設置字體顏色為白色，填充色為綠色
第二步：工作表標簽右鍵菜單 - 查看代碼 - 在打開的Visual basic窗口把下面代碼粘貼到右側的空白窗口中。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Application.CutCopyMode = False Then
Application.Calculate
End If
End Sub
第三步：文件 - 另存為 - 格式選「啟用宏的Excel工作簿(excel2003跳過本步)
（最後需要注意的是因為我們使用了宏表函數以及vba，我們需要將excel另存為xlsm格式，也就是能保存宏的工作薄，這樣的話下次我們打開excel的時候聚光燈效果才會存在，否則的話聚光燈效果是不會存在的）
方法2：
方法1：
第一步：選取區域 - 開始 - 條件格式 - 新建規則 - 使用公式... - 輸入以下公式：
=OR(CELL("row")=ROW(),CELL("col")=COLUMN())
再點擊格式按鈕，設置字體顏色為白色，填充色為綠色
第二步：
選中一個單元格，按 F9 鍵，即可高亮顯示該單元格所在行和列。
⑹ excel十字定位或聚光燈製作
大家好，我是小西，一個周末還要加班的人。本來以為周末可以放假，可以愉快地去玩耍，結果被老闆喊過來加班。Excel表格數據實在是太多了，看得我眼睛都要累死了。對了差點忘了Excel還有聚光燈功能，下面就跟大家分享一下。
2、點擊【使用公式確定格式】，接著輸入公式：=(CELL("col")=COLUMN())+(CELL("row")=ROW())
受篇幅限制詳細內容點擊下方鏈接查看
Excel數據太多，眼睛很累怎麼辦，教你快速設置聚光燈
⑺ excel聚光燈設置的vba實現
您好，方法
1
先看效果圖，本聚光燈的效果是修改的單元格的背景樣式，不會改變原有的底色和邊框。
2
注意，由於水平有限，製作出來的聚光燈有一個缺陷，使用後會將未使用的單元格添加白色背景，如果您的數據使用了邊框和底色，將不會受到影響，從下圖可以看出，沒有使用到的單元格的網格線看不到了。如果對這個有介意的，可以忽略本方法，網路上有成熟的插件，使用起來效果會更好。
第一步：新建一個Excel，名稱自己喜歡就好。右擊標簽頁-查看代碼，打開代碼編輯窗口。
第二步：在左側工程界面右擊-添加-類模塊
Excel聚光燈載入宏【VBA】
第三步：雙擊打開類模塊編輯窗口，復制如下代碼到類模塊
Public WithEvents app As Excel.Application
Private Sub app_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Cells.Interior.Pattern = xlPatternAutomatic
Selection.EntireRow.Interior.Pattern = xlPatternGray8
Selection.EntireRow.Interior.PatternColor = B
Selection.EntireColumn.Interior.Pattern = xlPatternGray8
Selection.EntireColumn.Interior.PatternColor = B
Selection.Interior.Pattern = xlPatternAutomatic'上面是修改背景樣式，一般很少使用這種格式，所以幾乎不存在勿修改的情況
End Sub
Private Sub app_WorkbookOpen(ByVal Wb As Workbook)
Set xlapp.app = Nothing
End Sub
第四步：在左側工程窗口，右擊-添加-模塊。
第五步：雙擊模塊，復制如下代碼到模塊中
Public lampcolor As VariantPublic B As Variant
Public xlapp As New 類1
Sub auto_open()
Set xlapp.app = Application
End Sub
Sub auto_close()
Set xlapp.app = Nothing
' Cells.Interior.ColorIndex = xlNone
Cells.Interior.Pattern = xlPatternAutomatic
End Sub
Sub colorselection()
On Error GoTo 10
A = ActiveWorkbook.Colors(1)
Application.Dialogs(xlDialogEditColor).Show (1)
B = ActiveWorkbook.Colors(1)
ActiveWorkbook.Colors(1) = A
10 ActiveWorkbook.ResetColors
End Sub
第六步：Excel 文件-另存為-載入宏文件
地址就為默認地址就好，默認地址是一個隱藏文件夾，放在這里安全一些
Excel聚光燈載入宏【VBA】
第七步：顯示開發工具標簽頁，文件-選項-自定義功能區，右側勾選開發工具。
第八步：開發工具-載入項-瀏覽，找到剛剛另存為的載入宏，確認！
第九步：新建一個Excel，文件-選項-自定義功能區，從圖中4的位置下拉選擇宏；在圖中5位置新建一個選項卡（可以在9位置重命名），新建一個組（也可以重命名），然後在圖中7的位置依次將三個宏添加到新建的組中。
第十步：發現Excel工具欄中多了一個標簽頁，點擊open就可以使用了，點擊close就關閉，點擊colorselection就可以選擇顏色。
每當打開一個Excel文件時，默認都是關閉的，防止誤修改。
搞定！
以後每打開一個Excel都可以使用聚光燈啦。
⑻ wps聚光燈怎麼打開
WPS表格軟體裡面有一項讓EXCEL用戶比較羨慕的功能，就是閱讀模式聚光燈效果。
WPS裡面集成了此功能，用戶只需要滑鼠點擊某一單元格時，該單元格所在的行列會自動顯亮，在查看、核對數據較多時特別有用。
下面的動畫就是WPS聚光燈效果演示：
excel也可以實現這個功能，只是方式不同。前面已經分享了的！
