- 締切済み
複数連続した列幅や行高を一発でチェックしたいのですが。
- みんなの回答 (1)
- 専門家の回答
みんなの回答
- imogasi
- ベストアンサー率27% (4737/17068)
エクセルの関数に列幅を得る関数はないと思います。 セルの中身の数値・文字列を問題にしていて幅、高、色、文字フォントなど、メニューの書式に関するものは(条件付の書式は別として)取得・設定できません。VBAの領分でしょう。 標準モジュールに Sub test01() Dim r As Range t = 0 For Each r In Selection t = t + r.ColumnWidth Next MsgBox t & "文字分" End Sub ボタンをワークシートに貼りつけ Private Sub CommandButton1_Click() test01 End Sub をクリックイベントで作ります。 例えばB3:D3を範囲して、ボタンをクリックする。 ただ「良くチェックします」を行うニーズの意味が判らず、自信なし。
関連するQ&A
- Excelの列幅・行高・余白のサイズについて
ある帳票があって、複数の項目(列)と行があります。Excelでその帳票と同じ列幅の項目と行高のフォーマットを作り、印刷をするときはその帳票にしたいと思っています。その場合、帳票の列幅(単位cmまたはmm)はExcelの列幅と行高に置き換える場合、何か目安になるものはあるのでしょうか。またExcelのそれらの数字の単位は何なんでしょうか。 また、印刷するときの余白の数字の単位は何でしょうか。mmかなと思いますが、ピッタリではないように思います。上下・左右の余白を「0」に設定しても、少し余白があります。「0」に設定したときにある余白のサイズはどのくらいなのでしょうか。 よろしくお願いいたします。
- ベストアンサー
- Excel(エクセル)
- VBAで折り返し表示と行高さの設定
環境:Excel2002です あるプロシージャーで求めた値をセルに表示する時、折り返し表示と行高さの設定を自動化したいのです。 求めた値(例) r="(1)~(3),(6),(8)~(11),(15)~(20),(23),(28)~(33),(35)~(38),(40),(42)~(48)" rを入力するセル Range("I14:T14") Range("I14:T14")は結合されていて列幅は 7*11=77 … 列幅は7*11=77で固定 行高さは24.75 求めた値 r は可変です 求めた値rの文字数が少なければ行高さ24.75 1行に問題なく表示されますが 文字数が多い場合は折り返し表示と行高さの設定をする必要があります これを自動化する方法をご教示願います 入力される文字は MS Pゴシック 文字サイズ14 です 自動化する手順は以下だと思うのですが (1)求めた値の文字数を求める 半角、全角が混在なのでLENBで求めるのでしょうか? (2)入力するRange("I14:T14")の入力可能文字数(1行あたり)を求める (3) (1)を(2)で割って行14の表示必要行数を求め、行高さを決定する (4) rを折り返して表示する 贅沢な望みですが、この『VBAで折り返し表示と行高さの設定』は他のブックでも使用することになるので、表示するセルの列幅及び行高さは可変に対応できるようにしていただきたい 折り返して表示した時に【(1)~(3),(6),(8)~(11),(15)~(20),(23),(28)~(33】のように折り返して表示したら )が切れた状態で表示されるのを回避できるのでしょうか? 【(1)~(3),(6),(8)~(11),(15)~(20),(23),(28)~】 よろしくお願いします
- ベストアンサー
- オフィス系ソフト
- Excelの行高を自動調節
Excelのセルに何行にもわたって折り返して入力する場合、全部見えるよう自動的に行高を調節してくれる方法ありますか? そうなっている場合とならない場合があるのです・・・ 宜しくお願いします。
- 締切済み
- オフィス系ソフト
- 列を挿入した時数式も
こんばんは 初心者ですので上手く説明出来るか不安です。よろしくお願いします。エクセル2000を使っています 例えばA1番セルに1月、B1に30、C1に2月、D1に40、E1に合計「=SUM(B1,D1)」が入っています。E列・F列を選択して列挿入をすると合計はG1に移動しますよね。新たに、E1に3月、F1に50と入力した時に列挿入時に移動した合計セルG1の数式は「=SUM(B1,D1)」のままなんですが、自動的に「=SUM(B1,D1,F1)」にする事は可能なんでしょうか? よろしくご指導くださいます様 お願い致します
- ベストアンサー
- オフィス系ソフト
- エクセルでの列幅の自動設定
何百行のデータがあるエクセルの表があります。ある列には文字列が入っているのですが、この文字列長が短いのから長いのまでいろいろあります。列幅を適当に決めて印刷してみると、文字が長くてその列幅からはみ出てしまし、再度列幅を設定して印刷してみるなんてことをやってます。これを全ての文字列がちゃんと入るような列幅を自動的に設定することはできないでしょうか?文字列は1行で表示したいので、書式→セルの「折り返して全体を表示する」は使いたくありません。よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- 【Excel VBA】列幅の設定
こんばんは。 Excel2003を使用しています。 あるシステムからのデータをCSVで出力、Excelで表示させると、セルの幅が合っていないので、見づらいのですが、これを解消するためにそれぞれの列幅を決めて、マクロで設定したいと思っています。 連続しない列の列幅の設定のコードの書き方がわからないので、教えていただけないでしょうか?ひとつの列や連続した列幅の設定であれば、手元にある参考書でわかるのですが。。。 例えば A列、C列、D列、G列、I列、J列の列幅を14 B列、F列、H列の列幅を10 に設定するコードはどのように書いたらいいのでしょうか? マクロ勉強中です。よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- Excelで、値や書式、行幅、行高はそのままセルの数式とリンク先を削除してコピーしたい
Excelで、セルの数式とリンク先を削除し、シートの内容(値と書式、列幅、行高)をそのままコピーしたいです。貼り付けオプションの「値と元の書式」を指定してコピーし、さらに「元の列幅を保持」を指定しても、行高が変わってしまったままです。 値と書式、列幅、行高はそのまま、数式とリンク先を削除して、新しいシートにデータを貼り付ける方法はありますでしょうか?
- ベストアンサー
- オフィス系ソフト
- 一定数の列幅の同じにする
エクセルで例えば10個のセルの列幅を一度に均等にすることってできますか? 10個のセル列幅の合計を測って1/10すればできないことはないですが めんどうです。 A4縦でデフォルトでは9個のセルが並んでいますがが これを13個に均等な幅で増やしたいのです。
- 締切済み
- オフィス系ソフト
- エクセルの列幅について
エクセル2000またはXPを使っています。 行の高さや列幅を変更した後、もとのサイズに戻したい ときの質問です。行の場合はセルのデータを消して 自動調整やダブルクリックで標準の高さに戻ります。 一方、列幅は手動で標準の幅に戻すしかないのでしょうか? どうして、列も同じ操作ができないのか疑問なのです。 ダメならダメでいいのですが、自信がないので 教えてください。
- ベストアンサー
- オフィス系ソフト
- ワードで罫線列幅を固定するには?
ワード2002にて罫線内で改行すると列幅が変わらないようにするにはどうすればいいのでしょうか?ヘルプを見て以下のようにしても枠が動いてしまいます Word の表の列幅は、入力する文字列や図に合わせて自動的に変わります。列幅よりも長い単語を入力すると、その文字列が収まるように列幅が調整されます。入力しても列幅が変更されないようにするには、表の内側をクリックし、[罫線] メニューの [表のプロパティ] をクリックします。[表] タブをクリックして、[オプション] をクリックし、[自動的にセルのサイズを変更する] チェック ボックスをオフにします。
- ベストアンサー
- オフィス系ソフト
補足
ご検討ありがとうございます。「良くチェック」するとは、列幅、行高をピクセル等の単位で測定することで、既存の表を参考に新しい表を作るときなど、表のレイアウト時に用いています。ところで、VBAは殆どできないのですが、表示されたプログラムを実行すると、B~D列の合計幅が求まるのですか?挑戦してみたいと思います。