03. april 2003 - 13:01Der er
14 kommentarer og 1 løsning
vba kode der reagerer på tastetryk
Hej
Jeg sidder med et regneark, der benyttes til indtastning af holdopstillinger.
nedad er der de enkelte spillere i truppen henad er der de enkelte kampe
yderst til højre er der så en kolonne der viser total antal kampe for en spiller, der fåes ved at summere på tværs (der sættes et ettal hvis en spiller har været med)
Det jeg gerne vil kunne gøre er at jeg når jeg trykker på mellemrum udfylder det felt jeg står over med et ettal og flytter til cellen nedenunder.
er der nogen der kan lave en lille stump kode der kan det?
Denne kode gør næsten det du beder om, bortset fra at den bruger pil ned i stedet for mellemrum.
I arkets kodemodul indsætter du følgende:
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Application.OnKey "{down}", "Inds1" End Sub
I et almindeligt modul indsætter du så
Sub Inds1() If ActiveCell.Column = 2 Then ActiveCell.Value = 1 ActiveCell.Offset(1, 0).Activate Else ActiveCell.Offset(1, 0).Activate End If Debug.Print a End Sub
2. tallet i skal erstattes med nummeret på den kolonne, hvor pil-tasten skal have den pågældende funktion.
Du kan godt få andre taster, men så vidt jeg ved ikke taster, der producerer tegn (altså tal, bogstaver, mellemrum mm.). Men du kan fx bruge BACKSPACE, DELETE, END, ESC m.fl.
sikre at den tast du vælger kun får den pågældende funktion i B-kolonnen, ikke i andre kolonner. Skal det i stedet være c-kolonnen skal der stå = 3 og så fremdeles.
Tjah, så må man sætte alt tilbage til normalt, så det er nok ikke det mest hensigtsmæssige :-)
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
