17. januar 2014 - 07:37Der er
5 kommentarer og 1 løsning
Hjælp til ændring i vbakode
Hej eksperter, denne kode laver et flueben, når man dobbeltklikker i en celle uanset hvor i arket. Jeg vil gerne kunne kunne bestemme, hvor i arket der kan dobbeltklikkes f.eks. kolonne A & kolonne K.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) With Target Cancel = True If .Value = Chr(252) Then .Value = "" Else .Value = Chr(252) .Font.Name = "Wingdings" .Font.Bold = True End If End With End Sub
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Column = 1 Or Target.Column = 11 Then ' A og K With Target Cancel = True If .Value = Chr(252) Then .Value = "" Else .Value = Chr(252) .Font.Name = "Wingdings" .Font.Bold = True End If End With End If End Sub
Jeg kan kun få den til at lave flueben i kolonne A.
Jeg glemte iøvrigt en anden vigtig detalje, Kolonne A & K er ikke låst, når arket så arkbeskyttes, kommer der en fejl "Run-time error '1004' Kan ikke angive egenskaben Name for klassen Font."
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.