- ベストアンサー
土日の列幅の自動変更を教えてください。
yone_skの回答
> 土日の列幅は自動で２に変更するような関数やマクロがあれば教えてください。 ExcelVBAがわかると思っていいのでしょうか？ であれば ------------------------------------------ Const c = 4 '開始Col Const r = 4 '開始Row Dim i As Integer i = c While Cells(r, i) <> "" If (Cells(r, i) = "土") Or (Cells(r, i) = "日") Then Range(Cells(r, i), Cells(r, i)).ColumnWidth = 2 End If i = i + 1 Wend ------------------------------------------ いかがでしょう？
関連するQ&A
- 土日に加えた日の列幅変更マクロを教えてください。
エクセルで行事入力表を毎月作成しています。 D4からAG4までに1日から31日の日付を入れ、土日は行事がないので、 教えていただいた下のマクロの実行で列幅を縮小しています。 Sub Macro1() Dim idx As Integer For idx = 4 To 34 If Weekday(Cells(4, idx).Value) = vbSunday Or _ Weekday(Cells(4, idx).Value) = vbSaturday Then Columns(idx).ColumnWidth = 1.5 End If Next End Sub これに、お盆や正月の行事のない日（会社の休日)を加えたいのですが、出来るでしょうか。 行事のない日付は、AK4からAK15に予め入力しています。 どなたか、よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- エクセルでの列幅の自動設定
何百行のデータがあるエクセルの表があります。ある列には文字列が入っているのですが、この文字列長が短いのから長いのまでいろいろあります。列幅を適当に決めて印刷してみると、文字が長くてその列幅からはみ出てしまし、再度列幅を設定して印刷してみるなんてことをやってます。これを全ての文字列がちゃんと入るような列幅を自動的に設定することはできないでしょうか？文字列は１行で表示したいので、書式→セルの「折り返して全体を表示する」は使いたくありません。よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- 日付自動実行マクロについて質問です。
エクセル2000で日計表を作成しています。 Ａ列には日付のシリアル値が、Ｂ列には日付、Ｃ列には曜日が入っています。 毎日データを挿入するのはＤ列からとなります。 そのファイルを開いた時に自動実行マクロでその日のＤ列にセルを飛ばすのにはどうしたらいいでしょうか？ 苦労しています、どなたか詳しい方教えていただけると助かります。
- ベストアンサー
- オフィス系ソフト
- エクセルで土日列の非表示方法を教えて下さい
各シートに各月の暦を作成しています。 Ｂ５に月の１日を入力すると横列Ｃ５Ｄ５・・・に １日、２日・・・３１日まで自動的に日にちが入るようにしています。 また、その下のＢ６の行に曜日が出るようにしていますが、 土日の列幅を０（非表示）にしたいのですが、方法を教えてください。 よろしく、お願いいたします。
- ベストアンサー
- オフィス系ソフト
- 行事予定表の作成でご教示下さい
エクセルで、横列に1日から３１日までの日付、その日付の下のセルに曜日を表示した行事予定表を作成しています。 毎月、第１・２の土曜とあとは日曜日が会社の休日で月2回の週休２日制となっいます。 この第１・２土曜と日曜日の列幅を０にするマクロをご教示ください。 また、祝祭日も列幅を０に出来るマクロがあれば、併せてご教示いただければありがたいです。 よろしくお願いいたします。
- 締切済み
- オフィス系ソフト
- エクセルで行の高さの変更マクロの作成
エクセルで各月の行事予定表を作成していますが、各月の初日を特定のセルに入力すると、自動的にその月の日にちと曜日が各セルの上段から下段に表示されるように作成しています。 例えば、セルＡ１に11/1と入力すると、セルＡ5からＡ36までに日付がＢ5からB36に曜日が表示されるようにし、セルＣ欄に行事内容を入力する行事予定表としています。 この場合、土曜日曜は休みなので行事が入らないため、その行（土曜日曜の行）の高さをボタンクリックで変更（希望の縮小高さに変更）できるマクロを教えてほしいのです。 また、これについては、他の表作成で、入力の無い行の行高縮小マクロにも利用可能ではと考えてもいます。 マクロの実行ボタンの作成は作成することができます。 ご教示をお願いいたします。
- ベストアンサー
- オフィス系ソフト
- ワードの表の列幅の変更で
ワード２００３使用です。 ワードで表を作成し、ある任意のセル（１列1行目と2行目みたいな）の列幅を変更するのに、そのセルを選択しマウスでドラッグすると変更は出来るのですが、表のプロパティのセルタブで幅を指定しても出来ません。どうしてでしょうか？
- 締切済み
- オフィス系ソフト
- エクセル表→セル内データ更新→同じ行の最終更新日欄の日付を自動更新 し
エクセル表→セル内データ更新→同じ行の最終更新日欄の日付を自動更新 したい。 エクセルで作成した表で、表の中のデータを更新した場合に、その行の最後の列の「最終更新日」の日付を自動的に更新する方法を探しています。 具体的には、エクセルで1行目のA列に「データのキーワード」、B列に「データのハイパーリンク」、C列に「データ記入者」、D列に「最終更新日」の項目を作成し、2行目以降に作成した各データをA～Cの項目に従って記入してデータ一覧表を作成しています。 その際に、A，C列の項目を更新した時と、B列項目のリンクを開いた時に、同じ行D列の最終更新日の日付を自動で入力及び更新する方法はないでしょうか？ 恐らくマクロを組む必要があると思うのですが、全くの素人ですので是非教えて頂けないでしょうか？ すみませんが、宜しくお願い致します。
- ベストアンサー
- オフィス系ソフト
- ワード 表 列幅の自動調整
ビスタ/ワード2007 ワードで簡単な表を作成しました。 文字列が一番多いのに列幅を合わせる為、表全体を選択-レイアウトタブ-自動調整-「文字列の幅に合わせる」を行い、意図どうりになりました。 質問：この「文字列に合わせる」を解除したい時はどうするのでしょうか？
- ベストアンサー
- Windows Vista
- Excelで土日の列を塗り分けしたい。
縦軸に項目、横方向へ日付が並んだスケジュール表を構想してるのですが、土曜・日曜日の列を判りやすく塗り分けたいと思います。 曜日のセル単体には条件付き書式で設定できましたが、 その列全体を塗りつぶしたい場合はどうすればよいのでしょう？ なるべくならマクロでなくワークシート関数で実現したく存じます。 しょうもない質問かもしれませんが、なにとぞ ご教授ください。
- ベストアンサー
- オフィス系ソフト
お礼
早速のご教示、ありがとうございます。 ＶＢＡは、初心の初心ですが、ちゃんとできました。 また、よろしくお願いします。