svekkes
Gebruiker
- Lid geworden
- 4 nov 2007
- Berichten
- 108
Aan allen,
Dankzij een vorige post heb ik al een oplossing voor een vorig probleem gevonden.
Maar ik heb nu een nieuw probleem waarvoor ik naar een oplossing op zoek ben. Eigenlijk is het een 2-delig probleem
Ik heb een 1e formulier waarop klantgegevens worden ingevuld. Wanneer ik dan op de cmdButton druk worden deze gegevens dan weggeschreven in een 1e werkblad. Hier is nog geen probleem.
Ook wordt er dan een 2e formulier geopend. In dit formulier worden dan de productgegevens ingevuld. In de eerste 2 txtBoxes op dit formulier worden dmv een code de datum en de naam van de klant ook weergegeven van het 1e formulier (gevonden dankzij dit forum). Hier zit het eerste probleem. Hoe kan ik ervoor zorgen dat deze gegevens ook altijd mee veranderen? De code die ik nu heb geeft steeds de verkeerde naam weer.
Private Sub UserForm_Initialize()
txtDatum.Value = Sheets("Prospecten").Range("A3")
txtNaam.Value = Sheets("Prospecten").Range("B3")
End Sub
Ik vermoed dat ik ergens een Offset stuk zal moeten maken.
Het 2e probleem is het volgende:
Wanneer ik de gegevens van het 2e formulier wegschrijf gebeurt dit als volgt (Dit gebeurt op een volgend werkblad):
KolA: Datum
KolB: Naam
KolC: Productnaam
KolD: Hoeveelheid
KolE: Prijs
De datum en de naam worden 1x weggeschreven in de juiste kolom. Als ik meerdere producten heb, worden deze ook telkens in de juiste kolom weggeschreven en telkens een rij lager.
Hoe kan ik er nu voor zorgen dat wanneer ik een nieuwe klant en producten ingeef deze terug vanaf KolA worden weggeschreven onder het laatste product van de vorige klant? KolA en KolB zijn dan telkens leeg.
Hopelijk kan iemand mij hier mij op weg zetten. En is het bijhorende bestandje een beetje duidelijk.
Alvast bedankt voor de hulp.


Dankzij een vorige post heb ik al een oplossing voor een vorig probleem gevonden.
Maar ik heb nu een nieuw probleem waarvoor ik naar een oplossing op zoek ben. Eigenlijk is het een 2-delig probleem
Ik heb een 1e formulier waarop klantgegevens worden ingevuld. Wanneer ik dan op de cmdButton druk worden deze gegevens dan weggeschreven in een 1e werkblad. Hier is nog geen probleem.
Ook wordt er dan een 2e formulier geopend. In dit formulier worden dan de productgegevens ingevuld. In de eerste 2 txtBoxes op dit formulier worden dmv een code de datum en de naam van de klant ook weergegeven van het 1e formulier (gevonden dankzij dit forum). Hier zit het eerste probleem. Hoe kan ik ervoor zorgen dat deze gegevens ook altijd mee veranderen? De code die ik nu heb geeft steeds de verkeerde naam weer.
Private Sub UserForm_Initialize()
txtDatum.Value = Sheets("Prospecten").Range("A3")
txtNaam.Value = Sheets("Prospecten").Range("B3")
End Sub
Ik vermoed dat ik ergens een Offset stuk zal moeten maken.
Het 2e probleem is het volgende:
Wanneer ik de gegevens van het 2e formulier wegschrijf gebeurt dit als volgt (Dit gebeurt op een volgend werkblad):
KolA: Datum
KolB: Naam
KolC: Productnaam
KolD: Hoeveelheid
KolE: Prijs
De datum en de naam worden 1x weggeschreven in de juiste kolom. Als ik meerdere producten heb, worden deze ook telkens in de juiste kolom weggeschreven en telkens een rij lager.
Hoe kan ik er nu voor zorgen dat wanneer ik een nieuwe klant en producten ingeef deze terug vanaf KolA worden weggeschreven onder het laatste product van de vorige klant? KolA en KolB zijn dan telkens leeg.
Hopelijk kan iemand mij hier mij op weg zetten. En is het bijhorende bestandje een beetje duidelijk.
Alvast bedankt voor de hulp.


Bijlagen
Laatst bewerkt: