Dansk Regneark Forum
  Hjælp Hjælp  Søg i forum   Arrangementer   Opret ny bruger Opret ny bruger  Log ind Log ind


Emne lukketAktiver/Deaktiver F-taster

 Besvar Besvar
Forfatter
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5419
Direkte link til dette indlæg Emne: Aktiver/Deaktiver F-taster
    Sendt: 06.Jan.2019 kl. 18:10
Velbekomme Smile
Husk, at trykke på [Tak], hvis du kan lide et indlæg.
Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag.
Til top



Til top
Ib Hansen Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 15.Apr.2014
Land: Danmark
Status: Offline
Point: 652
Direkte link til dette indlæg Sendt: 06.Jan.2019 kl. 17:53
Så virker det Thumbs Up
Tak for hjælpen Beer
Excel 2010 Dk og 2019 Dk på samme computer.
Bruger dog stadig mest 2010..
Men sådan er der jo så majet :o)
Til top
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5419
Accepteret svar Accepteret svar
Direkte link til dette indlæg Sendt: 06.Jan.2019 kl. 17:14
Nu skal du jo ikke benytte "^", hvis det er [ALT] tasten, men procent tegnet (%).

"^" er jo [CTRL] tasten.

Og, hvis jeg henter dit regneark, og udskifter "^{F11}" med "%{F11}", så virker din kode upåklageligt hos mig  Thumbs Up
Husk, at trykke på [Tak], hvis du kan lide et indlæg.
Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag.
Til top
Ib Hansen Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 15.Apr.2014
Land: Danmark
Status: Offline
Point: 652
Direkte link til dette indlæg Sendt: 06.Jan.2019 kl. 16:46
Nu har jeg også prøvet at lave et Modul med koderne og så lave et Call til Sub'ene.
Det virker heller ikke og heller ikke hvis arket gemmes og lukkes og åbnes igen.

Virker det ved dig ?
Download
Excel 2010 Dk og 2019 Dk på samme computer.
Bruger dog stadig mest 2010..
Men sådan er der jo så majet :o)
Til top
Ib Hansen Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 15.Apr.2014
Land: Danmark
Status: Offline
Point: 652
Direkte link til dette indlæg Sendt: 06.Jan.2019 kl. 16:32
Hmmmm Unhappy

Virker ikke.

- Jeg lukker VBA.
- Klikker på button med kode Application.OnKey "^{F11}", ""
- Holder Alt nede og trykker F11.
- VBA åbner alligevel.

Men hvis jeg først deaktivere Alt og derefter F11, hver for sig i samme kode, må det da give det samme.
Det virker heller ikke..

Aktivering det samme - Jeg har prøvet begge ovenstående.

Excel 2010 Dk og 2019 Dk på samme computer.
Bruger dog stadig mest 2010..
Men sådan er der jo så majet :o)
Til top
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5419
Direkte link til dette indlæg Sendt: 06.Jan.2019 kl. 16:15
De kloge hoveder har ret...

Er det fordi du vil deaktivere [CTRL] + [F11]?

Så skal du bruge
Application.OnKey "^{F11}"
Og, på samme måde med [ALT]+[F11].
Husk, at trykke på [Tak], hvis du kan lide et indlæg.
Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag.
Til top
Ib Hansen Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 15.Apr.2014
Land: Danmark
Status: Offline
Point: 652
Direkte link til dette indlæg Sendt: 06.Jan.2019 kl. 15:49
Hej Forum.

Jeg har 2 buttons, der kan aktivere og deaktivere forskellige F-taster.

Application.OnKey "{F11}"         - Skulle ifølge nogle kloge hoveder aktivere F11.
Application.OnKey "{F11}", ""    - Skulle ifølge de samme hoveder deaktivere F11.

Nedenunder har jeg indsat koderne på de 2 buttons.
Men det virker ikke og heller ikke med f.eks. F11 alene.

Er der en, der har en god forklaring.
Private Sub CommandButton1_Click()
'---------'
' Aktiver '
'---------'
    Application.OnKey "{^}" '..........Ctrl key
    Application.OnKey "{%}" '..........Alt key
    Application.OnKey "{F1}"
    Application.OnKey "{F2}"
    Application.OnKey "{F3}"
    Application.OnKey "{F4}"
    Application.OnKey "{F5}"
    Application.OnKey "{F6}"
    Application.OnKey "{F7}"
    Application.OnKey "{F8}"
    Application.OnKey "{F9}"
    Application.OnKey "{F10}"
    Application.OnKey "{F11}"
End Sub

Private Sub CommandButton2_Click()
'-----------'
' Deaktiver '
'-----------'
    Application.OnKey "{^}", "" '..........Ctrl key
    Application.OnKey "{%}", "" '..........Alt key
    Application.OnKey "{F1}", ""
    Application.OnKey "{F2}", ""
    Application.OnKey "{F3}", ""
    Application.OnKey "{F4}", ""
    Application.OnKey "{F5}", ""
    Application.OnKey "{F6}", ""
    Application.OnKey "{F7}", ""
    Application.OnKey "{F8}", ""
    Application.OnKey "{F9}", ""
    Application.OnKey "{F10}", ""
    Application.OnKey "{F11}", ""
End Sub
På forhånd tak

Mvh.
Ib
Excel 2010 Dk og 2019 Dk på samme computer.
Bruger dog stadig mest 2010..
Men sådan er der jo så majet :o)
Til top
 Besvar Besvar

Skift forum Forum tilladelser Se dropdown

© 2010 - 2024 Dansk Regneark Forum - en del af Excel-regneark.dk