Excelで縦方向にセルをマージするのを避けるにはどうすればよいですか？

Question

私はマージされた細胞に疲れています。彼らはちょうど動作しません。

私は、テキストを複数の列にまたがって配置する必要があるときに、セルを水平にマージすることを避ける方法を見つけました。それはRange("A1:C1").HorizontalAlignment = xlCenterAcrossSelectionです。

これは魅力的に機能します。それは完璧だ。それは私が必要としたものです。

私はまったく同じように、複数の行にテキストのセンタリングを行うことができると思いました。次のようなもの：Range("A1:A3").VerticalAlignment = xlCenterAcrossSelection。

しかし、それはうまくいきません。

Excel開発者は実際には列を中心にした処理が共通の問題だと考えていましたが、行を中心にすることはそれほど愚かな考えではありませんでした。

Answer 1

あなたはこの試みることができます：あなたがカウントされた範囲、およびそれが参照しています列を変更する必要がありますが、それはちょうど約それを行う必要があります

Sub VerticalAlign() 
ThisWorkbook.Sheets(1).Cells(Round((WorksheetFunction.CountA(Range("A1:A6")) + WorksheetFunction.CountBlank(Range("A1:A6")))/2, 0), "A") = "Your Value Here" 
End Sub 

を。しかし、少し警告：VBAはExcelと同じようにラウンドしません。しかし、常に1桁以内でなければなりません。詳細はこちらをご覧ください：http://support.microsoft.com/kb/194983

Answer 2

これを行うには、セルにテキストボックスの形を使用します。シェイプを描いている間にAltを押し続けると、角がExcelグリッドにスナップして移動し、セルのサイズに合わせるので、セルに入力するよりも時間がかかりません。

Answer 3

誰かが気にしていれば、私の問題の周りで働く幸運な事故が見つかりました。

私の状況では、従業員の休暇時間を、名前と担当領域で並べ替えることのできるリニアカレンダーで追跡する必要がありました。タイトルのセクションには、以下のデータがフィルタリングされたときに見たいと思っていた3行が含まれていました。行1 =年（月間にマージ）、行2 =月間（マージ済み）、行3 =日。 セルA1：A3がマージされ、名前（従業員）、B1：B3がAREA（責任）をマージしてラベル付けされているため、カレンダースプレッドシートで休暇を追跡して各領域にカバレッジがあることを確認しました利用可能）。この方法の欠点は、フィルタブロックが行1に関連付けられるため、名前がフィルタされたときに行2と3が非表示になりました。

私は以前の投稿からVBAコードを試してみましたが、うまくいきましたが、サイズが大きすぎると切り取られるフォントサイズに達しました。だから審美的に、それは悪く見えた。

次に、名前/領域タイトルをセルA3とB3にマージせずに置き、3行目にフィルターを設定します。これにより、行4から始まるすべてのものが効果的に上に隠れることなく効果的にフィルタリングされましたが、それでもなお悪く見えました。

これで回避策が見つかりました。マージしたい場所の最上部のセルにタイトルがあり、下部のセクションに値がある場合。一番下のセクションにフィルターを設定します（フィルターを設定するための値が必要です）。次に、3つのセルをマージして、それは動作します。 これで、私のA1：A3 NameとB1：B3 Areaがマージされましたが、フィルタボックスはセクションの下部にあります（3行目に位置合わせされています）。

うまくいけば、それはうまくいく人のために働く。私はそれらの細胞を編集から守りました（自動フィルター設定を除いて）、今度は誤って変更することはできません。フィルタリングのみ。