29. august 2004 - 16:16Der er
12 kommentarer og 1 løsning
Oprette event ved indtastning.
Hvordan kan man på en enkel måde lave en event i Excel's VBA der aktiveres hvergang en celle ændres ( i en bestemt workbook ) via tastaturet ? ( á la SheetSelectionChange eventen )
Jeg har brug for en event der trigges uanset hvilket sheet der indtastes i... Dette er sandsynligvis ganske enkelt... jeg ved bare ikke hvordan... man må kunne fange "keystrokes" eller ???
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Not Intersect(Target, Range("A5")) Is Nothing Then ' tjekker alle ark celle A5 MsgBox "Hej du ændrede i celle A5" End If End Sub
Jeg anvender allerede Workbook_sheetchange, men så vidt jeg har fundet ud af aktiveres denne også hvis data i ark ændres, f.eks via en dde forbindelse til et andet program....
jeg ønsker at event trigges når brugeren har lavet en indtastning ( i en ikke skrivebeskyttet celle... ) via keyboard.. kan det lade sig gøre ?
Hvis du nu bruger kabbak's forslag (16:39:31) vil programmet undersøge, om der er ændret i det område du angiver - alt andet er den ligeglad med. Eventet trigges, men det er vel ligegyldigt, når det ikke medfører nogen handling.
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Not Intersect(Target, Range("A5")) Is Nothing Then ' tjekker alle ark celle A5 ' Sh.Name = navnet på arket ' Target.Address = adressen på cellen MsgBox "Hej du ændrede i " & Sh.Name & " celle(" & Target.Address & ")" End If End Sub
Maker mit navn i bokswn til venstre og tryk accapter
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.
Ny bruger
Nybegynder
Opret
Preview
