當前位置:首頁 » 辦公資訊 » excel聚光燈怎樣不用按f9

excel聚光燈怎樣不用按f9

發布時間: 2022-04-21 16:26:55

『壹』 excel聚光燈怎麼取消

通過設置一個按鈕來控制聚光燈功能的隨時關閉和開啟。效果為:

實現過程:
1、開發工具——插入——ActiveX控制項復選框——在設計模式下右鍵復選框——查看代碼,打開代碼輸入界面,粘貼下面的代碼:
Private Sub CheckBox1_Click() If CheckBox1.Value = False Then CheckBox1.Caption = "關" ActiveSheet.Cells.Interior.ColorIndex = xlNone Else CheckBox1.Caption = "開" End IfEnd Sub
2、在表單Worksheet_SelectionChange代碼編輯區,修改代碼:
Private Sub Worksheet_SelectionChange(ByVal target As Range)If CheckBox1.Caption = "開" Then Call 聚光燈(target)End SubSub 聚光燈(rg As Range)If Application.CutCopyMode = False ThenWith rg.Parent.Cells.Interior.ColorIndex = xlNone.EntireRow.Interior.Color = vbGreen.EntireColumn.Interior.Color = vbCyan.Interior.Color = vbRedEnd WithEnd IfEnd Sub

『貳』 excel 如何編寫代碼,設置自動刷新,不用F9鍵

Private Sub CommandButton1_Click()
On Error GoTo handleCancel
Application.EnableCancelKey = xlErrorHandler 'ESC鍵終止刷新
While True
Calculate '刷新,相當於按 F9
Wend
handleCancel:
'If Err = 18 Then
' MsgBox "You cancelled"
'End If
End Sub

『叄』 如何讓在excel中被選中的單元格所在的行和列高亮顯示

1、按Ctrl + A選中整張表格,點擊【開始】菜單下的【條件格式】,選擇【新建規則】。

『肆』 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都可以使用聚光燈啦。

『陸』 製作核對數據聚光燈,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")分別返回最後一個活動單元格的行號和列號信息。

『柒』 excel如何設置這個功能

這個叫聚光燈,

WPS內置此功能

OFFICE需要下載方方格子或者易用寶的EXCEL插件使用,也可以編寫個VBA代碼

熱點內容
馬路上汽車的噪音在多少分貝 發布:2023-08-31 22:08:23 瀏覽:1742
應孕棒多少錢一盒 發布:2023-08-31 22:08:21 瀏覽:1239
標准養老金一年能領多少錢 發布:2023-08-31 22:05:05 瀏覽:1526
湖北通城接網線多少錢一個月 發布:2023-08-31 21:59:51 瀏覽:1605
開隨車吊車多少錢一個月 發布:2023-08-31 21:55:06 瀏覽:1366
京東付尾款怎麼知道前多少名 發布:2023-08-31 21:52:58 瀏覽:1687
在學校租鋪面一個月要多少錢 發布:2023-08-31 21:52:09 瀏覽:1823
2寸有多少厘米 發布:2023-08-31 21:50:34 瀏覽:1458
知道電壓如何算一小時多少電 發布:2023-08-31 21:46:20 瀏覽:1445
金手鐲54號圈周長是多少厘米 發布:2023-08-31 21:44:28 瀏覽:1619