エクセルでボタン入力待ちの状態を作るには?
順番に押していくことで押された指定のセルが
あらかじめ決められたセルに貼り付けされていくという感じの
ものを作成したいのですが、ご教授願います。

「1番目を選んでください」~ボタンを押す右の1番目の位置に収まる「2番目をえらんでください」~
といった感じのことでございます
例の画像を用意しておりますのでお願いします。

「エクセルで入力待ちの状態を作るには?」の質問画像

A 回答 (4件)

各ボタンを作成して、ボタンに以下のコードを追加してください。


A1セルに1を記入して置いてください。

Private Sub CommandButton1_Click()
Dim MyNo As Integer

MyNo = Range("a1")
Range("k9").Offset(-MyNo, 0) = Range("c2") 'ここのc2はボタンごとに変更してください。

Range("l9").Offset(-MyNo, 0) = Range("d2") 'ここのc2はボタンごとに変更してください。

Range("a1") = MyNo + 1

End Sub
    • good
    • 0

マクロはお判りのようなので・・・



[F5]=count(l3:l8)+1
[G5]=番目を選んでください  といれます。

Sub オレンジ()
 If Range("a8").Value = "済" Then
  MsgBox ("選択済みです。")
  Exit Sub
 Else
  cnt = Range("f5").Value
  Range("a8").Value = "済"
  Cells(9 - cnt, 11).Value = Cells(8, 3).Value
  Cells(9 - cnt, 12).Value = Cells(8, 4).Value
 End If
End Sub

動く程度の1ボタンの例です。
    • good
    • 0

コードを書いている暇がないのでヒントだけ。



今現在何番目まで選択されているかが判れば良いので、どこかのセル(例えばA20)に値(1)を入れておきます。
ボタンがクリックされるたびに、a20の値を参照して、何番目に押されたか確認し、目的のセルに書き込みます。
a20の値をプラス1して終了。
    • good
    • 0

VBAを使えば可能ですが知識は有りますか?



知識がないのであれば、この機会に勉強してみてはいかがでしょうか。

コードを提示する事は可能ですが、理解できないと意味が無いと思いますので、アドバイスという形で解答します。
    • good
    • 0
この回答へのお礼

自動記録をいじるとか、
フォームを作成するなどのことは、なんとかできる状態でございます。
質問の部分で言うと、
貼り付けのセルの番地を選んだボタンでふりわけるといったことが
できればと思っております。
職場に残念ながら自分より詳しい方がいないのでご教授願えたら
と思っております。

お礼日時:2009/05/18 14:54

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qローマ字入力が安定してできない

とにかくローマ字入力ができたりできなかった理で困っています。プロパティからローマ字入牢を選んでやるとしばらくはできるのですが、突然できなくなるのです。半角からローマ字入力ができるようになっても同じ用に突然できなくなります。Vistaなのでもう終わりにしようかとも追うのですが、もったいない気もするので直す方法があれば教えてください。

Aベストアンサー

> とにかくローマ字入力ができたりできなかった理で困っています。

Vistaをお使いとのことですので、もしかしたら、MS-IME 2007をお使いでしょうか?

他の原因かも知れませんが、念のため、下記URLのページをご覧になって、MS-IME 2010をインストールしてみてください。(無料です。)

「Microsoft Office IME 2010」
https://www.microsoft.com/ja-jp/office/2010/ime/default.aspx

Qエクセルで複数のセルにあらかじめ用意した単語を重複せずにランダム表示させる方法

当方エクセルの操作について困っております。
会社内で利用したいと思っているのですがうまくいかず途方にくれております。

例としてあらかじめセルA1~A30に人名「鈴木」「田中」「佐藤」等の30個の単語を用意し、
それらをC1~C30に人名が重複しないように表示させる方法をご存知の方がいらっしゃいましたらご教授願いたくよろしくお願いいたします。
当方エクセル操作は社内で簡単な見積書などの書類を作る程度で初心者です。

Aベストアンサー

くじのようにランダムに並べ替えて表示・印刷したいということでしょうか。
用意した単語は重複していないものとして、こんな方法が考えられます(手元の Excel2003 で確認)。

途中計算用にセルを30個用意し(例えば Z1~Z30 など印刷範囲の外に)、
それぞれに "=RAND()" という式を入力する。
次に、C1に "=INDEX($A$1:$A$30,RANK($Z1,$Z$1:$Z$30))" という式を入力し、
このセルをコピーして C2~C30 に貼り付ける。

・RAND() は、 0.0 以上 1.0 未満の乱数を発生させる関数です。
 Z1~Z30 には、異なる30個の数値が入ることになります(重複する可能性は非常に低いはず)
