habe eine datei hochgladen und da problem beschrieben
einfaches beispiel ...hmmm
es soll fue einen zellbereich ein label in ner userform benannt werden
hier die datei:
https://www.herber.de/bbs/user/16739.xls
vielen dank roland
Private Sub CommandButton1_Click()
' Abschalten der Bildschirmaktualisierung, macht das Makro schneller
Application.ScreenUpdating = False
' Den Namen deiner Autoformen bekommst du im Excel Blatt oben links
' im Namenfeld angezeigt wenn du die Formen markierst.
ActiveSheet.Shapes("AutoForm 2").Select
Selection.Characters.Text = "11111111111"
ActiveSheet.Shapes("AutoForm 4").Select
Selection.Characters.Text = "Anderer Text"
ActiveSheet.Shapes("AutoForm 5").Select
Selection.Characters.Text = "Hallo ich bin der neue"
' Ich weis Select ist nicht die feine englische Art aber für den Anfang
' sollte es damit auch gehen.
Range("A1").Select
' Einschalten der Bildschirmaktualisierung
Application.ScreenUpdating = True
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen