Print side | Luk vindue

Fjerne en række ved aktivering af afkrydsningsfelt

Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Makro og VBA
Forum beskrivelse: Hjælp til Makroer og VBA-programmering
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=4034
Udskrevet den: 02.Maj.2024 kl. 13:58


Emne: Fjerne en række ved aktivering af afkrydsningsfelt
Besked fra: Bar9
Emne: Fjerne en række ved aktivering af afkrydsningsfelt
Posteringsdato: 16.Okt.2019 kl. 11:43
Når afkrydsningsfeltet har værdien True

Så skal række 5 være skjult

Når afkrydsningsfeltet har værdien False

Så skal række 5 være skjult. 

Og omvendt, så jeg kan swappe med mellem de to. 


Jeg har prøvet med Sub CheckBox1_Change() og Sub CheckBox1_Click()

  

Sub CheckBox1_Change()
     
     If CheckBox1.Value = True Then Range("F4").Value = "Min tekst"
      Worksheets("Efterregulering").Rows(5).Hidden = True
      
    If CheckBox1.Value = False Then Range("F4").Value = " "
      Worksheets("Efterregulering").Rows(5).Hidden = False

End Sub


Svar:
Besked fra: EXCELGAARD
Posteringsdato: 17.Okt.2019 kl. 16:27
Prøv med: 
Sheets("Efterregulering").Rows(5).EntireRow.Hidden = True
Bemærk, udskiftning af 'Worksheets' med 'Sheets', og indsættelse af '.EntireRow'


-------------
Husk, at trykke på [Tak], hvis du kan lide et indlæg.
Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag.

Besked fra: Bar9
Posteringsdato: 17.Okt.2019 kl. 17:21
Jeg kan ikke få det til at virke desværre. Men ellers tak for hjælpen. 

Jeg har lavet en anden løsning, som består i "ToggleButton" lignende funktion, hvor man anvender betinget formatering i 2 celler, og derefter ligger nogle rektangler indover, og tildeler dem en hver deres makro. Det har jeg fået til at fungere. En lidt længere omgang, men det virker. 


Print side | Luk vindue