Jeg har to problemer med mit regneark, jeg får data til mit regneark fra en forespøregsel til en SQL server, de data jeg få bliver præsenteret som de skal, nogle bliver slettet andre tilføjet når jeg trykker på knappen OPDATER.

Første problem.

Når jeg så trykker på knappen OPDATER bliver de data som jeg har tilføjet forskubet i forhold til de linjer der bliver slettet og tilføjet, nogle som har et forslag til hvordan jeg låser mine ændringer til arkrækken.

Andet problem

Jeg har en VBA kode der gør at mine dubletter bliver grønne, denne kode virker som den skal.

 Sub FarvCeller()

Dim rCell As Range

Dim lLastRow As Long

  Application.ScreenUpdating = False

  lLastRow = Range("A65536").End(xlUp).Row

  Range("A1:H" & lLastRow).AdvancedFilter Action:=xlFilterInPlace, Unique:=True

  For Each rCell In Range("A1:K" & lLastRow)

      If rCell.EntireRow.Hidden = True Then rCell.Interior.Color = vbGreen

  Next

  ActiveSheet.ShowAllData

  Application.ScreenUpdating = True

End Sub

Nu vil jeg så gerne have at de Celler der bliver grønne, i stedet for bliver blanke, altså kun en blank celle