Klik hier om Silverlight te installeren*
Nederland|Sitemap
Microsoft
Financien 
|Contact
Financieel Management - Bewaak uw financiën

Factureren met Excel - deel 2

Telkens als u een nieuwe factuur begint, moet bovenaan automatisch het volgende factuurnummer verschijnen. In dit artikel leest u hoe dat in zijn werk gaat. In een van onze eerdere artikelen maakte u kennis met een factuurapplicatie in Microsoft Excel. Daarin was onder meer een keuzelijst ingebouwd, waarmee u heel gemakkelijk adresgegevens van uw klanten kunt ophalen.
 
We hebben u toen gevraagd te reageren, als u nog meer oplossingen in deze factuur ingebouwd wilde zien. Er kwamen verschillende reacties binnen en die hadden allemaal één wens gemeen: u wilt een automatisch ophogend factuurnummer.
 
Download
Downloaden
Snel resultaat
Oplossing inbouwen in uw eigen applicatie
Werking

Downloaden

Op de volgende manier is VerkoopFactuur5.xls te downloaden en op uw systeem te installeren:
 
  1. Start het downloaden. U vindt het Excel-bestand bovenaan deze pagina.
  2. Kies in het dialoogvenster Bestand downloaden voor Opslaan.
  3. Boven in het dialoogvenster Opslaan als klikt u in het witte vak achter Opslaan in. Daarmee verschijnt een lijst van mappen en drives.
  4. Waar u het sjabloon moet opslaan is afhankelijk van uw besturing systeem en configuratie:
    • In een Windows XP-en Office XP-omgeving plaatst u de gedownloade sjabloon op uw vaste schijf in de map c:\Documenten en instellingen\gebruikersnaam\Toepassingsgegevens\Microsoft\Sjablonen\.
       
    • Werkt u met Microsoft Office 2003 Edition dan moet de sjabloon geplaatst worden in de map c:\program files\Microsoft Office\Templates\1043
       
    • In een gemixte Engelstalige omgeving heet de map c:\documents and settings\uw naam\application data\microsoft\sjablonen.
       
    • Voor Office 2000 en Windows 9x geldt voor Excel-sjablonen een andere locatie. Sjablonen worden doorgaans opgeslagen in de map Sjablonen, in de map xlstart, of in de alternatieve locatie voor het opstartbestand. De map Sjablonen is gewoonlijk C:\Windows\Profiles\gebruikersnaam\Application Data\Microsoft\Sjablonen en de map xlstart is normaal gesproken C:\Windows\Profiles\gebruikersnaam\Application Data\Microsoft\Excel\xlstart.
       
    • Voor Windows 2000 Professional geldt als locatie: C:\Documenten en instellingen\gebruikersnaam\Toepassingsgegevens\Microsoft\Sjablonen.
 
  1. Klik op Opslaan om het downloaden te starten.
  2. Klik op Sluiten om het dialoogvenster Het downloaden is voltooid te sluiten.
 
Let op: voor een goede werking van de factuurapplicatie is het belangrijk dat u het bestand eerst opslaat op uw harde schijf en daarna vanuit Excel opent.
 

Snel resultaat

Download  hierboven de verkoopfactuur. Er is gekozen voor een sjabloon (xlt). Dat maakt het hergebruik van de factuur eenvoudiger, want telkens als u een nieuwe factuur moet maken wordt automatisch een kopie gemaakt van de sjabloon. Dat gaat als volgt:
 
  1. Start Excel.
  2. Kies Bestand >> Nieuw.
  3. Werkt u met Office XP of Office 2003 dan klikt u in het Taakvenster op Algemene sjablonen.
  4. Dubbelklik in het dialoogvenster Sjablonen op de verkoopfactuur. Beantwoord de eventuele vraag over Macro's met Macro's inschakelen.
  5. Als het goed is verschijnt bovenaan de factuur het eerstvolgende factuurnummer. Is dit nummer juist dan kunt u door naar stap 9.
  6. Klik in de menubalk op Factuurnummer aanpassen.
  7. In het gelijknamige dialoogvenster ziet u al het volgende nummer: 2. Vervang dit nummer door het factuurnummer dat aan de beurt is en klik op OK.
  8. Het dialoogvenster sluit weer en het nieuwe nummer staat nu bovenaan de factuur.
  9. De cursor staat in de cel voor het eerste artikel, dus vanaf hier kunt u de factuur verder afmaken.
 
Stap 6, 7 en 8 zijn in feite eenmalige acties. Het allereerste factuurnummer is namelijk factuurnummer 1 en dat moet aangepast worden. Zodra eenmaal het juiste nummer is opgegeven, verschijnt bij elke volgende factuur automatisch het juiste nummer. Overigens kan een sjabloon in veel gevallen ook heel gemakkelijk vanuit Windows Verkenner worden geopend: open in Windows Verkenner de map waar u de sjabloon tijdens het downloaden gestationeerd hebt en dubbelklik op de verkoopfactuur. Dit is vooral een geschikt alternatief als u moeite hebt met stap 1 tot en met 4.
 
