Jeg er ved at prøve at lave en makro som skal aktivere en celle hvis der står noget i cellen til venstre for cellen.
Det er et ark med mange rækker og som kan være forskelligt fra gang til gang. Men makroen skal gøre sådan at hvis fx celle A22 ikke er udfyldt og man prøver at taste i celle B22, så kommer der en advarselsboks op og fortæller at feltet ikke kan udfyldes før celle A22 er udfyldt. og hvis celle A22 så er udfyldt skal celle B22 bare være låst op til at man kan udfylde det.
Men makroen skal virke uden en knap men bare aktiveres ved at stå i feltet.
Håber der er nogen der kan hjælpe mig, og at jeg har forklaret mig tydeligt nok :-)
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$B$22" And Range("A22") = "" Then MsgBox "A22 skal udfyldes først" ActiveCell.Offset(0, -1).Select End If End Sub
Men hvad nu hvis det ikke altid er samme række men en tilfældig række? Det er altid kolonne A som skal være udfyldt og kolonne B som man ikke kan taste i før samme række i kolonne A er udfyldt.
Håber jeg forklarer mig så det er til at forstå ;-)
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column = 2 Then If Target.Offset(0, -1) = "" Then MsgBox "Celle i kolonne A skal udfyldes først" ActiveCell.Offset(0, -1).Select End If 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.