• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Automatisch kopieren van gegevens

Status
Niet open voor verdere reacties.

Paul-RT

Giga Honourable Senior Member †
Lid geworden
6 dec 2003
Berichten
10.886
Hallo.
Ik heb weinig verstand van excel, maar werk met office 2003.

Ik heb een excel document met klant gegevens; Naam adres, plaats enz.
Alles in aparte cellen.

Nu wil ik bij elke klant een button (of een extra knop in de knoppenbalk / toolbar).
Wanneer ik die aanklik, moet er een 2e excel form starten, met daarin een factuur-opmaak.
Hier moeten dan automatisch de klant gegevens gekopieerd worden.
Incl. klantnummer enzo.

Alleen de opmaak / plaats van deze cellen is anders dan het eerste document.

Hoe ga ik dit voor elkaar krijgen?
Ik vermoed met een macro, maar daar heb ik nog helemaal geen verstand van.
Iemand die dit eenvoudig kan uitleggen?
(p.s. klein detail: mijn office pakket is engels :( :()

**********************

Kleine aanvulling: 1 adressen document heeft klantgegevens gerangschikt op naam, en 1 adres per regel.
In de toekomst wil ik met een klik op het klantnummer een bijhorend document openen, waar een soort history van die klant staat.
Vanuit beide documenten wil ik een factuur openen.
Dus vanaf de geselecteerde regel in 1e document, of vanuit 1 geopende history.
 
Laatst bewerkt:
Tis even puzzelen, maar hier kom ik een heel eind mee.
Als ik vast loop, hoor je me wel weer.

Thanx Uncle Bill !

Eehhmmm, sorry.
Thanx Jan van Asseldonk ! :p
 
Laatst bewerkt:
Met de link van Jan is precies gelukt wat ik wilde!
Toppie Thumb:.
Dank je wel.
 
Debiteurnummer

Aanvulling :

Voor het Debiteurnummer : Plak deze formule in N16
=VERT.ZOEKEN(Klantnummer;Klanten;2)
Druk op Alt F11
Open modules=> module 1

En verwijder in: Public Sub NieuweFactuurStarten()
De regel: Range("Debiteuerennummer") = ""

Als je nu een nieuw factuur maakt verschijnt het debiteuennr. wel automatisch

Als je dan toch bezig bent, verwijder in L16 gelijk een "r" van Debiteurrnr.

Pierre
 
Laatst bewerkt:
Beste Pierre,

Sorry, ik had de vraag op "Opgelost" moeten zetten. :o Inmiddels gebeurd.

Ik heb de functies van het voorbeeld document gebruikt in een factuur systeem naar eigen ontwerp.
Ik sla de gemaakte facturen elektronisch op.
Dit houdt in dat ik het tabblad facturen en klanten moet loskoppelen van elkaar. Dus 2 documenten ervan maken.
Anders komt een gewijzigd klantenbestand alleen opgeslagen in 1 factuur.

Het systeem wat in D13 is gebruikt heb ik gekopieerd en ergens bovenaan mijn factuur gezet.
Deze regel ook onzichtbaargemaakt voor printen.
Resultaat: een perfect werkend factuur / klanten systeem.
Ik ben nu aan het vechten met macro's, maar dat zie je wel in een nieuw topic 1 dezer dagen.

Allen bedankt voor de tips en het meedenken. :thumb:
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan