Excel - problem med data i skjult fane
Hej eksperterJeg har et problem med et "medlemskartotek", som jeg har lavet. I en af rutinerne gemmer en formular et medlem - og kontrollerer først om medlemmet findes i forvejen. Hvis ja, skal det pågældende medlem overskrives - og det gør jeg med følgende VBA-kode:
Sub Overskriv()
' Dette modul overskriver en eksisterende registrering
Sheets("data").Activate
Range("gemte_opl").Select
Cells.Find(What:=Range("a12").Value, After:=ActiveCell.Offset(-1, 0), LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, SearchFormat:=False).Select
ActiveCell.EntireRow.Select
Selection.ClearContents
Gem
End Sub
Gem rutinen gemmer så herefter medlemmet i en ny linie. Værdien i A12 er medlemsnummeret, som findes i området "gemte_opl".
Fanen i Excel, som data findes i, er skjult. Derfor bruger jeg Sheets("data").activate i stedet for ".select". Mit problem er, at ovenstående kode ikke altid (Dvs. nogen gange gør den??) sletter medlemmet før den gemmer igen. Herefter har jeg samme medlem gemt 2 gange, men med lidt forskellige oplysninger.
Er der nogen, der har en idé om, hvad der kan være galt?
