帖子: 3
主題: 1
精華: 0
積分: 12
點名: 0
作業系統: windows
軟體版本: Office 2007
閱讀權限: 10
性別: 男
註冊時間: 2011-4-6
最後登錄: 2011-5-21

1^# 跳轉到 » 正序看帖

打印

字體大小: tT

發表於 2011-4-27 02:16 | 只看該作者

[發問] 如何才能找尋所要的資料並在儲存格塗色?

wells330

中學生 Rank: 2

帖子: 35
主題: 8
精華: 0
積分: 57
點名: 0
作業系統: w7
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2010-6-1
最後登錄: 2021-2-19

16^#

發表於 2011-5-5 14:06 | 只看該作者

Hsieh超級版主你好!
感謝再感恩!

50 字節以內
不支持自定義 Discuz! 代碼

TOP

Hsieh

超級版主 Rank: 8 Rank: 8

帖子: 4901
主題: 44
精華: 24
積分: 4916
點名: 142
作業系統: Windows 7
軟體版本: Office 20xx
閱讀權限: 150
性別: 男
來自: 台北
註冊時間: 2010-4-30
最後登錄: 2026-7-16

2025年全勤獎章 2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章

15^#

發表於 2011-5-4 16:07 | 只看該作者

學海無涯_不恥下問

TOP

wells330

中學生 Rank: 2

帖子: 35
主題: 8
精華: 0
積分: 57
點名: 0
作業系統: w7
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2010-6-1
最後登錄: 2021-2-19

14^#

發表於 2011-5-4 09:53 | 只看該作者

你好!
多謝提醒!
同時為0"不動作"。

50 字節以內
不支持自定義 Discuz! 代碼

TOP

mark15jill

　暱稱: 隨風飄蕩的羽毛
　頭銜: [御用]潛水艇

高中生 Rank: 3 Rank: 3

帖子: 852
主題: 79
精華: 0
積分: 918
點名: 0
作業系統: Windows 7 , XP
軟體版本: Office 2007, Office 2003,Office 2010,YoZo Office
閱讀權限: 50
性別: 男
來自: 宇宙
註冊時間: 2011-4-8
最後登錄: 2024-2-21

13^#

發表於 2011-5-2 11:32 | 只看該作者

各位前輩大家好！
   在這裡學習良多，很精彩
   以上是比對文字，如果是數字比對該如何作？
   ...
wells330 發表於 2011-4-30 16:32

數字 ... 基本上是一樣吧...(儲存格類型會不同)
不過  感覺表達的文意有點怪..
   D2：D297的資料其中只要有儲存格是 0 則在B2：B297的相對位置（如D6是 0，B6的儲存格塗綠色文字顯示白色）
   E2：E297的資料其中只要有儲存格是 0 則在B2：B297的相對位置（如E6是 0，B6的儲存格塗紅色文字顯示白色）
這樣不會重疊嗎...+.+
如假使 d6 e6 同時為0... 那你的b6 要哪種顏色...

TOP

wells330

中學生 Rank: 2

帖子: 35
主題: 8
精華: 0
積分: 57
點名: 0
作業系統: w7
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2010-6-1
最後登錄: 2021-2-19

12^#

發表於 2011-4-30 16:32 | 只看該作者

各位前輩大家好！
   在這裡學習良多，很精彩
   以上是比對文字，如果是數字比對該如何作？
   D2：D297的資料其中只要有儲存格是 0 則在B2：B297的相對位置（如D6是 0，B6的儲存格塗綠色文字顯示白色）
   E2：E297的資料其中只要有儲存格是 0 則在B2：B297的相對位置（如E6是 0，B6的儲存格塗紅色文字顯示白色）

謝謝！

50 字節以內
不支持自定義 Discuz! 代碼

TOP

mark15jill

　暱稱: 隨風飄蕩的羽毛
　頭銜: [御用]潛水艇

高中生 Rank: 3 Rank: 3

帖子: 852
主題: 79
精華: 0
積分: 918
點名: 0
作業系統: Windows 7 , XP
軟體版本: Office 2007, Office 2003,Office 2010,YoZo Office
閱讀權限: 50
性別: 男
來自: 宇宙
註冊時間: 2011-4-8
最後登錄: 2024-2-21

11^#

發表於 2011-4-29 09:24 | 只看該作者

有個疑問...
為什麼要 for i = 1 to 3 ?

如果不要顏色的話
把 .Interior.ColorIndex = 3 刪除即可0.0

TOP

wuwulang

小學生 Rank: 1

帖子: 3
主題: 1
精華: 0
積分: 12
點名: 0
作業系統: windows
軟體版本: Office 2007
閱讀權限: 10
性別: 男
註冊時間: 2011-4-6
最後登錄: 2011-5-21

10^#

發表於 2011-4-29 08:40 | 只看該作者

很感謝各位大大的幫忙...謝謝你們
後來我在向朋友尋問時
他才跟我講，這是兩個題目是分開的＞＿＜

第２題題目我朋友是講
請問：
1.　若D欄的內容出現在A,則在鄰列出現V字樣
2.　for i =1 to 3，跑3個迴圈，有沒有相等，若有，請打V。

不用塗色。Ｑ＿Ｑ

TOP

mark15jill

　暱稱: 隨風飄蕩的羽毛
　頭銜: [御用]潛水艇

高中生 Rank: 3 Rank: 3

帖子: 852
主題: 79
精華: 0
積分: 918
點名: 0
作業系統: Windows 7 , XP
軟體版本: Office 2007, Office 2003,Office 2010,YoZo Office
閱讀權限: 50
性別: 男
來自: 宇宙
註冊時間: 2011-4-8
最後登錄: 2024-2-21

9^#

發表於 2011-4-28 15:24 | 只看該作者

0.0 我最後發的帖是由 chin15大大的方式加以延伸..
樓主的兩個需求
(若D欄儲存格有A欄的值則在B欄相對儲存格打勾)
只是會有點小誤判而已哈哈><!
剛剛試驗+應用應該誤判機率很低...除非是數字..

TOP

oobird

　頭銜: 街友一族

超級版主 Rank: 8 Rank: 8

帖子: 1572
主題: 16
精華: 2
積分: 1521
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 150
性別: 男
註冊時間: 2010-5-1
最後登錄: 2016-1-13

論壇貢獻勳章

8^#

發表於 2011-4-28 15:00 | 只看該作者

每一帖要比對的位置都不一樣
不知該回覆哪一帖
最後一帖的：
Sub module1()
Dim yy As Range, data As Range
For Each yy In Range([a1], [a65535].End(3))
Set c = [b:b].Find(yy, , , 1)
If Not c Is Nothing Then
         If data Is Nothing Then
         Set data = c
      Else
      Set data = Union(data, c)
      End If
   End If
Next
If Not data Is Nothing Then
With data
      .Interior.ColorIndex = 3
      .Offset(, 1) = "V"
End With
End If
End Sub

TOP

[發問] 如何才能找尋所要的資料並在儲存格塗色?

[發問] 如何才能找尋所要的資料並在儲存格塗色?

[收藏此主題] [關注此主題的新回復]

[通過 QQ、MSN 分享給朋友]