17. august 2010 - 13:35Der er
3 kommentarer og 1 løsning
Hjælp til at skjule kolonner i excel vha VBA
Hejsa
Er der nogen der kan hjælpe mig med en VBA programmering som kan sjule kolonner. Det skal gælde fra kolonne D til AG, at hvis række 8 er blank eller 0, skal kolonnen skjules. Evt. kunne det være en omskrivning af nedenstående, som skjuler rækker hvis kolonne C er blank eller 0.
Hvis jeg skal have koblet den nye sammen med nedenstående, skal de så bare kopieres direkte ind efter "Next", eller hvad gør man?
Application.ScreenUpdating = False For Række = 77 To 89 If Range("C" & Række) = "" OR Range("C" & Række) = 0 Then Rows(Række).Select Selection.EntireRow.Hidden = True End If Next
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Sub test() Application.ScreenUpdating = False For Række = 77 To 89 If Range("C" & Række) = "" Or Range("C" & Række) = 0 Then Rows(Række).EntireRow.Hidden = True Next For kol = 4 To 33 If Cells(8, kol) = "" Or Cells(8, kol) = 0 Then Cells(8, kol).EntireColumn.Hidden = True Next End Sub
Jeg har eks. brug for at skjule række 19-17, 33-51 og 59-66, hvis værdi i kolonne J er 0 eller tom.
På forhånd tak :-)
Synes godt om
Ny brugerNybegynder
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.