Results of 1 - 1 of about 37 for 条件付書式 ３つ以上 (0.008 sec.)
条件付書式 (2647), 3つ以上 (180)
- [[20221008233007]]
- #score: 10902
- @digest: de7a01011b0024c0d511c87ac6386106
- @id: 92481
- @mdate: 2022-10-08T23:56:45Z
- @size: 1768
- @type: text/plain
- #keywords: 力式 (6514), 上重 (4449), 式欄 (2970), 数下 (2545), 欄) (2225), xlshiftup (2222), 数案 (2041), 色設 (2028), ・パ (1666), ・色 (1604), 式= (1136), ン・ (1062), 式・ (1055), 要数 (1003), tmp (908), 要領 (887), aggregate (750), 式( (723), メジ (698), ジロ (682), 手動 (625), 行以 (577), 付書 (571), つ以 (560), 列全 (557), countif (541), 景色 (533), 日) (513), 字だ (434), 背景 (402), 重複 (380), 明日 (375)
- 『3つ以上重複してる文字だけ残したい』（つぐ）
a a n o e b a j d k a a a こんな感じになるイメージです。 分かる方がいればお願い致します🙇 ＜ 使用 Excel:Excel2019、使用 OS:unknown ＞ ---- こんばんは 手動でするならですが 条件付書式でも使用したらどうでしょうか? A1:A10を選択して 条件付書式の数式( 数式欄 )へ、 下記の式を入力します 入力式=COUNTIF($A$1:$A$10,A1)>2 書式・パターン・色設定して、OKで設定、 3つ以上の重複してる文字だけに、背景色が付くようにすれば良いかと したら行を削除しやすくないかしら? A列全部の場合は下記の式ですね。 入力式=COUNTIF(A:A,A1)>2 因みに、VBAでも同じような要領でするんですが… 1000行以上のデータがあって…手動では大変なら、VBAを希望しておけば 明日、誰か見てくれた人がしてくれますよ。(きっと) （あみな） 2022/10/09(日) 00:27:07 ---- データがA列にあり、該当しないセルは削除するということなら、 Sub Macro1() Dim rng As Range, r As Range, tmp As Range Set rng = Range("A1", Cells(Rows.Count, "A").End(xlUp)) For Each r In rng If Not WorksheetFunction.CountIf(rng, r) > 2 Then If tmp Is Nothing Then Set tmp = r Else Set tmp = Union(tmp, r) End If End If Next tmp.Delete xlShiftUp End Sub とかでしょうか。 （みかん） 2022/10/09(日) 07:10:01 ---- 関数案です。 データは「A1:A10」入力されているとして、B列に抽出します。 B1: =IFERROR(INDEX($A$1:$A$10,AGGREGATE(15,6,ROW($A$1:$A$10)/(COUNTIF($A$1:$A$10,$A$1:$A$10)>=3),ROW(A1))),"") 必要数下にコピーします。 （メジロ） 2022/10/09(日) 08:56:45... - http://www.excel.studio-kazu.jp/wiki/kazuwiki/202210/20221008233007.txt - [detail] - similar
PREV
NEXT
Powered by Hyper Estraier 1.4.13, with 97012 documents and 608123 words.
訪問者：