Makro Blatt einblenden, etwas eintragen und schließen. -> Geht nicht

[magnexx]

Hallo zusammen,

ich möchte ein Makro aufzeichnen, der bei mir das ausgeblendete Blatt "Stammdaten" öffnet und unter "C24" das Wort "english" eintippt. Danach soll "Stammdaten" wieder Ausgeblendet werden.

Ich befinde mich also auf mein sichtbares "Dasboard" Blatt und klicke auf "Makro aufzeichnen"
1. Rechte Maustaste, Einblenden..., Stammdaten
2. Ich gehe auf C24 und tippe einmal drauf
3. Ich schriebe das Wort english und bestätige mit Enter
4. Rechte Maustaste und wieder Ausblenden
5. Zurück auf das Blatt "Dashboard" und die Aufzeichnung beenden.

Sobald ich das Makro ausführe, wird aber english auf das Blatt Dasboard ausgeführt. In der Zelle C25 erscheint dann das Wort english.

Es das Wort english soll aber im ausgeblendeten "Stammdaten" Blatt eingetragen werden und dann auch in C24 und nicht C25.

So sieht die Aufzeichnung aus. Wo und wie soll ich was verändern???

Vielen Dank schonmal im vorraus

Code:

Sub sprache_ändern()
'
' sprache_ändern Makro
'

'
    Sheets("Dashboard").Select
    Sheets("Stammdaten").Visible = True
    ActiveCell.FormulaR1C1 = "english"
    Range("C25").Select
    Sheets("Stammdaten").Select
    ActiveWindow.SelectedSheets.Visible = False
    Sheets("Dashboard").Select
End Sub

[Kuwer]

Hallo,

die Reihenfolge der aufgezeichneten Befehle passt (warum auch immer) nicht.
So würde es gehen:

Sub sprache_ändern()
'
' sprache_ändern Makro
'

'
    Sheets("Stammdaten").Visible = True
    Sheets("Stammdaten").Select
    Range("C25").Select
    ActiveCell.FormulaR1C1 = "english"
    ActiveWindow.SelectedSheets.Visible = False
    Sheets("Dashboard").Select
End Sub

Besser ist hier jedoch eine einzige klare Anweisung:

Sub Sprache_aendern()
    Sheets("Stammdaten").Range("C25").Value = "english"
End Sub

Siehe dazu auch hier: Achtung Makrorekorder oder Wer selektiert denn da?

Gruß Uwe