PDA

Vollständige Version anzeigen : Makro starten


Tankala
07.07.2014, 13:58
Hallo Zusammen,

ich habe den Code

Sub TabName()
ActiveSheet.Name = Range("B10")
End Sub

was auch funktioniert, aber nur wenn ich auf Makro gehe und dann auf ausführen. Habe auch schon mit auto_open probiert klappt nicht.
Ich hätte gern, dass wenn man dort was eingibt/ändert automatisch startet.

Ich hoffe ihr könnt mit weiterhelfen.

Vielen vielen Dank schon mal.

Mit freundlichen Grüßen

Tankala

Hajo_Zi
07.07.2014, 14:01
starte den VBA Editor (Alt+F11), Bild sollte zweigeteilt sein ansonsten Strg+R, Doppelklick auf Deine Datei, Doppelklick auf Deine Tabelle, Code ins rechte Fenster kopieren, VBA Editor schließen.
Das Makro wird automatisch gestartet.
Der Code wirkt nur in dieser Tabelle.


Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
TabName
End Sub

warum bei jeder Eingabe muss uns nicht klar sein.

<img src="http://Hajo-Excel.de/images/grusz1.gif" align="middle" height="40" alt="Grußformel"><a href="http://Hajo-Excel.de/index.htm"><img border="0" src="http://Hajo-Excel.de/images/logo_hajo3.gif" align="middle" height="40" alt="Homepage"></a>

Tankala
07.07.2014, 14:41
Hallo,

Funktioniert bei mir leider nicht, ich habe es so geschrieben.

Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Name = Range("B10")
End Sub

Gruß
Tankala

Hajo_Zi
07.07.2014, 14:42
da Du Dich nicht an meine Anleitung gehalten hast geht es nicht.
Bei mir geht es. Deine Datei sehe ich nicht.

<a href="http://Hajo-Excel.de/index.htm" target="_blank" title="Hajo's Excelseiten">Gruß Hajo</a>

BetziBe
08.07.2014, 09:54
Hallo Tankala

so?

Option Explicit

Private Sub Worksheet_Activate()
ActiveSheet.Name = Range("B10").Text
End Sub

Gruß
Betzi