- ベストアンサー
テキストボックスをコピーするVBA
- みんなの回答 (2)
- 専門家の回答
質問者が選んだベストアンサー
エクセルで(VBA)「あ」がみんな、上を向いて居て良いのなら下記をやって見てください。「あ」が円形に並びます。半径rやStep値(下記では15度)Left値(下記では150),Top値(下記では100)は適当に変えてください。 Sub test1() pai = 3.14159 r = 100 Worksheets("sheet1").Activate Worksheets("sheet1").DrawingObjects.Delete For s = 0 To 360 Step 15 rd = s / 180 * pai ActiveSheet.Shapes.AddTextbox(msoTextOrientationHorizontal, 150 + r * Sin(rd), 100 + r - r * Cos(rd), _ 20, 20).Select Selection.Characters.Text = "あ" Selection.ShapeRange.Fill.Visible = msoFalse Selection.ShapeRange.Line.Visible = msoFalse Next s End Sub 上記でActivesheetから・・20).Selectまでは1行です。
その他の回答 (1)
- pureh
- ベストアンサー率69% (36/52)
>もし、A1に入力された任意の文字に対して上記のことができるようになる >ケースも教えて頂ければ、さらに助かるのですが。 #1の方のプログラムの Selection.Characters.Text = "あ" を Selection.Characters.Text = Range("A1").Value としてみてらどうでしょうか。
お礼
ありがとうございました。 できました!!
関連するQ&A
- EXCEL VBA テキストボックスを見やすくしたい
いつもお世話になっております。 EXCEL VBA のユーザーフォーム上の テキストボックスについて教えて下さい。 大きめのテキストボックスを作り 改行を許可して、数十文字を表示させることができたのですが、行と行の間が詰まりすぎていて、見づらいのです。 行間を空ける方法を教えて下さい。
- ベストアンサー
- オフィス系ソフト
- エクセルVBAのテキストボックスの改行
エクセルVBAのテキストボックスで 自分好きなところで改行したいのですが、 どうすれば良いのでしょうか? 例えば、全角5文字以上表示出来る幅が有っても、 あいう えお というように、「う」で改行したいです。
- ベストアンサー
- Excel(エクセル)
- VBAでテキストボックスに斜線を入れるには?
excelで、大きなオートシェイプのテキストボックスの中に、いくつかの小さな やはりオートシェイプのテキストボックスを貼り付けます。 通常は小さなテキストボックスに文字を入力して使うのですが、全ての小さな テキストボックスに何の文字も入力されていない場合は、大きなテキストボックスに 自動で斜線(シェイプの直線?)が入り、またどれか一つでも小さなテキストボックスに 文字が入力された場合は自動で斜線が消える様にしたいのです。 _____________ | ____ /| | |____| / | | ____ / | | |____| / | | / | | / ____ | | / |____| | | / | | / | |/ |  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ こんな感じなのですが、VBAで可能でしょうか? 以前もこんな感じの質問をしたばかりで恐縮ではありますが、よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- テキストボックス
たびたびの質問すみません。 エクセルVBAでテキストボックス等(条件)に入力すると、他のテキストボックスにエクセルシートから照合して表示させる方法で、条件のテキストボックス等を2つ以上にすることは可能でしょうか、あればやり方を教えてください。
- ベストアンサー
- Visual Basic
- EXCEL VBA のテキストボックスで
EXCEL VBAのテキストボックスでボックス内にテキストを入力 しなければカーソルの移動が出来ないようにできますか? 宜しくお願いします。
- 締切済み
- オフィス系ソフト
- エクセル・VBAでテキストボックスに入力された文字を
エクセル・VBAでテキストボックスに入力された文字を B列から検索し、結果をユーザーフォームのリストbox に表示したいのですがうまくいきません 検索は部分一致・大文字小文字無視で行いたいです よろしくお願いします
- ベストアンサー
- オフィス系ソフト
- VBAテキストボックスについて
こんばんは。 エクセルVBAのテキストボックスの使用方法で行き詰っています。 配列内のデータをテキストボックスへ表示してあります。 テキストボックスを、ダブルクリックして内容を変更し、 変更したデータを配列へ格納する仕組みにしようとしています。 問題は、ダブルクリックすると、テキストボックス内のデータが消えてしまう事です。変更せず他のテキストボックスをクリックすると、データが消えたままになってしまいます。 データは表示したままで、必要な箇所のみ変更する。 ダブルクリック後何もせず、他のテキストボックスをクリックしても 、データは残る仕組みにしたいのですが、可能でしょうか? ご教授お願いいたします。 ※仕事の関係でお礼が遅くなりましたら申し訳ございません。
- ベストアンサー
- オフィス系ソフト
- テキストボックス
下記のようにテキストボックス1.2に入れた文字列を 連結した状態でアラートで表示させたいのですが、 スクリプトを教えていただけませんか?? たとえば、テキスト1に[山田]、2に[太郎]と入れた場合はアラートで[山田太郎]と表示されます。 テキスト1 □□□ テキスト2 □□□ ボタン 「表示」 宜しくお願い致します。
- ベストアンサー
- JavaScript
- VBAのテキストボックスについて
VBAのテキストボックスについて質問させてください。 テキストボックス内の文字列をハイパーリンクにする事は可能でしょうか? 具体的にはテキストボックス内のURLをクリックすると ブラウザが立ち上がり、URLのサイトにアクセスすると言ったものです。 すごく平凡なんですけど、方法が見つからなかったのもで・・・。 どなたかご教授お願いします。
- 締切済み
- オフィス系ソフト
- VBAでテキストボックスを作成
エクセルのVBAで、セルに長めの文章を打ち込む時、セルを選択したらテキストボックスなりが開くようなことはできませんか? テキストボックスは別窓じゃなく、同じエクセル内で開くのが望ましいです。
- ベストアンサー
- Excel(エクセル)
お礼
ありがとうございました。 できました! 大変助かりました。 ただ、もし、A1に入力された任意の文字に対して上記のことができるようになるケースも教えて頂ければ、さらに助かるのですが。