über CommandButton in UF den Editor aufrufen
27.04.2006 22:06:45
Reinhard
ich habe eine UF mit einem CommandButton und der hat folgenden Code:
Option Explicit
Private Sub CommandButton1_Click()
'Range("A1").Select
Application.SendKeys "%{F11}"
End Sub
und die Uf wird in einem Modul wie folgt aufgerufen:
Option Explicit
Sub tt()
Load UserForm1
UserForm1.Show 0
End Sub
Aber es tut sich nix, wie rufe ich über einen CommandButton in einer UF den Editor auf?
Danke ^ Gruß
Reinhard
Anzeige