15. september 2011 - 13:18Der er
6 kommentarer og 1 løsning
kun en celle må være udfyldt i et område, resten skal være blanke
Hej
Jeg vil gerne have at der i et område kun kan være en celle udfyldt og resten skal være tomme, men hvis man udfylder en anden celle i området skal den første celle slettes... har lavet en kode her, men den virker ikke fordi den jo bliver trikket hver gang der ændres noget i området...
Nogle der har forslag?
Private Sub Worksheet_Change(ByVal Target As Range)
R = Target.Row C = Target.Column T = Target.Address
If C > 0 And C < 10 Then For i = 1 To 10 Debug.Print Cells(R, i).Address If Cells(R, i).Address = T Then GoTo Skip Else Cells(R, i) = "" End If Skip: Next End If 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.
Nope det skal være dynamisk i den forstand, at det skal gælde for hver række i eksempelvis række 1 til 30. antallet af rækker kan ændre sig, men hvis indtastningen sker i række D23 skal det kun være A23,B23,C23,E23 der skal "nulstilles"
Dim flag As Boolean Private Sub Worksheet_Change(ByVal Target As Range)
R = Target.Row C = Target.Column T = Target.Address
If C > 0 And C < 10 And flag = False Then flag = True For i = 1 To 10 Debug.Print Cells(R, i).Address If Cells(R, i).Address = T Then GoTo Skip Else If Cells(R, i) <> "" Then Cells(R, i).ClearContents GoTo Skip End If End If Skip: Next flag = False End If End Sub
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.
