Avatar billede boro23 Forsker
27. maj 2013 - 14:22 Der er 2 kommentarer og
1 løsning

Mere VBA hjælp

Hej igen eksperter, har igen brug for hjælp.

Mangler en VBA kode der gør følgende: Når indholdet ændre sig i celle B7, skal arkbeskyttelse fjernes, vis alle skjulte rækker fra række 16:125, beskyt ark, gem.
Avatar billede store-morten Ekspert
27. maj 2013 - 16:03 #1
Måske:

Private Sub Worksheet_Change(ByVal Target As Range)
   
      If Not Intersect(Range("B7"), Target) Is Nothing Then

ActiveSheet.Unprotect
Rows("16:125").EntireRow.Hidden = False
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End If
ActiveWorkbook.Save
End Sub


"Når indholdet ændre sig i celle B7"

Skal være en ændring ved indtastning?
Avatar billede boro23 Forsker
28. maj 2013 - 06:23 #2
Hej store-morten, som sædvanlig levere du varen. 1000 tak for hjælpen, smid et svar
Avatar billede store-morten Ekspert
28. maj 2013 - 14:20 #3
Velbekomme. :-)
Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester