12. august 2019 - 14:17Der er
1 kommentar og 1 løsning
Slet tomme kolonner
Hej Jeg har et regneark med ca. 100 kolonner, men ca. hver anden er tom, hvordan sletter jeg hurtigst disse? Jeg har tekst i række 3. Jeg har en makro der kan skjule tomme kolonner, men hvordan ser den ud, hvis den skal slette tomme kolonner?
Sub SkjulKolonne() For x = 1 To 100 'kolonnenumre, som skal testes If Cells(3, x).Value = 0 Then Cells(3, x).EntireColumn.Hidden = True Else Cells(3, x).EntireColumn.Hidden = False End If Next End Sub
Hos Computerworld it-jobbank er vi stolte af at fortsætte det gode partnerskab med folkene bag IT-DAY – efter vores mening Danmarks bedste karrieremesse for unge og erfarne it-kandidater.
Sub SletKolonne() For x = 100 To 1 Step -1 'kolonnenumre, som skal testes If Cells(3, x).Value = 0 Then Cells(3, x).EntireColumn.Delete End If Next End Sub
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.
