![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
A 回答 (3件)
- 最新から表示
- 回答順に表示
No.3
- 回答日時:
#2のものです。
追加して色々やって見ました。報告します。(1)Shapesの1種のテキストボックス
エクセルのワークシートのツールバーのテキストボックス(縦書きや横書き)は、図形の1種で、スクロールバーは付かない(付けられない)ようです。プロパティのウィンドウも出す方法がなく、設定も「テキストボックスの
書式設定」に限られます。
ActiveSheet.Shapes("Text Box 16").ScrollBars = 1
はエラーになります。
(注1を実行して見てください。)
------------
(2)Activeコントロール
一方メニューバーの余白で右クリックして出てくる、VisualBasicのツールバーアイコン(金槌とスパナ)をクリックして出るツールバーの中のテキストボックス(ab|)をクリックして出てくる、+をワ―クシート上でドラッグして出きるテキストボックスは、
(MultiLine = Trueだと)
文字を大きくしたり文字数が多いと、垂直スクロールバーは指定しておくと付きます。水平スクロールバーはつかない。
(MultiLine = Falseだと)
文字を大きくしたり文字数が多いと、水平スクロールバーは自動的に付きます。垂直スクロールバーは勿論付きません。
(注2を実行してみて下さい。)文字数を短くすると自動的に消えます。
------------
(3)もう一つ「フォーム」ツールバーをクリックしても、色々なコントロールを設定できます。しかしなぜか、テキストボックスは使えません。
-------------
(注1)
Text Box 16の16は、テキストボックスをデザインモードでポインとしたとき、「名前ボックス」に出る「テキスト 16」の16と合わせてください。
Worksheets("sheet1").Activate
ActiveSheet.Shapes("Text Box 16").Select
' Selection.Top = 3600
Selection.Characters.Text = "関西地区大阪市中央区本町2-2-2"
End Sub
--------------
(注2)
適当に’を外して、スクロールバーの付加・消滅変化を見てください。
Sub test03()
Worksheets("s
heet1").TextBox1.MultiLine = False
Worksheets("sheet1").TextBox1.ScrollBars = 3
' Worksheets("sheet1").TextBox1.MultiLine = False
' Worksheets("sheet1").TextBox1.MultiLine = True
Worksheets("sheet1").TextBox1.ScrollBars = 3
Worksheets("sheet1").TextBox1.Text = "関西地区大阪市中央区本町2-2-2"
' Worksheets("sheet1").TextBox1.Text = ""
' Worksheets("sheet1").TextBox1.Text = "関西地区"
' Worksheets("sheet1").TextBox1.Font.Size = 25
End Sub
早速のご返答、どうもありがとうございます。
とても、詳しく書いていただき、理解がしやすくなりとても、感謝しています。
以前に教えていただいたものと、上記のものを試してみました。 スクロールバーが 出現しました!! ありがとうございました!! 感動でした!!
もう、2件追加で、質問があるのですが、もしも、宜しければ、お答え頂けるととても、助かります。
1.基本的な質問で大変申し訳ないのですが、プロパティで、自分で設定(選択)した後、ビジュアルベーシックも設定(プログラムを書き込む)をしなければ いけないものなのでしょうか。
2.スクロールバーを 独自に設定する事(テキストボックスを設定するように)は、可能なのでしょうか。その場合どのようになりますでしょうか。
本当に何もわかっていない状態で、大変申し訳ないのですが、もしも、お時間と余裕がありましたら、ぜひ、教えて頂けたらと思います。
P.S. 昨日の時点で、imogashiさんの方にも、長い間お返事を頂きながら、すみませんでしたというメッセージと、補足をさせて頂いたつもりでしたが、インターネットの不調のせいか(最近、私のメールがよく行方不明になっているのです。)、補足されていませんでした。それにもかかわらず、お答えいただいて本当にありがとうございました。
No.2
- 回答日時:
下記のようにしてテストしました。
何かヒントになれば幸いです。
ツール-マクロ-VBEをクリック。
挿入-ユーザーフォーム-ツールボックスからテキストボックスを
ユーザーフォームにドラッグドロップする。
ツール-マクロ-マクロ名-test01(仮に)
Sub test01()
End Subが現れる。
その中に
Userform1.Textbox1.Multiline=True
Userform1.Showをいれる。
テキストボックスのプロパティにScrollbarがあるが、0を2(垂直スクロールバー付き)にする。
そしてtest01を実行する。
テキストボックス内で(文字を入力する)そしてCtrl+エンタを
数回繰り返す縦幅を超えると、突然スクロールバーが現れます。
すなわちスクロ-ルバーコントロールを横にくっ付ける必要はないと思います
![](http://oshiete.xgoo.jp/images/v2/common/profile/M/noimageicon_setting_16.png?e8efa67)
No.1
- 回答日時:
>スクロールバーを テキストボックスに挿入して
というのは、スクロールバーオブジェクトのことでしょうか?
テキストボックスのプロパティの"ScrollBars"を設定すれば
できると思うのですが、こっちができないのでしょうか?
この回答への補足
長い間アドバイスをいただきながらお返事もかけずに すみませんでした。
もしも、まだ、お答えいただけるようでしたら、御願いをしたいのです。
私が言っているテキストボックスは、図形描画、或いは挿入からいれるテキストボックスの事だったのですが、VBの中の挿入からのテキストボックスのプロパティのScrollbarsを変更する事により、図形描画のテキストボックス内にも、スクロールバーが動作するように出来ますでしょうか。
変更をするのには、どのように設定すれば宜しいのでしょうか。
もしも、お時間と余裕がありましたら、ぜひ、教えてください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Word(ワード) 分かる方教えてください。 wordに図を差込して資料を作成してますが その図上の説明したい箇所に①と 3 2022/10/20 20:05
- その他(Microsoft Office) パワーポイントやワード、エクセルでのスライドショーやテキストの微調整について 1 2023/01/12 05:50
- その他(IT・Webサービス) このサイトのスクロール逆じゃないですか? 1 2022/10/05 20:48
- gooブログ 記事の下にスクロールバーが表示される 2 2022/08/19 20:42
- PowerPoint(パワーポイント) PowerPoint2007を使用しています。 図を挿入し、その上にテキストボックスで文字入れをした 2 2023/07/13 08:35
- その他(プログラミング・Web制作) マウスオーバー→ホイール回転でスクロールできない 2 2022/10/31 10:06
- その他(パソコン・スマホ・電化製品) ワードでテキストボックス内の文字を連動させない方法 2 2023/02/09 16:56
- Excel(エクセル) Excelで日付のグラフへの表示 2 2022/04/15 11:04
- Access(アクセス) capeofdragonと申します。 Access2016を使っております。 あるフォームがあり、テ 2 2022/09/09 13:18
- その他(ソフトウェア) LibleOffice Calc のテキストボックス 4 2023/08/16 09:37
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルのデータグループ化の...
-
Wordファイルで印刷をかけると...
-
テキストボックス内に図を入れ...
-
word 図形描画を同じ位置に貼る...
-
Word2007の数式エディタで、分...
-
Wordに挿入したExcelワークシー...
-
パワーポイントで文字を入力が...
-
Wordで画像(図)と表(罫線入...
-
Word各ページの同じ位置(右隅...
-
連絡網を作りたい
-
Wordの差込印刷、NextRecordに...
-
ワードでテキストボックスを挿...
-
WORD2000, EXCEL2000のフォーム...
-
excelで画像の上に文字を重ねて...
-
テキストボックスが消えない
-
WORDで名刺を作成する方法…
-
【エクセル】シート上に存在す...
-
テキストボックスの中の文字を...
-
エクセルでCDジャケットを作成...
-
図形の縁をぼかす
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルのデータグループ化の...
-
Wordファイルで印刷をかけると...
-
word 図形描画を同じ位置に貼る...
-
Word各ページの同じ位置(右隅...
-
Excelテキストボックス内の文章...
-
ワード文書の罫線の中の文字が...
-
テキストボックス内に図を入れ...
-
excelで画像の上に文字を重ねて...
-
Word2007の数式エディタで、分...
-
Wordで画像(図)と表(罫線入...
-
Wordに挿入したExcelワークシー...
-
ワードに背景を挿入そして印刷...
-
文字位置の微調整
-
Word ヘッダーに入れた画像の...
-
パワーポイントで
-
ワードでテキストボックスを挿...
-
パワーポイントで文字を入力が...
-
画像の色が印刷すると薄くなる■...
-
Wordで、複数の行の文字をまと...
-
テキストボックスが消えない
おすすめ情報