• 締切済み

スピンボタンの最大値を、増分にあわせて変化させたい

エクセルにて、フォームで配置した、３つのスピンボタンの最大値を、他のボタンの増減や、初期値によって変化させたいと考えています。 　　　A　 ｜　　　　B　　　　 ｜　　 C　　｜　D　　｜ 【初期値】｜【リンクするセル】｜【最大値】｜【A+B】｜ボタン 【初期値】｜【リンクするセル】｜【最大値】｜【A+B】｜ボタン 【初期値】｜【リンクするセル】｜【最大値】｜【A+B】｜ボタン 　　　　　｜【Bの合計】　　　 ｜ 【振り分けれる最大値】 例） 　　　A　 ｜　　　B　　 ｜　 C　　｜　D　 ｜ 　５０　　｜　１　　　　｜　４９　｜　５１｜ 　６０　　｜　　　　　　｜　４９　｜　６０｜ 　５０　　｜　５０　　　｜　　０　｜１００｜ 　　　　　｜　５１　　　｜ 　４９ 元の最大値＝１００、振り分けれる最大値＝１００のとき、B1に１、B3に５０振り分けるようにスピンボタンを動作させたときに求められる最大値C1～３にあわせてスピンボタンの最大値を変更させて指定し、それを超えて入力できないようにすることはできないでしょうか？ 当方、WinXP、エクセル２００３、マクロに関しては、マクロの記録を訂正して使う程度の知識です。

みんなの回答

  • hige_082
  • ベストアンサー率50% (379/747)
回答No.2

もう少しスキルを上げないと無理かも マクロ自体は SpinButton1.Max = Range("C1").Value SpinButton2.Max = Range("C2").Value SpinButton3.Max = Range("C3").Value と、簡単なものですが、これをどこに書くかが問題です ＞マクロの記録を訂正して使う程度の知識です。 では、無理だと思います 私が思う一番簡単な方法は、ボタンを作成し ボタンの右クリックメニューのコードの表示を選択 現れた画面のカーソルの位置へ 何も考えず、上の３行のマクロをコピペ 最大値の値を変更したらボタンを押せば値が更新されます ただし、条件があり同じシート上に、ボタン、スピンボタン、最大値の値が無ければエラーになります

  • mitarashi
  • ベストアンサー率59% (574/965)
回答No.1

ご質問の内容は把握し切れておりませんが、参考URLの通り、最大、最小値をVBAのコードで、他のスピンボタン操作のイベントなどから設定してやれば良いのではないでしょうか。

参考URL：
http://home.att.ne.jp/zeta/gen/excel/c04p38.htm
  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. オフィス系ソフト

