[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『b列に入力するとcに』(かつれつ)
B列に○が入力されると C列に担当者を入力してくださいとなにか表示でないですか?
できればなにかメッセージがでるみたいな
マクロでも構いません
もしくはB列に入力するとC列に塗りつぶしなるようしたいです
A B C
1 ○ C2 担当者を入力してください
2
3
< 使用 Excel:Excel2010、使用 OS:Windows7 >
条件付き書式の場合の例です。 C1の設定です。
=AND(B1="○",C1="") (カリーニン) 2014/09/11(木) 00:39
シートモジュールに貼り付けてください。
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Range("B1:B100"), Target) Is Nothing Then Cancel = True On Error GoTo ErrSyori Application.ScreenUpdating = False
Select Case Target.Value Case "○": MsgBox "C列に担当者を入力してください" Case Else End Select End If ErrSyori: End Sub (ところてん) 2014/09/11(木) 11:49
Altキーを押しながら[F11]キーを押します。
左窓に sheet1 sheet2 sheet3 thisworkbook 表示されたと思います。
左窓のsheet1にカーソルを合わせてダブルクリック→右窓に白地の大きな窓が出てきます。
そこに下記コードを貼り付けてください、sheet1でB列入力すればmsgboxが・・・。
’----------ここから--------------------
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Range("B1:B100"), Target) Is Nothing Then Cancel = True On Error GoTo ErrSyori Application.ScreenUpdating = False
Select Case Target.Value Case "○": MsgBox "C列に担当者を入力してください" Case Else End Select End If ErrSyori: End Sub ’---------ここまで-------------------- (ところてん) 2014/09/12(金) 12:56
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.