• 締切済み

EXELで電卓の「000」と同じマクロを作る方法

仕事柄、EXELで百万単位の入力をよく行うので、電卓(加算機)の「000」キーみたいに、入力中の任意のセルの数値を、1000倍、1000000倍するマクロを登録できると便利なのですが、方法がわかりません。なお、EXELは会社のパソコンのため、いまだに「97」です。  よろしくお願いします。

みんなの回答

  • merlionXX
  • ベストアンサー率48% (1930/4007)
回答No.4

> 1000倍、1000000倍 merlionXXです。1000000倍をわすれてました。 Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Cancel = True ans = MsgBox("100倍なら「はい」、1000000倍なら「いいえ」", vbYesNoCancel) If ans = vbCancel Then Exit Sub x = IIf(ans = vbYes, 100, 1000000) On Error GoTo line ActiveCell.Value = ActiveCell.Value * x Exit Sub line: MsgBox ActiveCell.Value & " は" & x & "倍できません。", vbCritical End Sub

  • merlionXX
  • ベストアンサー率48% (1930/4007)
回答No.3

セル入力中(カーソル点滅中)にはむりですが、入力完了したセル上でダブルクリックすればセル内の数値を1000倍するのはいかがでしょう? 該当シートのモジュールに記述してください。 Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Cancel = True On Error GoTo line ActiveCell.Value = ActiveCell.Value * 1000 Exit Sub line: MsgBox ActiveCell.Value & " は1000倍できません。", vbCritical End Sub

  • hda000
  • ベストアンサー率0% (0/0)
回答No.2

Excel97で使えるかどうかは判りませんが、任意セルの値を1000倍 すのなら、たとえば以下のようなマクロで対応できます。 マクロはボタンや、任意のキーに割り当てておくと便利です。 Sub Macro1() tmp = ActiveCell.FormulaR1C1 ActiveCell.FormulaR1C1 = tmp * 1000 End Sub

  • neKo_deux
  • ベストアンサー率44% (5541/12319)
回答No.1

マクロでは、入力中のセルに対して操作を行う事は出来ません。 後でまとめて1000倍とかなら可能ですが。 ・「000」のキーのあるテンキーパッドを導入する。 ・キー操作の記録・再生ツールで「000」の入力を登録する。 とか。 Vectorダウンロード> Windows>ユーティリティ>操作関係>キーボード用ユーティリティ http://www.vector.co.jp/vpack/filearea/win/util/operate/keyboard/

関連するQ&A

  • EXELのマクロに関して質問します。

    EXELのマクロに関して質問します。 シートAの任意のセルに文字列を入力後、シートBの同位置のセルと比較し、 同じ内容かどうかを判断する方法を教えてください。

  • Exelでのセルを単純に数える方法を教えて下さい

    現在Exelを使用しているのですが 単純にセルの個数を数える方法が分からず困ってます。 他の質問にある「数値があるセル」や「空白のセルを数えたい」 と言う「関数を使ったセルの数え方」では無く 単純に任意のセルをマウスでドラックした分の セルの合計の数を知りたいだけです、 私の記憶だと画面の下にドラッグした分のセルの数が 何かのキーを押すと表示出来たと思うのですが 思い出せません、どなたかご存じでしたらお教え願います。

  • セルに数値が入ったらマクロ起動

    RS-232Cで数値を取り込んでいます。 Exelにて、任意のセルに数値が入ったら自動でマクロを起動する方法が有りませんでしょうか?

  • 電卓に「000」をつけてほしい(簿記)

    前から おもっていた質問です。電卓を使用するときに「000」キーは非常に便利です。これは「0」を 3かい押すという意味もありますが、何より「単位換算できる」という点で優れています。たとえば以下の計算は よくあります。 321,893[百万円]÷862.88[円/株] このような場合、電卓の「000」キーは 3桁を意味します。だから百万円の場合には「000」キーを二回押せばいいだけです。1回押せば[千]、2回押せば[百万] になります。このように「000」キーは非常に便利です。 しかし、市販されている電卓のほとんどには「000」キーは装備されていません。ほとんどの電卓は「00」キーしか存在しません。私には、これが理解できません。むしろ「00」キーは使いづらく、「0」キーを二回押せばいいだけです。「00」キーをつけるくらいなら、「000」キーを付与してほしいのです。 ほかの電卓使用者は どう考えているのかを知りたいので質問させていただきます。簿記電卓を使い慣れている人からの かいとうを希望しています。よろしく お願い致します。

  • Exelでの、連続データ作成について

    Exelの、ひとつのセル内で、 aaa-120bbb10 aaa-121bbb10 aaa-122bbb10 というふうに、真中の数値データのみを、加算していく方法を教えてください。

  • こんなマクロを作るには

    マクロ初心者です。 以下のようなことをしたいときにマクロの方法を教えて頂けると助かります。 1)セルA1に、数値を入力。 2)セルB1に、A1の数値を使った複雑な計算を行う。 3)セルC1にある別の既定の数値とB1が同じなるまで、A1の数値を入力し直す。  (例えばA1は、0.1間隔で数値を入力していく) このようなものをマクロで設定したいです。 今はひたすらA1の数値を入力し直して対応しています。 なにとぞよろしくお願いいたします。

  • 000キー付きの電卓探しています

    簿記の試験を受けようと思っています。 今後のためにも電卓は愛用できるものを長く使って いきたいのですがおすすめのものはありますか?? 以前銀行に務めていたことがあり 加算機という計算機に慣れています。 同じ配列のものや、000キーがついているものを 探していますがなかなか見つからないです・・。 その他にも使いやすいものがあれば教えてください。 大きさは簿記試験のときに持っていける範囲のもので お願いします。

  • EXELでセルの色を投影するには?

    初歩の質問で申し訳ありません。 EXEL上で例えばA1のセルの色が赤であった場合 任意のセルを(例えばC10)関数かマクロでA1のように赤にする方法は無いでしょうか? 多数のセルの色をA1を変えることで変えたいのです よろしくお願いいたします

  • エクセル:大きい数字を簡単に入力できるマクロ

    いつも大変御世話になっております。 仕事柄比較的桁の大きい丸まった数値を入力することが多いため、以下のことが出来るマクロ・VBAがあれば教えてください。 数値の最後に「m」と入力すると自動的に百万倍の数値に変換される。ただし最後に「m」をつけなければそのまま入力される。 例)10m⇒10,000,000   8.5m⇒8,500,000   0.5m⇒500,000   500,000⇒500,000 宜しくお願いいたします。

  • マクロでこんなことできるのでしょうか?

    こんにちわ。 仕事柄エクセルを良く使っています。 いまいちマクロについてよくわからないのですが、 エクセルのセルに入力する際に、 「1」と入力すれば、りんごと表示、 「2」と入力すれば、みかんと表示、 というように、 種類ごとに入力できるよう、マクロを使って できるのではないか?と、知り合いにいわれました。 これは可能ですか? そして、できるのなら、とても詳しく 方法を教えていただきたいと思います。

専門家に質問してみよう