Avatar billede david_swahn Nybegynder
26. februar 2013 - 16:23 Der er 2 kommentarer

Data område, skal udlade tomme kolonner fra det refererrede område.

Jeg har et Data område med en del statistik. Imidlertid får jeg næppe brug for at all data skal bruges på samme tid. Derfor har jeg lavet formlerne således, at de kolonner med data der ikke skal bruges står tilbage som tomme kolonner.

Nu vil jeg så samle denne data et andet sted. Data området skal automatisk kunne udlade de tomme kolonner.

I rækken over kolonnerne indikeres med "1" hvis den skal medtages, eller tom ("") hvis den skal udelades. Jeg regner med at denne række (16) er en brugbar reference.

Nuværende dataområde er.
F17:CS177

Nye data område
fra F200...

http://i50.tinypic.com/2nvfigi.jpg
Avatar billede jens48 Ekspert
26. februar 2013 - 21:58 #1
Prøv med denne makro:

Sub MoveCol()
Dim x As Integer
Dim y As Integer
Range(Cells(200, 6), Cells(360, 97)).ClearContents
y = 6
For x = 6 To 97
If Cells(16, x) = 1 Then
Range(Cells(200, y), Cells(360, y)) = Range(Cells(17, x), Cells(177, x)).Value
y = y + 1
End If
Next
End Sub
Avatar billede Unicco Nybegynder
26. februar 2013 - 21:57 #2
Forstår ikke hvad du ønsker at gøre. Dit link virker heller ikke.
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
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

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.

Du kan også logge ind via nedenstående tjenester