Volgnummer uit extern bestand halen en nieuwe regel maken

[bakkerlak]

Goedemorgen,

Ik ben aan het proberen een opzetje te maken om een factuuroverzicht te maken.
Wanneer ik een nieuwe factuur maak, dan wil ik via een knop automatisch het volgnummer uit het document halen met het overzicht.

Vervolgens wil ik ook dat hij de gegevens uit Rij 24 op de eerst volgende nieuwe regel van het overzicht zet.

Ik heb me een ongeluk gezocht maar ik kon voor mijn eerste vraag niets vinden waar ik iets wijzer van werd.
(heb het geprobeerd met vert.zoeken maar als ik de werkmap bijwerk dan geeft hij een foutmelding)

Voor het wegschrijven heb ik wel iets gevonden, maar dat lijkt niet te werken op de een of andere manier.

Ik hoop dat iemand me kan helpen, dat gaat me met het bijhouden van de facturatie een bult werk schelen.

Alvast bedankt.

Bekijk bijlage Factuurnummers en gegevens.xlsx
Bekijk bijlage Nieuwe factuur.xlsm

 

[HSV]

Alles in één?

Sub factuurnummer()
  With GetObject("C:\users\hsv\desktop\Factuurnummers en gegevens.xlsx")
        .Sheets("Blad1").Cells(Rows.Count, 1).End(xlUp).Offset(1).Resize(, 8) = ThisWorkbook.Sheets("Blad1").Range("A24").Resize(, 8).Value
     ThisWorkbook.Sheets("Blad1").Range("G24") = .Sheets("Blad1").Cells(Rows.Count, 7).End(xlUp).Value + 1
     .Close True
  End With
  'ThisWorkbook.Sheets("Blad1").Range("F2:F6,H20").ClearContents
End Sub

 

[bakkerlak]

Helemaal super!! Werkt helemaal perfect!! Nu ff kijken of ik snap wat er precies gebeurd!
Dankjewel!