Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Funktionstasten eliminieren

Forumthread: Funktionstasten eliminieren

Funktionstasten eliminieren
23.09.2004 08:54:45
Erich
Hallo EXCEL-Freunde,
folgender Code funktioniert:
With Application
.OnKey "+{F1}", ""
.OnKey "+{F2}", ""
usw. bis
.OnKey "+{F12}", ""
End With
Geht das auch kürzer mit For 1 to 12 oder so ähnlich?
Besten Dank für eine Hilfe!
mfg
Erich
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Funktionstasten eliminieren
EtoPHG
Hallo Erich,
Vielleich so:

Sub x()
Dim ix As Integer
With Application
For ix = 1 To 12
.OnKey ("+{F" & Trim(Str(ix)) & "}"), ""
Next ix
End With
End Sub

Gruss Hansueli
Danke - Hansueli; perfekt! o.T.
Erich
.
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige