Schaltfläche zweisprachig

[Andre2907]

Guten Abend,

ich habe ein Makro aufgezeichnet und mit einer Schaltfläche verknüpft. Nun würde ich gerne die Schaltfläche "variabel" beschriften. Wenn der Anwender "deutsch" als Sprache wählt, soll die Schaltfläche mit "Umrechnung" beschriftet sein, wenn er "englisch" als Pracht wählt "Exchange".
In den normalen Zellen (C6) habe ich das Problem mit einer Wenn-Funktion gelöst =Wenn(A1=1;"Umrechnung";"Exchange")

Geht das auch irgendwie mit der Beschriftung von der Schaltfläche?


Viele Grüße,

Andre

[Crazy Tom]

Hallo

was für eine Schaltfläche?

Formular oder ActiveX

MfG Tom

[Andre2907]

Hallo Tom,

ich habe auf "Entwicklertools" und dann "Schaltfläche" geklickt. Ich kenne leider den Unterschied zwischen Formular und ActiveX nicht.

Sorry für meine Unwissenheit.

Viele Grüße

[Andre2907]

Ist ein Formularsteuerelement. Hab mich kurz eingelesen.

[Crazy Tom]

Hallo

wenn die Schaltfläche "Schaltfläche 1" heißt

Code:

Sub test()
   With ActiveSheet.Shapes("Button 1").TextFrame
       If Range("A1").Value = 1 Then
           .Characters.Text = "Umrechnung"
       Else
           .Characters.Text = "Exchange"
       End If
   End With
End Sub

MfG Tom

[Andre2907]

Vielen Dank Tom, hat super geklappt.