・RANK(数値,セル範囲) は、その[数値]が、[セル範囲]中の各セルの内容の中で何番目に大きいか、を返します。
 C1~C30のそれぞれの中で計算される RANK は、(Z1~Z30 に重複がないとして、)1~30までの重複しない数値になります。
・INDEX(セル範囲、数値) は、[セル範囲]中の[数値]番目のセルの内容を返します。

くじのようにランダムに並べ替えて表示・印刷したいということでしょうか。
用意した単語は重複していないものとして、こんな方法が考えられます(手元の Excel2003 で確認)。

途中計算用にセルを30個用意し(例えば Z1~Z30 など印刷範囲の外に)、
それぞれに "=RAND()" という式を入力する。
次に、C1に "=INDEX($A$1:$A$30,RANK($Z1,$Z$1:$Z$30))" という式を入力し、
このセルをコピーして C2~C30 に貼り付ける。

・RAND() は、 0.0 以上 1.0 未満の乱数を発生させる関数です。
 Z1~Z30 には...続きを読む

Qローマ字しか入力できない(再)

何度も申し訳ありません。
平仮名で入力できません。すべてローマ字になってしまいましす。

Wordなどでは普通に平仮名で入力できるのにインターネット検索などで入力する時だけ
ローマ字でしか入力できません。

言語バーの左に[あ]となってるのにローマ字しか出ません。
バーの右に出てるCAPSやKANAが関係あるのでしょうか?

今までの質問を参考にしてIMEスタンダードのプロパティから[ローマ字入力]にもしました。
{というか最初からなってたのですが}

http://oshiete1.goo.ne.jp/kotaeru.php3?q=246469も参考にしましたが何かをダウンロードした直後になった訳ではないのでどうなんでしょう?この質問者様の場合、アドレスバーの下にボタンが出たりしてるそうですがそんなことはとくにありません。



ほんとに困ってます。よろしくお願いします

Aベストアンサー

用語を次のように変更されたほうが誤解を招かずにすみます。
 「ローマ字」→「直接入力」(または「英数字」)
 「平仮名」→日本語
日本語変換入力の方式として「ローマ字入力」と「かな入力」の二つがあります。

ATOKでお尋ねの状況が発生したのを見聞きすることはありませんが、MS IMEはもともとIEとの相性が悪いのか、下記のようなことがあり、
OS再起動のほか特効薬はないのかも知れません。
http://support.microsoft.com/kb/413643/ja
IE7はIE6よりもこの問題が起こりやすいようにも聞いています。
Office IME 2007もなにかと不具合が起こりやすいようですが…。

[KANA]や[CAPS]は関係ありませんが、クリックしたために周りと違った色になっていたら、もう一度クリックして周りと同じ色に戻しておいて下さい。

QShift押しながら、矢印ボタンで複数セルの選択ができない。

Shift押しながら、矢印ボタンで複数セルの選択ができない。

掲題のとおりなのですが、
以前はExcelにてShiftを押しながら、矢印ボタンをクリックすると
複数のセルがアクティブになり、選択できたのですが突然できなくなりました。

どのエクセルシートも同様にできません。
どこか設定を変えてしまったのでしょうか。

アドバイスお願い致します。
PCは、WinXP Office2003 を使っています。

Aベストアンサー

一例ですが、スクロールロックがかかっているとできませんね。

Qローマ字入力ができない!

日立のウィンドウズ(ビスタ)の新古品を買って使いはじめました。
日本語のローマ字入力をしようとするのですが、Altと左上の方にある「半角/全角」というキーをいっしょにおして今まで英数入力と切り替えていたのですが、
そう押しても「ローマ字入力に切り替えますか?」ときく画面で「はい」を選択しても切り替わりません。
キーの上に書いてあるかな入力から抜け出せず、困っています。

Aベストアンサー

言語バーは出ていますか?
日本語入力は、IMEだけとは限りませんので、言語バーの赤い所を右クリックで確認してみては。

IMEの場合IMEのプロパティの編集タブの変更を開くとキー操作一覧表示が出ますが←ここを前の持ち主がいじって(自分好みに変更してると)ると、IMEでも、全然違う動作に変わって居る場合がありますので、言いかえれば、自分好みにカスタマイズする事も出来ます。

因みに、私のは、かな、ローマ字切り替えは、Alt+半角/全角、でも【Ctrl】キーと【Shift】キーを押しながら、【カタカナ ひらがな】キーでも切り替わりすが、【Alt】キーを押しながら【カタカナ ひらがな】キーでは、変更できません。

