advanced help
per page, with , order by , clip by
Results of 1 - 1 of about 29 for 』(エクセル) (0.013 sec.)
[[20060926181502]]
#score: 15826
@digest: 469cd637df5350101e5c0d2b22960bd1
@id: 25407
@mdate: 2006-09-27T04:01:47Z
@size: 2754
@type: text/plain
#keywords: 則と (1493), ロッ (1445), formula (1425), enableevents (1395), ・or (1353), 一箇 (1330), 可に (1290), selectionchange (1187), タメ (1170), 力規 (1030), にロ (1016), estindex (971), estseek2 (971), 率的 (942), 規則 (830), private (802), 護し (773), 保護 (750), 不可 (677), target (650), ・-- (575), 純丸 (574), worksheet (563), トタ (549), 一部 (532), 仕組 (511), 解除 (490), application (467), 箇所 (450), ー設 (441), 記入 (438), address (421)
『あるセルのみ記入ができないようにロックする仕組みについて』(エクセル)
エクセルで表を作っているのですが、一部のセルだけ、記入できないようにロック(?) するような、方法はあるのでしょうか? 初心者なので、あまりわかりません。 どなたか教えてください。よろしくお願い致します。 ---- 検索して見ました^^ http://www.excel.studio-kazu.jp/cgi-bin/estindex/estseek2.cgi?phrase=%E4%B8%80%E9%83%A8%E3%80%80%E3%82%BB%E3%83%AB%E3%80%80%E4%BF%9D%E8%AD%B7&perpage=10&attr=&order=&clip=-1 (キリキ)(〃⌒o⌒)b ---- ありがとうございます。 これは、シートを保護して、編集できるセルに関してロックを解除するという方法ですよね? 逆に、セルの一部だけロックという方法はないのでしょうか? お手数おかけしますが、教えてください。 ---- 同じことだと思いますが・・・・ ---- ロックをする箇所が一箇所だけなので、シートを保護しないでも出来れば、効率的だと思ったのですが。。。 ---- 入力規則で入力値を制限すれば似たような事が出来ます。但し、コピー貼り付けが 出来てしまうのが難点。 (純丸)(o^-')b ---- すいません、おはずかしい話ですが、入力規則とはどのようにやるのでしょうか? よろしくお願いします。 ---- あるセルの変更を不可にするのであれば、こういう方法もあります。 該当のシートタブを右クリックし、コードの表示を選択。 出てきた画面に下記コードを貼り付けて閉じる。 下記の例ではB2のみ変更不可にしています。 (ROUGE) '---- Private x Private Sub Worksheet_Change(ByVal Target As Range) Dim c As Range For Each c In Target If c.Address(0, 0) = "B2" Then Application.EnableEvents = False c = x Application.EnableEvents = True Exit For End If Next End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim c As Range For Each c In Target If c.Address(0, 0) = "B2" Then x = c.Formula Exit For End If Next End Sub ---- ROUGEさん、突っ込み... Range("c:iv")を選択して変更したら? Loopの必要は無い? Private x Private Sub Worksheet_SelectionChange(ByVal Target As Range) x = Range("b2").Formula End Sub Private Sub Worksheet_Change(ByVal Target As Range) If Range("b2").Formula = x Then Exit Sub Application.EnableEvents = False Range("b2").Formula = x Application.EnableEvents = True End Sub (seiya) ---- 余計なループは要りませんね・・・orz (ROUGE) ---- >入力規則とはどのようにやるのでしょうか? セルを選択し、データメニュー>入力規則で、種類を「ユーザー設定」、 数式を 0 などとすると、通常のデータは受け付けなくなります。 (純丸)(o^-')b ---- みなさん、ありがとうございます。 助かりました。 やはり、シートを保護してしまって、セルの書き換えをする部分だけをロック解除にする方法が一番簡単そうですね。 いろいろありがとうございました。 ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/200609/20060926181502.txt - [detail] - similar
PREV NEXT
Powered by Hyper Estraier 1.4.13, with 97050 documents and 608253 words.

訪問者:カウンタValid HTML 4.01 Transitional