Waar wordt het nummer opgeslagen?
Het factuurnummer moet ergens op uw computer of netwerk worden bijgehouden. Daartoe kan het op verschillende manieren worden opgeslagen. Een voor de hand liggende plek is het Windows register, maar daar kleven twee nadelen aan: de ophogende factuurnummering is dan sterk gebonden aan één pc en is in een netwerkomgeving vrijwel niet door meerdere collega's te gebruiken. Ten tweede is het register een dermate vitaal onderdeel van Windows dat het beter is om daar niet te veel aan te veranderen. De oplossing is om het nummer in een simpel tekstbestand bij te houden, dat geopend kan worden met bijvoorbeeld Kladblok en dat wordt opgeslagen in een gemakkelijk te lokaliseren plek. Deze plek wordt als volgt gevonden:
 
  1. Open in Excel het menu Extra.
  2. Kies Opties.
  3. Open het tabblad Algemeen.
  4. Kijk wat er ingevuld staat achter Standaardbestandslocatie.
  5. Sluit het dialoogvenster Opties.
 
Op de aangetroffen Standaardbestandslocatie zult u met Windows Verkenner een bestandje FactuurNummer.txt aantreffen, dat u door erop te dubbelklikken kunt openen in Kladblok. In Kladblok verschijnt dan de inhoud van het bestand, te weten het eerstvolgende factuurnummer. U ziet dat u het factuurnummer ook met Kladblok zou kunnen wijzigen, maar omdat in Excel een menu-optie Factuurnummer aanpassen is toegevoegd is dat niet nodig. De Kladblok-methode zal vooral zijn diensten bewijzen als u de Automatisch ophogende nummer oplossing ook in andere applicaties gaat gebruiken, die de menu-optie Factuurnummer aanpassen missen. Sluit Kladblok nu zonder het bestand te bewaren.
 
In een netwerkomgeving, waarbij meerdere mensen van de factuurapplicatie gebruik moeten maken, moet ervoor gezorgd worden dat op elk werkstation achter Standaardbestandslocatie dezelfde map staat vermeld, dat die map zich op de server bevindt en dat zich in die map alle voor het dagelijkse werk benodigde spreadsheets bevinden.
 

Oplossing inbouwen in uw eigen applicatie

Nu hebt u de vorige sjabloon waarschijnlijk helemaal voor uw bedrijf ingericht. Dat werk hoeft u niet opnieuw te doen. Stap voor stap hevelt u oplossing uit de oude verkoopfactuur naar de nieuwe of naar een ander werkblad, dat u in Excel hebt gemaakt.
 
  1. Start Excel.
     
  2. Open de oude factuurapplicatie of een andere Excel-applicatie via Bestand >> Openen. Hef de beveiliging op via Extra >> Beveiliging >> Beveiliging blad opheffen.
     
  3. Open de nieuwe applicatie via Bestand >> Openen. Beantwoord de eventuele vraag over de macro's met Macro's inschakelen. Hef de beveiliging op via Extra >> Beveiliging >> Beveiliging blad opheffen.
     
  4. Schakel in de nieuwe applicatie over naar de Visual Basic editor via sneltoets Alt+F11.
     
  5. Klik links op het scherm in de ProjectVerkenner op het plusje voor VBAProject(Verkoopfactuur3) en geef vervolgens een dubbelklik op ThisWorkbook. Staat de ProjectVerkenner niet op uw scherm maak hem dan eerst zichtbaar via Ctrl+R.
     
  6. De cursor staat nu rechts op het scherm aan het begin van de programmacode. Kopieer deze code via Ctrl+A, Ctrl+C.
     
  7. Klik nu in de ProjectVerkenner op het plusje voor VBAProject (Verkoopfactuur2) en geef een dubbelklik op ThisWorkbook, dat bij Verkoopfactuur2 hoort.
     
  8. De cursor staat nu rechts in een leeg scherm. Plak hier de zojuist gekopieerde code in via Ctrl+V.
     
  9. Verlaat de VBA-editor met Alt+F11.
     
  10. Sluit de nieuwe verkoopfactuur via Bestand >> Sluiten; de vraag over opslaan beantwoordt u met Nee.
     
  11. Nu staat alleen de oude factuur nog op uw scherm.
     
  12. Klik in de cel waarin het factuurnummer moet komen te staan en geef de opdracht Invoegen >> Naam >> Definiëren. Typ de naam Factuurnr. (inclusief punt) en klik op Toevoegen >> OK.
     
  13. Klik in de cel voor het eerste artikel (C19) en geef de opdracht Invoegen >> Naam >> Definiëren. Typ de naam EersteArtikel en klik op Toevoegen >> OK.
     
  14. Herstel de beveiliging via Extra >> Beveiliging >> Blad beveiligen >> OK.
     
  15. Bewaar het nieuwe werkblad via Bestand >> Opslaan als, geef het aangepaste werkblad de naam van het document met factuurnummering. Achter Opslaan als selecteert u Sjabloon. Klik op Opslaan.
     
  16. Sluit het werkblad via Bestand >> Sluiten.
 
