Microsoft Access 掲示板

Microsoft Access 掲示板

レポート印刷時にレコードごとの連番を振りたい / 1
1
hatena 2019/11/20 (水) 19:25:05

レポートの詳細セクションにテキストボックスを配置して、名前を「連番」とします。
下記にように1行追加すればどうでしょうか。

Private Sub 詳細_Print(Cancel As Integer, PrintCount As Integer)
    
    Me.連番 = i & "/" & Me!発注数
    
    If i < Me!発注数 Then
        Me.NextRecord = False
        i = i + 1
    Else
        i = 1
    End If

End Sub
通報 ...