Menu maken

[linkav]

Beste,

Ik wil een excel-bestand dat meerdere macro's bevat.

Graag had ik een tabblad toegevoegd dat als menu moet gaan fungeren. Ik dacht in een cel een omschrijving te zetten en dan aan deze omschrijving een hyperlink te leggen naar een macro. Maar dat kan blijkbaar niet.

Kan ik dit op een andere manier oplossen?

 

[Cobbe]

Zet dan een button voor elke macro op je menutabblad.

 

[linkav]

Kan ik dan vanuit vba de tekst op een knop wijzigen? Ik wil namelijk afhankelijk van de gebruiker een ander menu samenstellen, dus de eerste knop kan bij de ene persoon iets anders zijn dan bij een andere.

 

[edmoor]

Ja, dat kan.

 

[linkav]

Dank u edmoor, en hoe de ik dat dan aub?

 

[edmoor]

Plaats een voorbeeld documentje. Er zijn meerdere mogelijkheden en zonder voorbeeld wordt het speculeren.

 

[linkav]

Edmoor,

Hierbij een voorbeeld.
Het is de bedoeling om een variabel menu op te stellen (iedere gebruiker zijn menukeuzes).

Op tabblad 'DashboardData' zijn per gebruiker de menukeuzes vastgelegd.
Het is de bedoeling om bij het openen van het excel-bestand te kijken wie ingelogd is en afhankelijk van de gebruiker het dashboard samengesteld wordt.
Het moet dan ook mogelijk zijn om knoppen toe te voegen in vba code en knoppen te verwijderen of invisible te zetten.

Kan je hiermee iets?

 

[edmoor]

Geef eerst je knoppen een correcte naam, bijvoorbeeld Knop1 t/m Knop6.
Daarna kan je dit doen:

Sub MenuStart()
    Dim i As Integer
    For i = 1 To 6
        Call SetButtonText("Knop" & i, "voorbeeld" & i)
    Next i
End Sub

Sub SetButtonText(sButton As String, sText As String)
    Sheets("Dashboard").Buttons(sButton).Caption = sText
End Sub

Je kan dan zelf wel verzinnen hoe je dat met de gegevens uit DashboardData moet doen.

 

[linkav]

Super!!! Hiermee kan ik verder!

 

[linkav]

Heb nog 1 vraagje, hoe kan ik de knoppen een naam geven?

 

[edmoor]

Klik met rechts op een knop en pas de naam dan aan in het naamvak van Excel.
Dus daar waar je ook een bereik een naam kan geven.

 

[linkav]

OK!!! Simpel als je het weet!!

 

[linkav]

Hallo,

Nog even verder borduren op dit menu.
Ik heb een tabblad met user/knopnr/tekst op knop/macro. Bij het openen van het excel-bestand wordt gekeken welke gebruiker ingelogd is en afhankelijk van de gebruiker wordt de tekst op de knoppen gezet. Ik zou de naam van de macro in een variabele willen steken en als op een knop geklikt wordt zou de macro, waarvan de naam in een variabele staat, moeten opgestart worden. Iets in de trend van "call tmpBut1Macro". Iemand een oplossing?

 

[snb]

trend <>trant

 

[edmoor]

Wat op de knop staat maakt niet uit. De macro die aan de knop is gekoppeld zal worden gestart.

 

[mastermindzh]

@snb,

Inhoudsloze (off-topic) reacties zijn op helpmij.nl niet gewenst. Bij deze het verzoek deze reacties achterwegen te laten.
Meer informatie hierover kunt u terugvinden in de huisregels.

M.v.g, en een prettige dag verder
Mastermindzh

 

[linkav]

Inderdaad... maar in die macro wordt gekeken welke gebruiker het is en wordt op het tabblad met menukeuzes de macro-naam opgehaald die opgestart moet worden. Hoe kan ik die macro nu laten uitvoeren?

Ik wil bekomen dat er voor iedere gebruiker (of gebruikergroep) een menu komt. In een tabblad heb ik staan gebruiker/knopnr/op te starten macro.

 

[edmoor]

Bij mij werkt dit goed als de betreffende macro's in een Module staan:

Sub MacroAanKnop()
    Dim MenuMacro As String
    
    MenuMacro = "MenuVan" & Environ("USERNAME")
    Application.Run MenuMacro
End Sub

Sub MenuVanEd()
    MsgBox "Menu van Ed"
End Sub

 

[Cobbe]

Inhoudsloze (off-topic) reacties zijn op helpmij.nl niet gewenst. Bij deze het verzoek deze reacties achterwegen te laten.

Om te menen hiervoor @snb terecht te moeten wijzen vind ik er toch wel over.
Mvgr. prettige avond nog.

Cobbe

 

[linkav]

Edmoor,

Bedankt voor je reactie!!! Dit is wat ik zocht!