Andere documenten
U kunt deze code gemakkelijk kopiëren en in uw eigen Excel-documenten en -sjablonen plakken, zoals offerteberekeningen, rapporten en andere genummerde documenten. Let op de volgende punten:
 
  1. Plak de code in het onderdeel ThisWorkBook van de VBA-editor.
     
  2. Gebruik een andere bestandsnaam voor de opslag van bijvoorbeeld offertenummers, zodat geen conflicten ontstaan met de factuurnummers. Noteer in regels 6, 8 en 13 de naam van het bestand, waarin u dit nummer opslaat, bijvoorbeeld OfferteNummer.TXT. Het bestand wordt automatisch aangemaakt.
     
  3. De cel waarin het nummer moet komen te staan moet via de opdracht Invoegen >> Naam >> Definiëren de naam toegewezen krijgen, waar in regel 17 naar wordt gerefereerd (FactuurNr.).
     
  4. Voor de cel waarin de cursor moet staan, nadat het nummer is ingevuld bedenkt u een naam. Deze naam noteert u in regel 19 en wijst u via de opdracht Invoegen >> Naam >> Definiëren toe aan die cel (EersteArtikel).
 

Werking

Om het factuurnummer automatisch op te hogen is een stukje Visual Basic for Applications code ontwikkeld. Om deze code te zien moet u de sjabloon Verkoopfactuur3.XLT openen via Bestand >> Openen (dus niet via Bestand >> Nieuw) en op sneltoets Alt+F11 drukken. Klik in de ProjectVerkenner links op het scherm op ThisWorkBook; staat de ProjectVerkenner niet op uw scherm maak hem dan zichtbaar via Ctrl+R. Rechts op het scherm ziet u de code, waarvan het belangrijkste gedeelte hieronder wordt toegelicht. De regelnummers ontbreken op uw scherm, deze zijn alleen toegevoegd om de uitleg te verduidelijken.
 
  1. Private Sub Workbook_Open()
  2. Call LeesEnBewaarFactuurNummer3
  3. End Sub
  4. Sub LeesEnBewaarFactuurNummer3()
  5. pad$ = Application.DefaultFilePath
  6. controle = Dir(pad$ + "\FactuurNummer.txt")
  7. If controle = "" Then GoTo EerstAanmaken
  8. Open pad$ + "\Factuurnummer.txt" For Input As #10
  9. Input #10, Nummer1
  10. Close #10
  11. EerstAanmaken:
  12. Nummer1 = Nummer1 + 1
  13. Open pad$ + "\FactuurNummer.txt" For Output As #10
  14. Print #10, Nummer1
  15. Close #10
  16. Noteer nu het opgehaalde factuurnummer in het werkblad
  17. Application.Goto Reference:="Factuurnr."
  18. ActiveCell.FormulaR1C1 = Nummer1
  19. Application.Goto Reference:="EersteArtikel"
  20. End Sub
 
Regels 1 tot en met 3 zorgen ervoor dat de routine LeesEnBewaarFactuurNummer3 automatisch wordt gestart telkens wanneer u de sjabloon opent in Excel. De routine begint eerst met uit te zoeken in welke map het bestand met het eerstvolgende factuurnummer is opgeslagen. Deze Standaardbestandslocatie wordt in regel 5 toegekend aan de stringvariabele Pad$. In regel 6 krijgt de variabele Controle een waarde, indien in de map het bestand FactuurNummer.TXT wordt aangetroffen. Uit dit bestand wordt het eerstvolgende factuurnummer gelezen, opgehoogd en weer opgeslagen.
 
Hier is sprake van een kip en ei situatie, want je kunt pas iets ophalen als het bestaat, en je kunt niet iets bewaren wat er nog niet is. Heeft de variabele Controle geen waarde, dan is er blijkbaar nog geen factuurnummerbestand (de allereerste keer dat u de sjabloon gebruikt) en springt de routine naar regel 11. De regels 8 tot en met 10, waarin het factuurnummer normaliter wordt opgehaald en aan de variabele Nummer1 wordt toegekend, worden nu overgeslagen. In regel 12 wordt het factuurnummer Nummer1 met 1 opgehoogd; bij allereerste gebruik is dat 0+1=1.
 
Vervolgens wordt in regel 13 het factuurnummerbestand opnieuw geopend, in regel 14 wordt het nieuwe nummer in het bestand gezet en tot slot wordt het bestand in regel 15 weer gesloten. In regel 17 wordt naar de cel gesprongen, waarin het factuurnummer moet komen te staan. Deze cel heeft via Invoegen >> Naam >> Definiëren de naam Factuurnr. gekregen. Het nummer wordt in de cel geplaatst (regel 18) en in regel 19 wordt verder gesprongen naar de cel waar het eerste artikel wordt ingevuld. Deze cel heeft via Invoegen >> Naam >> Definiëren de naam EersteArtikel gekregen.
 

Gerelateerde artikelen

 
Abonneer u op de nieuwsbrief
.

©2009 Microsoft Corporation. Alle rechten voorbehouden. Contact opnemen |Gebruiksvoorwaarden |Handelsmerken |Privacyverklaring