Bonjour,
je rencontre un problème concernant ma macro.
With ActiveWorkbook
.Sheets(1).Name = "Facture"
.SaveAs Filename:=path & fname, FileFormat:=51
.Close
End With
'need to put the details or the invoice in the record of invoices sheet
Set nextrec = Feuil3.Range("A1048576").End(xlUp).Offset(1, 0) Il me met cette erreur au niveau de cette ligne sur nextrec
nextrec = invno
nextrec.Offset(0, 1) = custname
nextrec.Offset(0, 2) = amt
nextrec.Offset(0, 3) = dt_issue
nextrec.Offset(0, 4) = dt_issue + term
Feuil3.Hyperlinks.Add anchor:=nextrec.Offset(0, 7), Address:=path & fname & ".xlsx"
End sub
et je ne comprend pas ou est l'erreur.
Merci de votre aide.
je rencontre un problème concernant ma macro.
With ActiveWorkbook
.Sheets(1).Name = "Facture"
.SaveAs Filename:=path & fname, FileFormat:=51
.Close
End With
'need to put the details or the invoice in the record of invoices sheet
Set nextrec = Feuil3.Range("A1048576").End(xlUp).Offset(1, 0) Il me met cette erreur au niveau de cette ligne sur nextrec
nextrec = invno
nextrec.Offset(0, 1) = custname
nextrec.Offset(0, 2) = amt
nextrec.Offset(0, 3) = dt_issue
nextrec.Offset(0, 4) = dt_issue + term
Feuil3.Hyperlinks.Add anchor:=nextrec.Offset(0, 7), Address:=path & fname & ".xlsx"
End sub
et je ne comprend pas ou est l'erreur.
Merci de votre aide.