|
▼Jaka さん:
>▼たうりん さん:
>>オートフィルタで12行ずつ選んで印刷しようとしています。
>>1以上〜12以下、13以上〜24以下、25以上〜36以下・・・
>>データがある行まで繰り返し処理をします。
>やっていることが良くわかりません。
>
>>'変数への代入部分
>> myRow1 = 8
>> myRow2 = 1
>> myRow3 = 11
>>Do
>> b = Worksheets("日報").Cells(myRow1, 1).Value
>> If b = "" Then Exit Do
>>
>>'補給品指示書印刷
>> With Worksheets("日報").Select
>>'フィルタ 1〜12行目
>> Selection.AutoFilter Field:=2, Criteria1:=">=" & myRow2, Operator:=xlAnd, _
>> Criteria2:="<=" & myRow3
>オートフィルタ領域の2列目の値が、
>myRow2
>以上
>myRow3
>以下を表示。
>
>これが、どうして行に結びつくのか解りません。
行という説明がよくなかったです。
2列目に1〜100の連番をふっています。
1列目は、7行目に項目、8行目からデータが入っていて、印刷が必要な行に1が入るようにしています。
宜しくお願いします。
|
|