- ベストアンサー
結果を隣のセルに表示させる方法
条件式はなんでも良いのですが 結果を条件式入力以外のセル、指定したセルなどに表示する方法はありますか? 例えば =IF(A1>0,"○","×")のような条件式をA2に入力したとして結果はA3セルに表示する。 宜しくお願い致します。
- みんなの回答 (5)
- 専門家の回答
質問者が選んだベストアンサー
VBAを使用します。 Excel2010の場合 [開発] > [コードを表示] の順にクリック 左上コンボボックスから 'Worksheet' を選択 右上コンボボックスから 'SelectionChange' を選択 Private Sub Worksheet_SelectionChange(ByVal Target As Range) If (Range("a1") > 0) Then '条件式 Range("a3").Value = "○" '条件に合う場合 Else Range("a3").Value = "×" '条件に合わないう場合 End If End Sub
その他の回答 (4)
- KURUMITO
- ベストアンサー率42% (1835/4283)
A3セルには次の式を入力します。 =INDIRECT(ADDRESS(2,1))
- tom04
- ベストアンサー率49% (2537/5117)
こんにちは! 関数での場合は数式が入っているセルに表示されてしまいますので、 苦肉の策として・・・ A2セルの数式はそのままでフォントの色を「白」にしておき、 A3セルに =A2 としてしまう方法ですかね? 他の方法としてはVBAになってしまいますが、一例です。 画面左下にある操作したいSheet見出し上で右クリック → コードの表示 → VBE画面が出ますので ↓のコードをコピー&ペーストしてA1セルの数値を変えてみてください。 (質問通りのセル配置としています) Private Sub Worksheet_Change(ByVal Target As Range) 'この行から If Target = Cells(1, 1) Then If Cells(1, 1) > 0 Then Cells(3, 1) = "○" Else Cells(3, 1) = "×" End If End If End Sub 'この行まで 的外れならごめんなさいね。m(__)m
- mshr1962
- ベストアンサー率39% (7417/18945)
現状でそれをやるとしたら、カメラ機能(図のリンク貼付け)しかないですね。 http://www.eurus.dti.ne.jp/~yoneyama/Excel/camera.htm
- mu2011
- ベストアンサー率38% (1910/4994)
関数では無理、マクロ(VBA)になります。