スケジュールのVBA
昨日以降(0) ２日前以降(0) ３日前以降(0) ４日前以降(0) ５日前以降(0)
| Message#1 2014年12月26日(金)09時38分 From: スケジュールのVBA | 返事 削除 変更 |
| 初心者ですが、どなたか教えて頂けませんでしょうか？ 当日スケジュールというエクセルでVBAを作っておりまして、会議室.xlsファイルからデータをコピーして張り付けるというVBAを作っております。 会議室.xlsファイルが開いていなかったら開き、その後また作業をしたいのですが、 開いたら会議室.xlsの中のアクティブになったシートのＶＢＡが走ってしまいま した。 開いたあと、そのまま次のＶＢＡを続けて走らせる方法はありますでしょうか？ Sub 会議室予約自動コピー() Dim f As Integer For f = 1 To Workbooks.Count If (Workbooks(f).Name = "会議室.xls") Then Exit For End If Next If (f > Workbooks.Count) Then Workbooks.Open Filename:="I:\\\2014_会議 室.xls" Dim i As Long Dim v As Long v = 1 For i = 1 To 31 v = v + 6 If ActiveSheet.Name = i Then Exit For ・ ・ ・ と続きます。 |
昨日以降 ２日前以降 ３日前以降 ４日前以降 ５日前以降
