[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『営業日のみ印刷をかけて、日付も自動で変更』(まるこ)
エクセルで1か月分の記録表を印刷しています。
セルA1に日付が入力してあります。1日1枚です。
今は、セルA1の日付を手入力して印刷をかけていますが
マクロなどを使用して、ワンクリックで1か月分印刷することは
可能でしょうか?
(別シートにカレンダーを作成し営業日のみ印刷、セルA1も営業日で)
分かりにくい説明で申し訳ありません・・・
< 使用 Excel:Excel2010、使用 OS:Windows7 >
シート2のB1〜B31に日付が入っています。
A列にはIF関数が入っており
Bが営業日なら5未満、休業日なら6以上の数値が入っています。
シート2のA列5未満の日付を印刷したいです。
こんな説明でお分かりいただけますでしょうか・・・
(まるこ) 2018/10/19(金) 14:10
Option Explicit
Sub test() Dim ws As Worksheet Dim c As Range
Set ws = Worksheets("sheet1")
For Each c In Worksheets("sheet2").Range("A1:A31") If c.Value <= 5 Then ws.Range("A1").Value = c.Offset(, 1).Value ws.PrintOut End If Next
End Sub
(マナ) 2018/10/19(金) 20:53
出来ました!!ありがとうございます。
(まるこ) 2018/10/22(月) 11:56
10月を例にすると、
10/1 両面で1枚・・・・・
10月の営業日は22日間なので、両面で22枚印刷したいです
(まるこ) 2018/10/25(木) 11:40
(もこな2) 2018/10/25(木) 19:14
(マナ) 2018/10/25(木) 19:59
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.