Hur döljer eller visar jag angivna rader eller kolumner när du dubbelklickar på en cell i Excel?

Normalt kan rader och kolumner döljas eller visas genom att högerklicka och välja alternativet Dölj eller Ta bort från snabbmenyn. I den här artikeln pratar vi om att snabbt dölja eller visa angivna rader eller kolumner genom att dubbelklicka på en cell i Excel.

Dölj eller ta bort angivna rader eller kolumner när du dubbelklickar på en cell med VBA-kod

Dölj eller ta bort angivna rader eller kolumner när du dubbelklickar på en cell med VBA-kod

Fantastisk! Använda effektiva flikar i Excel som Chrome, Edge, Firefox och Safari!
Spara 50% av din tid och minska tusentals musklick åt dig varje dag!

Följande VBA-koder kan hjälpa dig att snabbt dölja eller ta bort angivna rader eller kolumner i ett kalkylblad genom att dubbelklicka på en viss cell. Gör så här.

1. Öppna kalkylbladet du vill dölja rader eller kolumner inuti. Högerklicka på arkfliken och klicka sedan på Visa kod från snabbmenyn.

2. I öppningen Microsoft Visual Basic för applikationer kopiera följande VBA-kod till kodfönstret.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby20171226
    Dim xRgHidden As Range
    If (Not Intersect(Target, Range("A1:A4")) Is Nothing) And (Target.Count = 1) Then
        Set xRgHidden = Range("10:13")
        xRgHidden.EntireRow.Hidden = Not xRgHidden.EntireRow.Hidden
    End If
End Sub

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby20171226
    Dim xRgHidden As Range
    If (Not Intersect(Target, Range("A1:A4")) Is Nothing) And (Target.Count = 1) Then
        Set xRgHidden = Range("D:E")
        xRgHidden.EntireColumn.Hidden = Not xRgHidden.EntireColumn.Hidden
    End If
End Sub

Anmärkningar: I koden, A1: A4, 10:13 och D: E indikera att när du dubbelklickar på en cell i intervallet A1:A4, kommer raden 10:13 eller kolumn D:E att döljas automatiskt.

3. tryck på andra + F11 för att stänga Microsoft Visual Basic för applikationer fönster.

Från och med nu, när du dubbelklickar på en cell i intervallet A1:A4, kommer rad 10:13 eller kolumn D:E att döljas automatiskt. Och dubbelklicka på cellen igen för att visa alla dolda rader eller kolumner omedelbart.

Relaterade artiklar:

• Hur klickar eller dubbelklickar du på en cell för att öppna ett angivet användarformulär i Excel?
• Hur lägger jag till bock i en cell med dubbelklicka i Excel?
• Hur lägger jag till / anger automatiskt aktuellt datum / tid i en cell genom att dubbelklicka i Excel?
• Hur dubbelklickar jag på en cell och lägger till 1 till det cellvärdet i Excel?
• Hur dyker upp en kalender när du klickar på en specifik cell i Excel?

Bästa kontorsproduktivitetsverktyg

🤖	Kutools AI Aide: Revolutionera dataanalys baserat på: Intelligent utförande   |  Generera kod  |  Skapa anpassade formler  |  Analysera data och generera diagram  |  Anropa Kutools funktioner.
	Populära funktioner: Hitta, markera eller identifiera dubbletter   |  Ta bort tomma rader   |  Kombinera kolumner eller celler utan att förlora data   |   Rund utan formel ...
	Superuppslag: Flera kriterier VLookup  |   VLookup med flera värden  |   VSök över flera ark   |   Fuzzy Lookup ....
	Avancerad rullgardinslista: Skapa snabbt en rullgardinslista   |  Beroende rullgardinslista   |  Flervals-rullgardinslista ....
	Kolumnhanterare: Lägg till ett specifikt antal kolumner  |  Flytta kolumner  |  Växla synlighetsstatus för dolda kolumner  |  Jämför intervall och kolumner ...
	Utvalda funktioner: Rutnätsfokus   |  Designvy   |   Stor formelbar   |  Arbetsbok & Bladhanterare   |  Resursbibliotek (Automatisk text)   |  Datumväljare   |  Kombinera arbetsblad   |  Kryptera/Dekryptera celler   |  Skicka e-postmeddelanden efter lista   |  Superfilter   |   Specialfilter (filtrera fet/kursiv/genomstruken...) ...
	Topp 15 verktygssatser:  12 text verktyg (lägga till text, Ta bort tecken, ...)   |   50+ Diagram Typer (Gantt Chart, ...)   |   40+ Praktiskt Formler (Beräkna ålder baserat på födelsedag, ...)   |   19 Införande verktyg (Infoga QR-kod, Infoga bild från sökväg, ...)   |   12 Konvertering verktyg (Siffror till ord, Valutaväxling, ...)   |   7 Slå ihop och dela verktyg (Avancerade kombinera rader, Dela celler, ...)   |   ... och mer

Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid.  Klicka här för att få den funktion du behöver mest...

Läs mer... Gratis nedladdning...

---

Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

• Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
• Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
• Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!

Läs mer... Gratis nedladdning...