Hulp bij VBA code

Question

Goedemiddag iedereen,

Ik heb nog eens jullie hulp nodig.

Ik zoek een VBA code die automatisch gegevens invult in een bereik als er in een ander bereik iets geschreven staat.

Bedoeling is om mijn facturatie verder te automatiseren.

Als ik bv in range E12 een naam selecteer a.d.h.v. een drop down lijst.

Als dan bv de naam Andreas geselecteerd is in E12 zou er automatisch een tekst moeten verschijnen in range B26 Verhuur bestelwagen

Indien deze naam niet geselecteerd is, moet cel B26 leeg blijven zodat we daar zelf tekst kunnen ingeven.

Alvast bedankt!

Answer 1

1. Rechtsklik in Excel links-onderaan op de naam van het blad waarin de bewuste cellen staan en kies in het verschijnende menu: "Programmacode weergeven".
2. Plaats aan de rechterkant onderstaande code en klik daarna rechtboven in de blauwe balk op het kruisje, je bent dan terug in het werkblad.
3. Sla het bestand op als .xlsm-bestand, maar dat doe je waarschijnlijk al.
4. Test de macro door in E12 verschillende namen te kiezen.

Opm: Als je al een macro hebt die ook betrekking heeft op de gegevens waarbij het in deze macro om gaat, dan kun je die misschien best samenvoegen. Dat hangt af van wat de bestaande macro precies doet en of die automatisch of handmatig wordt uitgevoerd.

Private Sub Worksheet_Change(ByVal Target As Range) 

If Not Intersect(Range("E12"), Target) Is Nothing Then 

Range("B26:F26").ClearContents 

If Range("E12").Value = "Andreas" Then 

Range("B26").Value = "Verhuur bestelwagen" 

End If 

End If 

End Sub

Answer 2

Ja, maar dan verwijder je toch deze code als je zelf iets anders typt in de cel B26?

Answer 3

1. Ja. Alles klantgegevens worden ingevoerd in een apart tabblad en dan selecteer je gewoon de klant die je moet hebben.
2. Dan moet de cel leeg blijven zodat ik daar zelf dingen kan typen.
3. Nee. E13, E14 en E15 zijn zodanig ingesteld dat als je de naam van het bedrijf kiest in de drop-down lijst selecteert, de andere gegevens worden ingevuld zoals straatnaam + nr, postcode + gemeente en het btw-nr van het desbetreffende geselecteerde bedrijf.

Nu is de vba zo geschreven dat telkens bij de aanmaak van een nieuwe factuur alles gewist word(behalve de factuurnr). Maar we hebben terugkerende klanten die telkens dezelfde omschrijving hebben op hun factuur.

Dus ik zoek een vba code die dan in cel B26:F26 (samengevoegde cellen) die bepaalde omschrijving invult als de klant geselecteerd is in cel E12:H12(ook samengevoegde cellen)

Answer 4

Kan je eventueel niet gewon werken met x.vergelijken of vert.zoeken

Answer 5

1. Kunnen in E12 verschillende namen worden gekozen?
2. Zo ja, wat moet er dan in B26 (of ander cel(len)) verschijnen als er een andere naam als Andreas wordt gekozen?
3. Staat diezelfde dropdown ook in E13, E14, enz. ?