.
[ Voor 100% gewijzigd door Verwijderd op 12-03-2004 12:54 ]
1
2
3
4
5
6
7
| Do While Not rstOutput.EOF iRow = iRow + 1 For iCol = 1 To rstoutput.Fields.Count ActiveSheet.Cells(iRow, iCol) = rstOutput.Fields(iCol - 1).Value Next iCol rstOutput.MoveNext Loop |
[ Voor 7% gewijzigd door Maasluip op 05-03-2004 13:58 ]
Signatures zijn voor boomers.
[ Voor 97% gewijzigd door Maasluip op 05-03-2004 13:57 ]
Signatures zijn voor boomers.
Bedoel je in Excel de functie end+arrow down? Als je dat met een macro opneemt dan zie je wat de VBA code daarvoor is.Verwijderd schreef op 09 maart 2004 @ 23:17:
Maar nu !!
Als ik op de template geen iko_bedrag zet gaat ie gewoon door naar de volgende regel. Ik wil het zo maken dat hij dan een heel blok overslaat en netjes naar de volgende waarde gaat zoeken.
Heb het geprobeerd met aparte subs maar ook dit werkt niet. Ben al dagen aan het klooien.
Signatures zijn voor boomers.