エクセルの学校：全文検索：Hyper Estraier

Results of 0 - 1 of about 0 (0.000 sec.)

[[20020530145644]]: @digest: 913690e8d3905245842663201a4a6b53; @id: 119; @mdate: 2010-11-24T02:55:20Z; @size: 3012; @type: text/plain; #keywords: outp (8958), 的仕 (6548), 作機 (4831), 卓み (4405), 電卓 (4360), たa1 (1710), vbaproject (1358), 準機 (1225), ramrun (1004), ウイ (921), 自作 (828), マス (797), enableevents (698), 示板 (649), 機能 (628), ル] (628), 掲示 (603), 記事 (575), をa1 (562), 算式 (510), （ra (507), target (488), ドウ (471), enter (419), 活用 (415), に3 (409), 体的 (377), 入力 (375), 太) (372), 具体 (368), タイ (356), 転記 (348); 『電卓みたいな計算できますか?』（事務員です）
一つのマス目に数字を入れて、また同じマスに違う数字を入れて・・・それを繰り返して、合計が出る方法ありますか?? 例えば、3+4+2+9+6 という計算式があって、それをA1に3を入力して、またA1に4を入力していって・・・その合計がE1に出るようにする。なんてできますか?? 電卓みたいにその場で足し算されていくやり方なんですけど。 ---- スタートメニューのアクセサリーの電卓ではだめですか?（さくら） ---- 出来れば、エクセルで活用したいのですけど、そうのような計算式、もしくは機能はないのでしょうか? ---- 昔〜旧掲示板で同じことをやった覚えがあって、それを紹介しようと思ったけど... 無い〜どうもクラッシュしたときのデータに含まれてた内容ですね。計算式でも標準機能でもなく、自作機能（マクロ）なんですが... ツール＞マクロ＞Visual Basic Editor で左の VBAProject ウインドウより Sheet1をダブルクリック。開いたウインドウに↓を貼り付けてください。 Private Sub Worksheet_Change(ByVal Target As Range) Dim inp, outp As String inp = "$A$1" outp = "E1" Application.EnableEvents = False If Target.Address = inp Then Range(outp).Value = Range(outp).Value + Target.Value If Target.Value <> "" Then ActiveCell.Offset(-1, 0).Select Else Range(outp).Value = 0 End If End If Application.EnableEvents = True End Sub シート1のA1セルで数値入力、EnterするとE1に足されていきます。しかしこんなこと、何に使うの? 途中で打ち間違ったりすると分からないと思うけど... （ramrun） ---- 私も、確か旧の掲示板にあったと思って探してみました。みつからないので ramrun作を試してみました。普通の[標準モジュール]では動かなかったので、記事をもう一度読みなおしました。そうですね、ワークシートのところに入れるタイプでしたね。でも結構いけますね。案外すてたものではないですよ。拍手。以前動物病院で血液を調べるのに、顕微鏡をみたまま、1 1 1 1 とテンキーで入力したいと希望されていたので、売り出したらいけるかも。（kazu） ---- たしか前回もそういうことを言っておられたような気がします〜（笑）（ramrun） ---- 同じ機能を違う列に使うにはどうすればいいですか? ---- >それをA1に3を入力して、またA1に4を入力していって・・・ >その合計がE1に出るようにする。具体的仕様が、上の様に示されていますので、コードが書けます。あなたのご説明は、コードが書けるほどには具体的になっていないです。 (半平太) 2010/11/23 16:17 ---- セルだと数値を入れた後に ENTER を押す必要があると思いますが、でしたら A列を入力に使用し、E1=SUM(A:A) ではダメなのでしょうか。 E1の値をそのあとどうするかにもよりますが、値を別の場所に転記するならそのタイミングで転記と A列をクリアするようなマクロを作るのでもよさそうな。ユーザフォームやOnKey を使えば、数値と演算の記号入力だけで Enter を使わない電卓もどきもできそうですが、それはまた全然別のお話ですね。 (Mook) ---- ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/200205/20020530145644.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