エクセルの学校：全文検索：Hyper Estraier：入力規則

Results of 1 - 1 of about 2816 for 入力規則 (0.005 sec.)

[[20111015114345]]: #score: 4285; @digest: cc98a66034af4a5855b182106f696278; @id: 56292; @mdate: 2011-10-15T10:13:37Z; @size: 2621; @type: text/plain; #keywords: 護セ (8108), findcontroid (7748), 力前 (4508), トpr (2788), 準機 (2451), 作者 (1905), エキ (1324), userinterfaceonly (1321), タ入 (1178), トモ (1084), enableevents (1047), 力後 (1025), commandbars (1017), 保護 (1001), 入力 (939), イベ (927), スパ (898), 力ミ (851), application (817), ベン (759), execute (747), protect (733), ド内 (690), ッセ (660), メッ (657), 則を (634), vbyesno (611), 自信 (605), 決策 (584), 把握 (584), ミス (584), セー (583); 『データ入力の関係で困っています。毎回、1000件程度の入力を行うのですが、すでに入力済みのセルに誤って違うデータを入力してしまい、データが置き換わってしまいます。修正がかからないようにする、もしくは、データ入力の際に警告メッセージ等が出るような方法はないでしょうか。Excel2000』（のりのり）
---- エクセルの標準機能でできるのかどうか、当方エクセル音痴なのでわからないけど、もし、できるとして、でも、入力ミスもあるわけで、いったん入力したら訂正できないというのはあとあと、困ることも多くなるような気がするけど? VBAでやるとすれば 1.シートモジュールのChangeイベントで、Applicatio.Undoで入力前の状態を把握して、もし、空白じゃなかったらエラーメッセージで抜け。空白だったら、あらためて入力後の値をセルにいれる。（この場合、Application.EnableEventsのFalse/Trueを記述してイベントの連鎖を抑止） 2.一定の入力後、値のあるセルを保護セルにしてシート保護する処理を操作者がキック。 3.あるいは、シートモジュールのChangeイベントで、値があれば、そこを保護セルに。（シートは保護されているという前提。必要ならコード内で UserInterfaceOnly:=True 指定のシートProtectを。） (ぶらっと) ---- エキスパートさん達から標準機能による解決策の提示があるまでの「つなぎ」として、上記1.をもう少し親切（?）にしたものを。空白セル以外に入力があった場合は、その旨メッセージをだし、強制的に入力するのか、うっかりミスなので元に戻すかを操作者に選ばせる。シートモジュール（シートタブを右クリックしてでてくるところ）に以下を貼り付け。 Private Sub Worksheet_Change(ByVal Target As Range) Dim c As Range Dim NG As Boolean Application.ScreenUpdating = False Application.EnableEvents = False Application.Undo For Each c In Target If Len(c.Value) > 0 Then If MsgBox("入力されたセルにはすでに値が入っていました。よろしいのですか?", vbYesNo) = vbNo Then MsgBox "入力前の状態に戻します" NG = True Exit For End If End If Next If Not NG Then Application.CommandBars.FindControID:=129).Execute 'Redo End If Application.EnableEvents = True Application.ScreenUpdating = True End Sub (ぶらっと) ---- 作業列を使っての入力規則を使う例ですが余り自信がありませんもっと他の方法がありそうですが?分かりません例 A1に入力しようとするセル、B1に作業列として、B1に =TEXT(A1,A1) A1を選択し、入力規則を設定入力値の種類をユーザー設定数式 =B1=TEXT("","G/標準") A1に入力し、確定した場合一度消さないと再入力できないとなってしいますけど VBAのぶらっとさんの方が良いと思います。（貼）VBAもさっぱり分かりませんけど ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/201110/20111015114345.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