Navn på knap

Jeg antager at det er Excel?

I din sub kan du finde knapnavnet således:

    Dim KnapNavn As String
    KnapNavn = Application.Caller

Hej.

Ja - det er Excel.
Jeg har ikke mulighed for at tjekke det lige nu - først i morgen - men du lyder overbevisende - og det lyder også meget intuitivt, så smid du bare et svar....

:-)

Jonas

OK, her er et svar. Men tjek nu lige først om du kan bruge det!

Hej - det virkede bare helt perfekt... Jeg har prøvet om jeg kan få tekst fra knappen også. Det kan jeg godt, hvis jeg først bruger .Select:

ActiveSheet.Shapes(Application.Caller).Select
MsgBox (Selection.Characters.Text)

Hvorfor kan jeg ikke sige
ActiveSheet.Shapes(Application.Caller).Characters.Text - hvad gør jeg forkert her?

Jeg hader, når jeg kun kan finde løsninger ved at "selecte" først...

Jeg hader også select/activate, og jeg har ikke fundet nogen systematik i HVOR og HVORNÅR det er nødvendigt.

I mange tilfælde har det noget at gøre med absolutte/relative referencer, hvor f.eks. en Range kan variere, men det er jo ikke tilfældet her......... så jeg bliver dig svar skyldig.

VBA er ikke det perfekte programmeringssprog, og udviklerne er mange steder hoppet over hvor gærdet er lavest.
Og nu hvor man har stoppet udvikling af "regulær" VB (6.0) til fordel for .NET bliver det nok aldrig bedre........