詰まり、IMEのプロパティの編集タブの中身次第で動作が決定されます。

Qコマンドボタンを押したときシート2のa行の空白セルを選択したいのですが

コマンドボタンを押したときシート2のa行の空白セルを選択したいのですが以下のやり方では”RangeクラスのSelectメソッドが失敗しました。”のエラーが出てしまいます。どこがいけないのか教えてください。

Private Sub CommandButton1_Click()
Worksheets("sheet2").Activate
Range("a65536").End(xlUp).Offset(1).Select
End Sub

ちなみに、コマンドボタンはシート1にあります。
よろしくお願いします。

Aベストアンサー

こんにちは。maruru01です。

Range("a65536").End(xlUp).Offset(1).Select

ActiveSheet.Range("a65536").End(xlUp).Offset(1).Select

にして下さい。

Qローマ字入力できない

ローマ字入力できません すごく打ち辛いです

Aベストアンサー

言語バー右クリック→設定→プロパティ→ローマ字/かな入力をローマ字入力 に設定
のことでしょうか?

Qエクセルでコマンドボタンを押すと指定のセルの色を変える

エクセルでA1セルにコマンドボタンを作り、そのコマンドボタンを押すと下のA2とA3セルが塗りつぶされるようにしたいのですが、VBAを使うのでしょうか??

Aベストアンサー

VBAですね。

コマンドボタンを ダブルクリックして開いたところに

Range("A2").Interior.ColorIndex = 6
Range("A2").Interior.Pattern = xlSolid
Range("A3").Interior.ColorIndex = 6
Range("A3").Interior.Pattern = xlSolid

と記述したらいいですよ。

Qローマ字・かな 入力モード切り替え、半角全角漢字で、できない。

1.ローマ字・かな 入力モード切り替え、半角全角漢字で、できない。

2.スペースで、空白できない。

Aベストアンサー

>いくつか、詳しく知りたいキーワードがあるのですが、お勧めの辞書サイトはありますか? できれば、右クリックで、検索できるものを教えてください。

私は、基本的にGoogleしか使いません。前回、私が記述した内容程度の語句なら、Googleにかかります。

>Sonyは、made in タイ。Acerは、中国でした。.

Sonyは、おそらくNMBのOEM製品です。Acerとあわせて、どちらも中級以上のキーボードだと思われます。

>3000円までが、予算ですが、そのくらいで、
買えますか?

激安\1000のキーボードもありますが、\3000ぐらい投資していただくと、程度のいい物が買えます。

>英語版、日本語版の見分け方は、ありますか?

日本で流通しているもののほとんどが日本語版で、英語版との見分け方は、一目瞭然です。英語版には、カナや漢字の文字が刻印(今は印刷)されていませんから。また、キートップの数も少ないです。

>セーフモードで、立ち上げたとき、選択肢が3つあって、適当に、選んだら、不都合はなかったみたいなので、
ほっときましたが、また、疑問に思いました。

上記と同様ですが、日本語版(106~109など)なら、「半角/全角」キーを押しておけば、99%以上の確率で正解です。

他の選択肢が、101系(英語キーボード)とAX系(10年以上前にすたれた日本語キーボード)しかありません。

#キーボードにこっていますので、いずれも持っていますが、AXキーボードは骨董品かつ珍品扱いです。

>いくつか、詳しく知りたいキーワードがあるのですが、お勧めの辞書サイトはありますか? できれば、右クリックで、検索できるものを教えてください。

私は、基本的にGoogleしか使いません。前回、私が記述した内容程度の語句なら、Googleにかかります。

>Sonyは、made in タイ。Acerは、中国でした。.

Sonyは、おそらくNMBのOEM製品です。Acerとあわせて、どちらも中級以上のキーボードだと思われます。

>3000円までが、予算ですが、そのくらいで、
買えますか?

激安\1000のキーボードも...続きを読む

Qエクセル あるセルに文字を入力した後ボタン一つでそのセルを入力の状態ではなく只その同じセルを選択している状態にしたい

選択したセルに文字を入力するときF2キーで入力できるようになると思うのですが、その逆をやりたいのですが、ボタンひとつできる方法はありますか。入力して縦線が点滅しているのを、ただセルを選択した状態にしたいのです。
今はいったんenterかtabを押してから、矢印キーで再度そのセルに戻っているのですが、ボタンひとつでできる方法があると面倒でなくなると思うので。
具体的には入力した直後に、そのセルをコピーして別のセルに貼り付けたいのです。
ちょっと分かりづらくて申し訳ありませんが教えてください。

Aベストアンサー

CtrlキーとEnterを同時押しすればセル移動しませんよ。


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング