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

Results of 1 - 1 of about 27304 for マクロ (0.014 sec.)

[[20080219085327]]: #score: 2167; @digest: 0f1d7cc0b84ab58595a8f7e0cd12ffd9; @id: 36216; @mdate: 2013-10-18T05:28:24Z; @size: 5563; @type: text/plain; #keywords: mymenu (22277), mybutton (19466), 2949 (12470), msobuttoniconandwrapcaption (12117), msobarfloating (11255), mybar (10668), オク (10548), tooltiptext (10356), faceid (10181), temporary (7441), 名() (6501), commandbars (6105), 夕焼 (5682), ロ名 (5462), msocontrolbutton (4587), commandbar (4368), ドボ (4166), onaction (3745), スク (3167), コマ (3054), 示() (3016), ン" (2964), ボタ (2668), マン (2578), タン (2397), 名" (2234), ンド (2028), ロー (1809), クロ (1718), ール (1358), 添付 (1223), ルバ (1177); 『コマンドボタンを自動的に移動』（オク）
コマンドボタンを使用した画面をスクロールしたときに、コマンドボタンも自動的にスクロール出来ないでしょうか? WindowsXP EXCEL2003 ---- ほぼ無理。API駆使すればできるとは思いますが。シートの1番上にボタンを設置してウインドウを分割り表時にでもすれば、ボタン位置固定でスクロールはできます。この方法が多く使われているんじゃないかと思います。（多分）これ以外だとツールバーを使うとか。これならスクロールで移動しないし、ブックにも添付できるしね。ツールバーの位置は、ブックに添付した時にあった位置が記憶されるようです。 マクロで、ある程度の位置に置く事ができますけど。位置については、ここに少し。 http://www.vbalab.net/vbaqa/c-board.cgi?cmd=ntr;tree=56;id=FAQ http://www.vbalab.net/vbaqa/c-board.cgi?cmd=ntr;tree=57;id=FAQ (Jaka) ---- ユーザーフォームを導入されたら良いのでは? モードレスで表示しておけば、ご希望の動作に近づくと思います。 (ROUGE) ---- >コマンドボタンを使用した画面をスクロールしたときに一般にはそのままで,ボタンも一緒に自動的に一緒にスクロールするのではないでしょうか。スクロールして画面から隠れてしまいませんか。質問の主旨は逆のことでしょうか。ワークシート（画面）をスクロールしても,ボタンは画面にそのまま動かないようにしたいということではないですか??（夕焼） ---- もし,上記のことが希望でしたら,下記VBAでボタンを作ると画面に浮いてスクロールしても移動しません。（(Jaka)さんの説明のツールバーを自動で作る方法です。下のVBAは仮の実行マクロです。上のマクロを実行すると自動でボタンが出来て,クリックすると下のマクロを実行します。（夕焼） Sub ボタン作成表示() Dim MyBar As CommandBar Dim MyMenu As CommandBarButton On Error Resume Next CommandBars("Mybutton").Delete Set MyBar = Application.CommandBars.Add(Name:="Mybutton", Position:=msoBarFloating, Temporary:=True) Set MyMenu = MyBar.Controls.Add(Type:=msoControlButton) With MyMenu .Caption = "私のコマンドボタン " .Style = msoButtonIconAndWrapCaption .TooltipText = "ここにメッセージ（注記）を書けます。" .FaceId = 2949 .OnAction = "実際のマクロ名" End With Application.CommandBars("Mybutton").Visible = True MyMenu.Width = 130 End Sub Sub 実際のマクロ名() MsgBox "マクロが実行されました。" End Sub 補足: 一般のツールバーは一回登録すると,EXCELに組み込まれてしまい,いつまでも住み着いてしまいますが,上記は Temporary:=True としていますのでこのマクロを実行した時のみ発生し,EXCEL本体には組み込まれませんので EXCEL自身を汚しません。ブックを開いた時にコマンドボタンも表示したければ,開く時の Workbook_Open() に登録しておきます。 .OnAction = "実際のマクロ名" のところに,マクロ名を記載して実際に呼んでくるマクロを指定します。・FaceId = 2949 ここで,ボタンに付けるfaceIDのID番号を指定します。この数値により絵柄が変わります。 2949は空欄です。 faceIDの絵柄などについては下記が参考になります。 FaceId =266 などにしてみてください。どんなアイコンになるでしょうか。 http://www.h3.dion.ne.jp/‾sakatsu/FaceIdBrowse.htm ---- 皆様方のアドバイスに基づき頑張ってみます。かなり初心者に近い物ですから、何をしてもうまく実行できていません。これからもよろしくお願いいたします。「オク」 ---- >何をしてもうまく実行できていません。上記VBAマクロ（下記に再掲載）をコピーして実行してみられたでしょうか。 マクロ ,マクロ文の組込み方法は御存知でしょうか?。（夕焼） Sub ボタン作成表示() Dim MyBar As CommandBar Dim MyMenu As CommandBarButton On Error Resume Next CommandBars("Mybutton").Delete Set MyBar = Application.CommandBars.Add(Name:="Mybutton", Position:=msoBarFloating, Temporary:=True) Set MyMenu = MyBar.Controls.Add(Type:=msoControlButton) With MyMenu .Caption = "私のコマンドボタン " .Style = msoButtonIconAndWrapCaption .TooltipText = "ここにメッセージ（注記）を書けます。" .FaceId = 2949 .OnAction = "実際のマクロ名" End With Application.CommandBars("Mybutton").Visible = True MyMenu.Width = 130 End Sub Sub 実際のマクロ名() MsgBox "マクロが実行されました。" End Sub ---- 夕焼様ありがとうございます。私自身マクロがよく理解できていないと思います。最近コマンドボタンの使い方を覚えた（つもり）ので、仕事に役立ててみようと張り切っております。「オク」 ---- 「ウィンドウ枠の固定」でシート上部をスクロールしないようにして、そこにボタンを配置するだけで良いと思う。（???） 2013/10/18(金) 13:30 ---- こんにちは上下方向にしかウィンドウを固定したくないのに横方向にスクロールしたい場合とかは Worksheet_SelectionChange を使って選択したセルの横位置にボタンを移動したりは出来ますよ。縦横逆でも出来ますし、選択したセルのそばに移動して表示したりも出来ます。ただスクロールするだけでセルは選択したくないという場合はダメですけど。（ウッシ） 2013/10/18(金) 14:03 ---- 結構古い記事なので、誰かが誤ってあげてしまったのでは? （稲葉） 2013/10/18(金) 14:13 ---- こんにちは、稲葉さんホントですね「20080219085327」って、古い。気づかなかった。（ウッシ） 2013/10/18(金) 14:17 ---- 検索掛けたときに、誰かの役に立つのかもしれませんし、いいことだと思います! なので私も一つ提案。 Sheetモジュールにコマンドボタンだけ配置したユーザーフォームを呼び出す用意し、コマンドボタンに該当するコードを実行させればよいかと。（稲葉） 2013/10/18(金) 14:28 ...; https://www.excel.studio-kazu.jp/wiki/kazuwiki/200802/20080219085327.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