人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

Excelの関数で質問です。

Sheet1のA1セルが青色だった場合、Sheet2のA1セルを赤色に変更する関数を教えて下さい。
要するに、Sheet1で青色にしたセルと、Sheet2のSheet1と同じ場所のセルを、違う色で色づけしていきたいのです。

よろしくお願い致します。

●質問者: usatora
●カテゴリ:コンピュータ
✍キーワード:A1 Excel セル 赤色 関数
○ 状態 :終了
└ 回答数 : 2/2件

▽最新の回答へ

1 ● SALINGER
●35ポイント

コメント欄がオープンではないのでこちらで失礼します。

関数ではできません。

なぜかと言うと、ワークシート関数ではセルの書式設定は変えられないからです。

これは、ユーザー定義関数でも同じです。


VBAならばこんな感じで可能です。

Sub Macro1()
 Dim r As Range
 For Each r In Worksheets("Sheet1").UsedRange
 If r.Interior.ColorIndex = 5 Then
  '3=赤
 Worksheets("Sheet2").Range(r.Address).Interior.ColorIndex = 3
 End If
 Next
End Sub

2 ● SALINGER
●35ポイント

関数だけではできないことは変わりませんが、まったくできないというわけでもありません。

4.0マクロ関数+条件付書式です。


1 Sheet2のA1セルを選択して、挿入→名前→定義で「名前の定義」ダイアログボックスを開きます。

2 名前を「CELLCOLOR」

3 参照範囲を「=GET.CELL(63,Sheet1!A1)+NOW( )*0」で追加。

4 Sheet2のA1セルの数式を「=CELLCOLOR」

5 Sheet2のA1セルを選択して、書式→条件付書式から

「セルの値が」「次の値に等しい」「5」として

書式をパターンを赤にしてOK。

6 A1セルに設定された数式と条件付書式を適用する範囲にコピー。


この方法で一応はできることはできるのですが、ざっと考えて以下の問題があります。


関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