Odgovor na pitanja tipa kako da mi se kada pritisnem F2 otvori izvestaj?

Odgovor na pitanja tipa "kako da mi se kada pritisnem F2 otvori izvestaj?" 30.04.2005. u 18:13 · pre 261 meseci #1

Imao sam danas nekih silnih problema sa pozivanjem odredjenih komandi. Zidareva varijanta sa dugmicima mi nije bas stimala, pa sam bio prinudjen da nadjem alternativno resenje.
Pogadjate, rec je o asocijaciji pojedinih tastera ili kombinacije tastera sa izvrsavanjem odredjenih funkcija.

Znaci, pitanje glasi: Kako da se pritiskom na taster F1 otvori forma za unos podataka, a na kombinaciju SHIFT+D stampa dnevni izvestaj?

Prvi korak je pravljenje makroa pod nazivom AutoKeys.

U radnom Toolbaru ukljuciti opciju Macro Name.

U kolonu Macro Name upisati kombinaciju tastera ili sam taster koji treba da inicira dogadjaj. U nasem slucaju je to taster F1:

Macro Name Action Coment
{F1} OpenForm

+d RunMacro

Naravno, popunicete sve trazene parametre za OpenForm i RunMacro.

Viticaste zagrade {} se koriste za obelezavanje SISTEMSKIH tastera (svi funkcijski F1 - F12, Insert, Delete, Home ...)
Znak "+" - plus, se koristi za kombinaciju SHIFT+NEKI_TASTER.
Znak "^" se koristi za kombinaciju CTRL+NEKI_TASTER.

Kada zavrsite sa pakovanjem AutoKeys makroa, snimiti ga i restartovati aplikaciju.

Potpis

I tako ...

Re: Odgovor na pitanja tipa "kako da mi se kada pritisnem F2 otvori izvestaj?" 02.05.2005. u 13:51 · pre 261 meseci #2

Gomatami, odlican pos

Jel' te ne mrzi da ceo tekst prebacis u 'Tehnike programiranja' ili 'Bazu Znanja'. Kopiras ceo tekst u clipboard i tamo napravis 'odgovor' i t je sve.

Re: Odgovor na pitanja tipa "kako da mi se kada pritisnem F2 otvori izvestaj?" 02.05.2005. u 17:36 · pre 261 meseci #3

OK, samo da malo estetski doradimo. Ipak je post nastao u "nadahnucu"! :))

Potpis

I tako ...

Re: Odgovor na pitanja tipa "kako da mi se kada pritisnem F2 otvori izvestaj?" 09.05.2005. u 01:04 · pre 261 meseci #4

Ja sam ovaj problem resio ovako:

Code:
Private Sub Form_Load()
Me.KeyPreview = True
End Sub

onda,

Code:
Private Sub Form_KeyDown(keycode As Integer, shift As Integer)
    Select Case keycode
        Case vbKeyF1
              neki kod
        Case vbKeyF2
              neki kod
        Case Else
    End Select
End Sub

Postavio sam korisniku F1-F5 komande koje najcesce koristi, sto dosta ubrzava rad...

Potpis

http://www.mihailovic.info

Srodne teme