CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede Egonolsen Praktikant
07. januar 2017 - 23:17 Der er 2 kommentarer

Hjælp til at skjule data udfra en værdi

Hej alle,

Mit spørgsmål går meget enkelt ud på jeg har en masse data fra et spørgeskema, da jeg hiver det ned i Excel har den lagt lavet rækker til alt data selvom respondenten slet ikke skal svare på disse spørgsmål.

Så hvis jeg f.eks. har jeg en kolonne med værdier fra 1 til 4 på hver række og udfra den værdi, vil jeg gerne have vist nogen bestemte kolonner og skjult de andre kolonner.
Kan dette lade sig gøre??

Håber virkelig en kan hjælp mig.
Avatar billede excelent Ekspert
08. januar 2017 - 08:41 #1
Hvis du selv indtaster tallene 1-4 i fx kolonne A så :
Højre klik på aktuel arkfane og vælg Vis Programkode. Indsæt kode der.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A1:A60")) Is Nothing Then Exit Sub
If Application.CountIf(Range("A1:A60"), 1) >= 1 Then Columns(4).Hidden = True Else Columns(4).Hidden = False
If Application.CountIf(Range("A1:A60"), 2) >= 1 Then Columns(6).Hidden = True Else Columns(6).Hidden = False
If Application.CountIf(Range("A1:A60"), 3) >= 1 Then Columns(8).Hidden = True Else Columns(8).Hidden = False
If Application.CountIf(Range("A1:A60"), 4) >= 1 Then Columns(10).Hidden = True Else Columns(10).Hidden = False
End Sub
Avatar billede excelent Ekspert
08. januar 2017 - 08:43 #2
Anvend denne i stedet :

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A1:A60")) Is Nothing Then Exit Sub
If Application.CountIf(Range("A1:A60"), 1) >= 1 Then _
Columns(4).Hidden = True Else Columns(4).Hidden = False
If Application.CountIf(Range("A1:A60"), 2) >= 1 Then _
Columns(6).Hidden = True Else Columns(6).Hidden = False
If Application.CountIf(Range("A1:A60"), 3) >= 1 Then _
Columns(8).Hidden = True Else Columns(8).Hidden = False
If Application.CountIf(Range("A1:A60"), 4) >= 1 Then _
Columns(10).Hidden = True Else Columns(10).Hidden = False
End Sub
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
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
='uge 25'!H$31 Af lurup i Excel 1 11 minutter siden Lige nu
End Down Af PGFfyn i Excel 2 I dag 12:57 I dag 17:38
Sum af forskellige celler Af lurup i Excel 3 14/06/202423:56 I går 20:54
Kørt fast i simpel kvalitets model Af Flemming Staal i Excel 4 14/06/202409:18 14/06/202411:09
sammenlægge 2 eller 3 kolonner til 1 kolonne Af Klaus W i Excel 12 12/06/202417:01 14/06/202410:45
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
11 min siden ='uge 25'!H$31 Af lurup i Excel
I dag 15:12 Tekstoplæsning - fjerne talebesked Af 1Dorte i Android
I dag 12:57 End Down Af PGFfyn i Excel
I dag 11:37 Hvilken type adapter skal man bruge - USB Af clausito i PC
I dag 11:11 Appel Copy Paste Af HenningFr i iOS, iPhone & iPad
White papers
Flere white papers »


Premium
Teaser billede
Virksomheder af en vis størrelse får det svært i AI-ræset: Men bestemte tiltag kan sende dem frem i feltet
Læs mere »
På Bornholm jagter Computerworld bekymret svar på det store spørgsmål
NIS2-implementeringen er nu i gang: Varsler omfattende tilsyn og store bøder
Staten mister i stor stil teknisk kyndige it-folk: Vigtig viden om samfundskritiske systemer overlades til konsulenter
Se alle »
Computerworld
Teaser billede
Prøvekørt: Polestar 3 er en rendyrket designer-bil, som er ude på at forføre dig
Læs mere »
Test af to nye robotplæneklippere: En dyr og en mere overkommelig
Her er de enheder der får det nye Apple AI – vil du have det, skal du nok ud og købe en ny iPhone
Test: Her er den smarte økonomi-robot til din græsplæne
Se alle »
CIO
Teaser billede
OUH's fynske hosting-leverandør på vej mod konkurs efter ransomware-angreb: Kan ikke genoprette ramte systemer
Læs mere »
Microsoft dropper ny funktion i Copilot få måneder efter lanceringen
CIO hos Alm. Brand rydder op i legacy-systemer og skaber en ny it-arkitektur: Stripper alt ned til standardkode for at sikre fremtiden
Vælg it-sikkerhed, hvis du gerne vil tjene mange penge: Disse cheftitler scorer de højeste lønninger i it-branchen
Se alle »
Job & Karriere
Teaser billede
Her er Danmarks fem bedste CIO’er lige nu: Se de fem nominerede til prisen som Årets CIO 2024
Læs mere »
Medarbejderne fik udleveret badetøfler ved indflytningen: Kom med inden for i IBM Danmarks nye topmoderne hovedkontor
Google fyrer hele sit Python-team
Bo solgte sit software-system for et treciftret millionbeløb: Brugte pengene på at købe 80 medarbejdere til ny storsatsning
Se alle »
White paper
Teaser billede
Vejen væk fra WAN: Sådan skifter du til en moderne infrastruktur
Læs mere »
Sådan gør du: Elektronisk dokumentudveksling i praksis
Sæt turbo på din cloudperformance og minimér risikoen for DDoS-angreb
Sådan høster du forretningsfordelene ved Internet of Things
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »