Avatar billede Lisette Praktikant
16. november 2020 - 21:54 Der er 2 kommentarer

Hjælpe til VBA kode til at sortere/udvælge data

Hej
Jeg er ny til VBA og vil gerne have hjælp til at lave en VBA kode. De skal kunne  trække udvalgte kolonner fra en fane over i en anden fane - men i hver af de udvalgte kolonner, vil jeg kun trække de rækker med over, hvis der i den 1. kolonne er er angivet 1 ud af 3 navne.

Jeg vil i princippet sortere mine data i forbindelse med at jeg trækker kolonnerne over i en ny fane. Kan man køre det samtidigt?

Jeg tænkte om der fandtes nogle hvis-funktioner?
som jeg kunne tilknytte dette udtræk:

Sub generer_outputtabel()
Dim sh As Worksheet
Set sh = ThisWorkbook.Sheets("Rådata")
Dim osheet As Worksheet
Set osheet = ThisWorkbook.Sheets("Output")
osheet.Range("A7:G400").Delete
sh.Range("B5:C200,K5:K200,V5:V200,GT5:GT200,HX5:HX200,JB5:JB200").Copy osheet.Range("A7")

End Sub


Ellers vil jeg høre om jeg kan få hjælp til at opbygge dette Lopslag i VBA kode?

=HVIS.FEJL(LOPSLAG("Navn1";Output!$A10:$AB401;Output!A$1;FALSK);"")
Avatar billede kim1a Ekspert
16. november 2020 - 22:39 #1
At skrive en formel via vba kan gøres på flere måder. Hvis du godt kan lide at man kan se hvad der er sket så brug f.eks. noget i retning af denne (utestet):
activecell.formula = "=HVIS.FEJL(LOPSLAG("""Navn1""",Output!$A10:$AB401,Output!A$1,FALSK);"""")" bemærk den overdrevne brug af " er bevidst

Jeg tænker at sorteringen er nemmest at lave efter du har kopieret data over. Du kan evt. optage at du sorterer dataene for at se hvordan det skrives i VBA.

Din udfordring kan også løses med en select case se f.eks. https://excelmacromastery.com/vba-select-case/ under Select Case Multiple Values, eller et if the else loop med et par krøller - dette er sikkert ikke korrekt systaks, men ideen:
if mads then
elseif jesper then
elseif peter then
else
end if
end if
end if
Avatar billede Lisette Praktikant
17. november 2020 - 13:47 #2
Tak Kim. Jeg vil lige kigge på dine forslag.
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 for alle niveauer og behov – find det kursus, der passer til dig

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