• 締切済み

VBAでラベルの文字位置について

VBAでラベルの中央に文字を表示させようとしています。 横位置はTextAlignプロパティで中央表示できたのですが、 縦位置の表示設定はどうしたらできるのでしょうか。 ExcelやAccessのように余白の設定はできないのでしょうか。 初歩的な質問で申し訳ありませんが、調べてもよくわからなかたもので。。 よろしくお願いします。

  • sprit
  • お礼率66% (45/68)

みんなの回答

  • imogasi
  • ベストアンサー率27% (4737/17068)
回答No.1

エクセルVBAで ラベルにはVerticalAlignment の指定ができない(プロパティに無い)ようです。 Label1.Caption = vbCrLf & vbCrLf & vbCrLf & Cells(1, 2) のような小細工をするより他無いのかと思った。vbCrLf の数は試行錯誤か。 ーーー 質問表現で エクセルVBAかアクセスVBAか? >ExcelやAccessのように余白・・ 「ExcelやAccessの○○のように余白」出ないとおかしいと思うが、○○に入るのは何を指している?

sprit
質問者

補足

すいません。 エクセルVBAとアクセスVBAで違いがあるとは知りませんでした。 (VBAはVBAだと思ったのもで...) 余白というのは、Excelのセルの書式設定の「文字の配置」で Accessではラベルのプロパティの「余白」のことです。 言葉が足りませんでした。

関連するQ&A

  • VBAのコントロールについて

    EXCEL VBAでテキストボックスやラベル等の文字表示位置 で、横方向の右、真中、左はプロパティで設定できますが、 縦方向はどのようにすれば出来るのでしょうか。

  • Excel VBAのフォーム_ラベルの縦位置

    Excel VBAのフォームを作成しているのですが、 ラベルのキャプションの縦位置が指定できません。 テキストボックスを入力不可の状態にすると、文字が薄いグレーになってしまい、 ラベルにすると表示される文字が上によってしまいます。 ラベルの文字列を下付き文字にするか、テキストボックスのもじれるを黒くする方法を教えてください。 よろしくお願い致します。

  • テキストボックスの文字位置について

    Wordでテキストボックスの文字を揃える機能ですが、 縦位置の中央に文字を動かしたいのですがどうすれば? エクセルには、縦位置中央の設定があるのに、Wordには無いのでしょうか?

  • グラフラベルの位置

    グラフでデータラベルの追加をするとラベルが表示されますが、 ラベルの位置を右上とかにできる裏ワザはありますか? VBAを使っても良いです。 標準では、中央、左、右、上、下しかありません。

  • Excel-VBA TextBoxの書式設定について

    Excel-VBA TextBoxの書式設定について Excel2003-VBAのUserForm1にTextBox1を作成しました。 横位置・インデント・縦位置を設定しようとして プロパティを見たものの該当プロパティが分かりません。 ご教授宜しくお願いします。

  • フォームのラベルの書式変更が不十分?

     またもやお世話になります。  ユーザーフォームに、ラベルのプロパティのBorderStyleを -fmBorderStyleSingle- にして枠を表示する形式で並べ、 表に見えるような表現をしています。  枠に対する左詰、中央揃え、右詰は、プロパティの TextAlign で可能なのですが、上下の中央揃えがどうしても見つかりません。 どうすれば、文字列を上下の枠の中央に持ってこれるのでしょうか?  プロパティで無理ならば、関数や、マクロでも構いませんので、よろしくご教授ください。

  • access2000でコントロール内の文字位置の調整

    コントロール内で文字位置を調整するとき、左右の位置はプロパティで設定 できますが、縦位置をコントロールの中央にしたいときはどうすればよいのでしょうか?

  • テキストボックスかラベル上の表示を縦に中央揃えしたい

    Visual Basicで、 テキストボックスかラベルの上にある表示を縦方向にに中央揃えすることはできますか。 横方向だとAlignmentプロパティーで設定できますが、縦方向には同様のものがありません。良い方法はないでしょうか。

  • Excel VBAのテキストボックスの文字の位置

    Excel VBA で作成したテキストボックスのなかの文字の表示位置を左中央に寄せて表示したいのですが、方法がありましたら教えていただけませんか、お願いいたします。 下記コードを参考に一応目的は達成できましたが、できることなら文字の表示位置をかえたいのですが、現在は中央に表示されています。 ----------------------------- sub sample343() dim temp as shape set temp = worksheets("sheet1").shapes_ .addtextbox(msotextorientationhorizontal_ ,10,20,80,25) temp.textframe.characters.text = "Excel1 VBA" end sub ----------------------------- 上記コードで左中央に寄せて表示できるでしょうか。もし可能でしたらすみませんがその他の 位置への方法も併せ教えて頂けませんか、 お願いいたします。 環境は,windwos10 Excel 2013です。

  • ラベルの印刷

    縦35ミリ横105ミリのラベルの中央に4文字で名前を印刷するにはプリンターをどのように設定すればいいでしょうか?エプソンのPM-780です。よろしくお願いします。

専門家に質問してみよう