Excel VBA-ból nyomtatás sorszámozással

Excel VBA-ból nyomtatás sorszámozással
2020-01-02T13:19:22+01:00
2020-01-02T16:38:00+01:00
2022-10-15T21:21:43+02:00
gidano
Sziasztok!

Egy olyan probléma megoldásában szeretném a segítségeteket kérni, amivel nem tudok boldogulni.
A feladat egy Excelben készített menetlevél nyomtatása, minden kinyomtatott oldalt sorszámozva a kívánt helyen.

Van egy VBA script, ami működik is, csupán rossz helyre nyomtat, ez:

Option Explicit Sub TizPrint() Dim intI As Integer For intI = 4523 To 4523 [A1] = "Sorszám: " & intI ThisWorkbook.PrintOut Next intI End Sub
A sorszám csupán a próba miatt..

Ide teszem a fotót; a sárga jelölésű szöveget tenném mondjuk a K2 mezőbe, de nem bírok vele, nyilván megfelelő tudás hiányában...

[img]http://www.kepfeltoltes.eu/images/2020/01/02/868excel.sorsz_m.jpg[/img]


Köszönöm a remélt segítséget!
Mutasd a teljes hozzászólást!
A kép szerint K1..K3 összevont cella, így szvsz K1-re tudsz hivatkozni.

Ha
[A1] = "Sorszám: " & intI
helyett

[K1] = intI
írsz, az ok?
Mutasd a teljes hozzászólást!

Tetszett amit olvastál? Szeretnél a jövőben is értesülni a hasonló érdekességekről?
abcd