ecel如何用vba設定符合條件的單元格填充顏色為紅色

2021-05-02 06:36:04 字數 2442 閱讀 8445

1樓:慶年工坊

sub xx()

m = activesheet.usedrange.item(activesheet.usedrange.count).row

n = activesheet.usedrange.item(activesheet.usedrange.count).column

for i = 12 to n

if cells(1, i) <> "" then

for j = 2 to 11

if cells(1, j) = cells(1, i) then exit for

next

for k = 2 to m

if cells(k, i) <> "" and cells(k, i) = cells(k, j) then cells(k, i).interior.colorindex = 3

next

end if

next

end sub

2樓:zzllrr小樂

'寫了這段**,你應該能看懂

sub color_by_zzllrr

for i=4 to 12

for j=1 to 10

if cells(i,12+j*2)=cells(i,j+1) then

cells(i,12+j*2).font.color=vbredend if

next j

next i

end sub

3樓:百

public c   '定義全域性變數c

private sub worksheet_selectionchange(byval target as range)

on error resume next

dim one, c1%

if target.column > 1 and target.column < 12 then c = target.

column '如果第一次選中的單元格在b-k列之間,則記錄此時列號

if c = 0 then exit sub

c1 = target.column

if c1 > 13 then

for one = 4 to 12 '因為你的資料在第4行到第12行之間

if cells(one, c1) = cells(one, c) then '比較兩列的資料

cells(one, c1).interior.colorindex = 3 '塗顏色

end if

next    '比較下一個

c = 0 '清空c

end if

end sub

用法: **貼上在表1的**頁中

1、在資料1中要比較的那列隨便選一個單格

2、在資料2中要比較的那列隨便選一個單格

4樓:匿名使用者

我做了一個,沒辦法發給你

excel怎麼將符合條件的單元格變成紅色

5樓:匿名使用者

可以用篩選把100的篩選出來,然後選中標示成紅色就可以了。

6樓:

先篩選出成績為100的,然後將單元格填充為紅色,工具欄上有,希望對你有所幫助!

7樓:匿名使用者

選a列——選單欄——格式——條件格式——公式:=or(a1=100))

再點「格式」——選顏色——確定——確定。

8樓:魚木混豬

可以用條件格式來實現,舉例說明如下:

1.將a列重複資料單元格填充為紅色:

2.開始,條件格式,突出顯示,其他規則:

3.選擇「對重複值設定格式」,格式設定為紅色填充:

4.完成後結果如下:

excel中,如何將某列中滿足特定條件的單元格填充顏色?

9樓:

選中f列——格式——條件格式——公式

=f1<=e1*0.3 填充一種顏色新增條件

公式:=f1>e1*0.3 填充另一種顏色你的要求小於等於一種顏色,大於等於一種顏色。當等於時如何選擇?很矛盾,所以我在大於那去掉了等於的條件。

10樓:匿名使用者

可通過設定條件格式解決,步驟如下:

1、選定f列,點選單「格式」——「條件格式」,在「條件1」下選擇「公式」,在「公式」後輸入=f1=e1*30%,點「格式」,點「圖案」標籤,選擇另一種顏色,「確定」。

11樓:cxl8398時代

一、選中整列--條件格式--新建規則

二、選擇第1項「使用公式確定要設定格式的單元格」;

第2項設定條件公式;

第3項設定單元格填充顏色。最後確定

VBA如何用變數表示控制元件名

如果該控制元件位於userform窗體中,那麼我們可以用controls集合來表示指定的控制元件,例如,userform1中有三個控制元件,label1,label2,textbox1 那麼,我們可以這樣表示 a 1 b 2 userform1.controls label a caption 表示...

如何用ecel求帶單位的數求和,如何用excel求帶單位的數求和

1 電腦開啟excel 然後開啟要求和的帶單位的文件資料。2 開啟文件之後,在求和單元格中輸入公式 sumproduct 1 substitute c3 c8,元 3 輸入公式 sumproduct 1 substitute c3 c8,元 後,按回車鍵就可以得到求和的資料了。1.選中資料預定資料所...

請問如何用VBA將EXCEL檔案中的資料複製到別EXCEL檔案相同的位置

sheet1的區域a1 c3拷貝到sheet2的區域a1 c3 sheet1.range a1 c3 copy sheet2.range a1 c3 sub aaa dim sh1 as worksheet dim sh2 as worksheet set sh1 workbooks 1.xls s...