• ベストアンサー

Excel vbaによるポイント変更後の位置ズレ

皆様こんにちは。 Excelのvbaに関して質問があります。 セル内改行（上下2段を想定）されているデータのあるセルについて、下段の文字のポイント数を変更するvbaを組みました。 無事に動いたのですが、問題が発生しました。 一つの行につき複数の列のある表であり、行ごとに垂直位置を揃えたい為、セル内改行無しのセルは上詰め、セル内改行ありのセルは均等割付けにし揃えたいと思っています。 vbaでセル下段部分のポイント数を変更すると上段が微妙に下がってしまうのです。 手動で行う場合はズレません。 なぜでしょうか？何か揃える方法はないでしょうか？ よろしくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • HohoPapa
  • ベストアンサー率65% (454/691)
回答No.1

サンプルな画像、再現するコードが未掲示なので推測です。 セル内で改行しているわけですから、1行目の末尾に　vbLf　があります。 この部分に対しても、2行目と同じフォントサイズを設定していませんでしょうか。

ilipoanna
質問者

お礼

ありがとうございました。

  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. Excel（エクセル）

関連するQ&A

  • WORD2002で、表内の均等割付について

    セル内の文字列を改行した場合、２行目以降が均等割付できなくて困っています。 セルの配置で、中央揃えを指定し、次に、表のプロパティのセルのオプションで「文字列を折り返して全体を表示する」と「文字列をセル幅に均等に割り付ける」をオンにしました。これで、セル内の文字列は均等割付ができています。この状態で、セル内の長い文字列を改行すると、１行目は均等割付になっていますが、改行した２行目は均等割付になっていません。 そこで、２行目を選択して、ツールバーの均等割付のアイコンをクリックすると、「選択範囲には均等割り付けが設定できない文字またはオブジェクトが含まれています」と表示されて、２行目の均等割付ができません。 ちなみに、２行目を選択したときの状態は、２行目は黒く反転表示され赤い下線がつき、同時に１行目には水色の下線がつきます。この水色の下線が何か影響しているのでしょうか。 ２行目を均等割付するにはどうすればいいでしょうか？

  • エクセルファイルの枠内の文字列を改行するには？

    今は枠内の行変えができませんで、右隣のセルの中に食い込んでいます。これをセルの中に留めるために改行したいのですが、方法を教えてくださいませ。セルの高さを変更する方法はわかっています。高さは十分にあるのですが、下段にアル文字列をセル内上段に移すことができません。

  • エクセルで下段だけの削除

    教えて下さい エクセルで作成した表があります 行1　上段 行2　下段 行3　上段 行4　下段 この上段、下段の繰り返しで1000件はあります 下段の行のみを一気に削除をしたいのですが簡単に削除をする方法はありませんか？ 全部単なる数字が入っているだけでどこにもセルの結合はありませんしマクロもありません 宜しくお願い致します

  • パワーポイントの均等割付について

    パワーポイントの均等割付についてわからないことがありますので、 どなたか教えて頂けないでしょうか。 プレースホルダーに以下の様な文章を入力します。 （例） 日時　1月10日（金）14時～ 場所　日本武道館 上記の文章で、「日時」と「場所」だけに同じ文字数の均等割付を 設定したいのです。 私は「日時」と「場所」の文字列だけを範囲選択をして、 そこに均等割付を設定してみたのですが、結果的には1行全体に 均等割付が設定されてしまいます。 範囲選択した文字列だけを均等割付できる方法はないので しょうか。 ご教授頂けると大変助かります。よろしくお願い致します。

  • EXCEL VBAで変更のあった行の色を変えたい

    EXCEL VBAで変更のあった行の全てのセルの色を変えたいと思っているのですが，可能でしょうか？もし可能でしたら，どのようにしたら良いのでしょうか？

  • エクセル内でのVBAの質問です。

    閲覧ありがとうございます。 エクセルの作業ファイルにてVBAのコードを作成しているのですが、中々思う通りに実行できないので、ご教授願います。 実行したい内容については以下の通りです。 ボタン1を押すと(添付画像上段のブック)、マイドキュメント内にある「データ転送ソフト2」という名前のブックを開き、そのブックのシート「A」内(添付画像下段)の、ボタン1を押したシートのF1セル(添付画像上段のブック)と同じ文字(日付)の列と"う"と入力された行の交差したセルの数値(添付画像下段の紫色のセル)をコピーして、ボタン1を押したシートのT4のセル(転送値1:の右隣にある薄緑のセル)に貼り付ける作業が行えるコードをご教授願いたいです。 要約しますと、作業しているシートのボタン1を押すと、別の場所にあるブックを開き、そのシート内の条件に沿った数値をコピーして、作業しているシートの指定されたセルに貼り付ける作業が行いたいです。 とても分かりにくい文章で申し訳ございませんが、お願いします。 可能ならば、コードの解説もつけてくださると嬉しいです。

  • Excel VBA セルの値を変更後にVBA作動

    Excel VBAを活用して、特定のセルの値が変更されたときに、VBA処理を発動させることになりました。 処理といたしましては、C列（３列目）の４行目以下の空白セルに数値を入力するか、セルに入力されている数値を変更した場合にVBAを発動させたいです。 Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column = 3 And Target.Row >= 4 Then MsgBox "セルの値が更新されました" End If End Sub 上記のコードを実行してみたところ、３列目（C列）の４行目を選択した段階でVBAが作動してしまいます。 セルの値変更後に作動するようにするには、どう修正すればよろしいでしょうか？

  • Excel VBAで表のフォーマットを変えたい

    表題だけでは判らないと思いますので、詳細に実現したいことを箇条書きにて説明いたします。 1.弊社では、電子スケジュール管理ソフトを使っています。 （WEBベースで、部内のメンバーの一週間分の行動が表示できます） 2.現在、その予定表を、女性事務員さんが、ブラウザ上でコピーして、Excelに貼り付け、職位順に並べ替えたり、空白行を削除したりしています。 3.今回の質問は、ブラウザからコピーするところまでは仕方ないとして、その後、決まったフォーマットに編集する作業をVBAを用いて簡便化してあげたいのです。 マクロも考えましたが、ソフトに登録されているスケジュールの数によって行数が変わるため、適していないと判断しました。 （注）当方、VBAの知識はほとんどありません。基本書を読んだくらいで、「ああ、こういうものか」という理解度です。 4.本題ですが、ペーストした状態は、図のとおりです。名前が結合されたセルの右に、一日毎の予定が入力されています。が、時間と予定の内容は別のセルに格納されています。 また、なぜか予定の一番上には空白セルが挿入されています。 5.これを、 　　　日付　　　　　　　　日付　　　　　　　　　日付 -------------------------------------------------------------- Ａ氏｜時間（セル内改行）｜時間（セル内改行）｜ 　　｜予定（セル内改行）｜予定（セル内改行）｜ 　　｜時間（セル内改行）｜ 　　｜予定（セル内改行）｜ -------------------------------------------------------------- Ｂ氏｜時間（セル内改行）｜時間（セル内改行）｜ 　　｜予定（セル内改行）｜予定（セル内改行）｜ 　　｜時間（セル内改行）｜ 　　｜予定（セル内改行）｜ -------------------------------------------------------------- という風に、整理したいのです。 もっと欲を言えば、決められた順序に、名前で並べ替えたいです。 VBAの得意な方、いらっしゃいましたら断片的でも結構ですので、ご教授いただけませんでしょうか？ どうぞよろしくお願いいたします。

  • エクセルVBAのChr(10)の挿入と削除

    宜しくおねがいします 現在結合されたセルがありそのセル内に他のプログラムから 下記の値が挿入されるようになっています。 あいうえお かきくけこ さしすせそ たちつてと （Chr(10)の改行） （Chr(10)の改行） （Chr(10)の改行） （Chr(10)の改行） 他のプログラムから送られてくる値は”あ行”の１行だけだったり ”ま行”までの7行あったりとその都度変わってきます。 文字数も”あ”の1文字だけだったり”あああいいいうううえええおおお”と 文字数も変わります。 しかし下の4行分の”Chr(10)の改行”の数は変わりません。 やりたいことは↓ コマンドボタンを二つ作り、ボタンを押すたびに下にあるChr(10)の改行を 挿入したり削除したりしたいのですがどのようにすればよいのでしょうか？ 追加ボタンを2回押すとChr(10)の改行が6行分になり そこから削除ボタンを3回押すとChr(10)の改行が3行分になる・・・という感じです。 試しにマクロの記録で セルを選択して改行を削除 をしてみたのですが思うような動きをしてくれません。 なぜChr(10)なのかとかいうのは聞かないでください・・・ そこから説明すると長くなるので。

  • Excel で位置が変動するセルの指定をVBAで作りたいのですが・・・？

    　ExcelのVBAはほとんど初心者なのです。 　申し訳ございませんが教えていただきたいのです。 　ひとつのシートに表が３種類あるのですが、それぞれ違うデータを 　貼り付けようとしています。 　元の表の形は同じです。３行の表でデータの数によって行が挿入 　するようになっています。 　1つ目の表は、開始のセルは決まっているので指定は出来るのですが 　2つ目・3つ目の表の開始セルがその時々で変わってきます。 　その時の、開始セルのマクロを作成したいのですが分からなくて 　教えて下さい。 　よろしくお願いします。 　説明が下手ですみません。 　 　

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

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

質問する