macro keuzevak met invoerlijst

[MargotC]

Beste forumgebruikers

Omdat ik niet erg bedreven ben in het zelf schrijven van macro's, heb ik er twee gemaakt door middel van de opnamefunctie in Excel.
Nu zou ik echter graag hebben dat deze niet worden weergegeven door middel van keuzerondjes (zoals nu staat in het voorbeeld), maar met een keuzelijst met invoervak. Wanneer ik deze laatste optie invoeg, krijg ik de macro echter niet aan de gang. Ik heb her en der al enkele formules gezien om het probleem op te lossen, maar zelf raak ik er niet wijzer uit.

Iemand die me kan helpen?

Alvast bedankt!

Bekijk bijlage test macro.xlsx

 

[edmoor]

Dat document bevat geen macro's.

 

[MargotC]

Dat was inderdaad heel stom van me! Te snel geweest bij het saven van de file!
Hierin zouden normaal wel macro's te vinden moeten zijn

Bekijk bijlage test macro.xlsm

 

[edmoor]

Is dit wat je zoekt?
Bekijk bijlage test macro.xlsm

NB:
Module verwijderd.
Macro's achter het blad "macro".

 

[HSV]

Ook een mogelijkheid.

Private Sub Worksheet_Activate()
 ComboBox1.List = Array("Macro 1", "Macro 2")
End Sub


Private Sub ComboBox1_Change()
  Range("B2:F6") = Sheets("inhoud").Range("B2:D6").Offset(ComboBox1.ListIndex * 7).Value
End Sub

 

[MargotC]

Dag Edmoor

Dit is precies wat ik zoek! Hartelijk bedankt hiervoor
Ik heb zelf even gekeken naar de macro die erachter geschreven staat, en hoewel deze vrij eenvoudig lijkt, geraak ik er niet uit om ze te reproduceren in een andere file.

Als ik het opzet goed begrijp, zou onderstaand principe onder het dropdownmenu zitten maar hoe ga ik het best te werk om het ook daar te krijgen?

Private Sub ComboBox1_Change()
Select Case ComboBox1.Text
Case "Macro 1": Call Macro1
Case "Macro 2": Call Macro2
End Select
End Sub


Schrijf ik eerst de twee afzonderlijke macro's en dan het tekstbox of hoe?


In ieder geval, al enorm bedankt voor uw hulp

 

[edmoor]

Het is geen textbox maar een ActiveX combobox.

Voeg deze toe op het werkblad:

en plaats de code ervoor achter het werkblad zelf, net zoals in het document dat ik plaatste.

 

[MargotC]

Gelukt! Bedankt voor de hulp!