関連するQ&A

  • Excel スピンボタン　対象範囲(訂正)

    http://oshiete1.goo.ne.jp/qa4685879.htmlの訂正版です。 説明が不十分だったため変更します。 Excel2003での質問なのですが、 スピンボタンのリンク先を複数のセルに指定したいのですが、やり方がわからずに困っています。 具体的には 3つのセルの値を1つのスピンボタンで加減するように組みたいのです。 3つのセルの値は違うもので、=で繋げたくはありません。 A1　B1　C1　▲ １　　５　　６　 ▼ ↑の状態で「▲」を押すと A1　B1　C1　▲ ２　　６　　７　 ▼ になる物を作りたいです。 (1)A1、B1,C1を個々で＋－するスピンボタンと (2)A1、B1、C1を一括で＋－するスピンボタンを作りたいのです。 (1)は作れたのですが(2)のやり方がわかりません。 1つなら簡単にリンク先として指定できたのですが、複数選択するとエラーになってしまいます。 どうしたらいいでしょうか？ やはりマクロ等を組まないといけないのでしょうか？ 方法を知っている方がいらっしゃいましたら教えていただけると嬉しいです。 よろしくお願いします。

  • エクセルのスピンボタンのコピーについて

    エクセルのスピンボタンのコピーについて いろいろ検索し、試しましたがうまくいきません。 A2セルに氏名（A3,A4と下に1000人程います） B1セルに日付（C1,D1と右に1ヶ月分） B2セルにスピンボタンを設定し、そのスピンボタンを縦1000行、横30列にコピーしたいのですが うまくいきません。。。 佐藤さんが12/1に3回⇒セルB2へ「３」 山田さんが12/2に5回⇒セルC3へ「５」 という感じで表示させたくて、B2へスピンボタンを設定しコピーしたのですがうまくいきません。 どうしたらできるでしょうか。 スピンボタンはフォームコントロールのものを使用しています。 Windows 7 Excel2007を使用しています。

  • エクセルのスピンボタンで％は使える？

    エクセルのスピンボタンで、値の増減を０～１００％まで５％きざみで、増減させたいのですが、 セルの値をパーセント表示にしており、スピンボタンを押すと、１００％きざみでしか増減できません。 良い方法はないでしょうか。

  • エクセル・スピンボタンを使った時にイベントマクロを発生させたい

    エクセルでスピンボタンを使って数値を上下させたときに イベントマクロを発生させたいです セルＣ１の入力規則のリストから氏名を選択するとグラフが表示されるのですが いちいちリストから選択するのが面倒なので スピンボタンでリストの上から順番に見ていけるようにもしたいのです スピンボタン（セルＡ１にリンク）を操作 Ａ１…スピンボタンにリンクして数字が変わる Ｂ１…ＩＮＤＥＸ関数でＡ１の数字とリストから氏名が選択される Ｂ１の値をＣ１に貼り付ける←ここをマクロにしたい イベントマクロで Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, Range("A1")) Is Nothing Then Exit Sub Range("B1").Copy Range("C1").Select ActiveSheet.Paste End Sub としてもうまくいきません スピンボタンにリンクしたセルの値が変わったと時は Worksheet_Changeだと無理なので、どうしたらいいでしょう わかりにくい説明で申し訳ありません

  • 1つのスピンボタンで複数のセルの数字を変更

    Excel2003での質問なのですが、 スピンボタンのリンク先を複数のセルに指定したいのですが、やり方がわからずに困っています。 具体的には 3つのセルの値を1つのスピンボタンで加減するように組みたいのです A1　B1　C1　▲ １　　５　　６　▼ A1、B1,C1を個々で＋－するスピンボタンを作りたいのですが よろしくお願いします

  • Ex

    http://oshiete1.goo.ne.jp/qa4685879.html​の訂正版です。 説明が不十分だったため変更します。 Excel2003での質問なのですが、 スピンボタンのリンク先を複数のセルに指定したいのですが、やり方がわからずに困っています。 具体的には 3つのセルの値を1つのスピンボタンで加減するように組みたいのです。 3つのセルの値は違うもので、=で繋げたくはありません。 添付ファイルの aのボタンを押すとAが±1 b　　　　を押すとBが±1 c　　　　を押すとCが±1 D　　　　を押すとA・B・C±1 される。 というものです。 (1)A1、B1,C1を個々で＋－するスピンボタンと (2)A1、B1、C1を一括で＋－するスピンボタンを作りたいのです。 (1)は作れたのですが(2)のやり方がわかりません。 最初の回答通りにするとb　or　c　のボタンを押すと、B.Cの=Aの値が書き換えられてしまいます。 よってDのボタンでabcを±1したいのです。 1つなら簡単にリンク先として指定できたのですが、複数選択するとエラーになってしまいます。 どうしたらいいでしょうか？ やはりマクロ等を組まないといけないのでしょうか？ 方法を知っている方がいらっしゃいましたら教えていただけると嬉しいです。 よろしくお願いします。

  • Excel マクロでスピンボタンの操作

    A1とB1のセルには、それぞれ数値が入力されています。 その下(A2とB2)にはA1とB1の値を使って計算された値があります。 A1とB1の値はスピンボタンを使って１ずつ値が大きくなったり小さくなったりします。 そして、 A2とB2の値の大小を比べて、 ・A2が小さければ、A1の値を１大きくする ・B2が小さければ、B1の値を１大きくする ・等しければ、何もしない ということをしたいです。 マクロを組むしかないと思ったのですが、どのようにやれば良いのでしょうか？ Excelはそこそこできますが、マクロはほとんどわかりません。 スピンボタンを使わなくても、同じようなことが自動でできれば構いません。 よろしくお願いしいます。

  • スピンボタンのコピー

    よろしくお願いします。 ある項目の数を数えるのに、スピンボタンを利用しています。 増えたり減ったりするごとにすぐ横の列にあるスピンボタンを押し、増減させています。 ただ、なにぶん数が多くて、いちいちコピーして、リンク先のセルを手動で入力したりするのが面倒です…。 数百項目分のスピンボタンをコピーし、１行から数百行分までリンク先もバッチリコピー！ という方法はないでしょうか？

  • excel　スピンボタンのサイズについて

    excel2010利用です。よろしくお願いします。 下記の通り、各セルにリンク対応したスピンボタンが出来るようなマクロを作ってみました。（セルC4から始まって下に31セル分スピンボタンが作成される） しかし各一つのセルの大きさが小さいためか、スピンボタンでセルが埋め尽くされてしまいます。 スピンボタンのサイズを 幅：ギリギリまで小さく 高さ：セルの高さちょうど といった大きさに調整する方法はありますでしょうか？ 対応セルはみな同じ大きさです。 ご意見ご教授のほどよろしくお願いします。 Sub test() Dim i As Integer Rows.RowHeight = 50 For i = 4To 34 With ActiveSheet.Spinners.Add(Range("c4").Left, Range("c" & i).Top, 20, 50) .LinkedCell = "c" & i End With Next End Sub ちなみに、C列から、AL列まで（C4からAL３４まで）スピンボタンを作りたいと思っており、 私、まだVBA未熟なため現段階では、 上記のマクロをCからALまで文字を変えて複数回実行する方法しかできないのですが、なにか良案ありますでしょうか？ 宜しくお願い致します。

  • エクセル　スピンボタンの設定方法　広範囲セル

    販売業をやっております。 時間帯別の集客人数表をエクセルで作り、人数をクリックで増減(増だけで問題ないです)させたいと思っております。 使用しているエクセルのバージョンは2002です。 インターネットで調べ、スピンボタンという機能を使えば出来そうだというところまでは行きました。 B3セル～H27まで広範囲にセルを設定し、それぞれ１つごとのセルにスピンボタンの機能を反映させたいと思っております。 自分で作ってみたのですが、特定の１セル(Ｂ３)しかボタンのクリックに反映されなく、正しい設定方法を知りたいと思っております。 ※設定方法に関して、”スピンボタン→コントロールの書式設定→リンクするセル”で広範囲にセルを設定しても１つのセルしかボタンに反映されない状態です。 自身で調べたのですが解決できなかったため、詳しい方いらっしゃいましたらアドバイスお願い致します。 表は現物を見て頂いたほうが早いかと思い添付しております。 どなたかアドバイス宜しくお願い致します。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する