Avatar billede petert Forsker
30. januar 2012 - 10:06 Der er 20 kommentarer og
1 løsning

Hjælp til automatisk række højde

Hej Alle
Jeg har et ark hvor jeg indsætter tekst i nogle celler fra et andet ark.
Mit problem er at hvis teksten fylder mere end 1 linje bliver rækkehøjden ikke automatisk forhøjet, såleds at kun første linje vises i den indsatte celle.
Hvordan kan jeg løse dette?
MVH
Petert
Avatar billede ggxdg Nybegynder
30. januar 2012 - 10:17 #1
Det er ikke alle versioner det fungerer på, men prøv at ofrmattere cellerne med "ombryd tekst".
Avatar billede petert Forsker
30. januar 2012 - 10:39 #2
Jeg bruger 2010, men "ombryd tekst" har jeg prøvet, dette virker ikke.
Avatar billede thadoews Nybegynder
30. januar 2012 - 10:44 #3
Jeg har også 2010 og oplever ingen problemer. Dog skal jeg trykke på "Ombryd tekst", hvis jeg ønsker at se hele teksten i en celle, hvis teksten er mere end én celle.
Avatar billede ggxdg Nybegynder
30. januar 2012 - 10:47 #4
Hmm... Har lige leget lidt med det, det fungerer nemlig herller ikke lige 'off the bat' her.
Men hvis jeg laver en celle lig en multilinje celle, og så jeg på denne celle slår ombryd tekst til, altså efter jeg har referet til en multilinje celle, så bliver den nye celle også multininjet. Håber det giver mening :)

De celler du snakker om, er det nogle specifikke celler, eller er da alle i hele arket som skal reagere på den måde?

Man kan nemlig nok få vba til at slå ombryd tekst til/fra for det brugte range, når du aktiverer arket, og det burde få alle celler til at vises som multilinjet.
Avatar billede petert Forsker
30. januar 2012 - 10:51 #5
Problemet er at jeg bruger denne til at hente teksten.
"=HVIS(ER.FEJL(LOPSLAG(A25;Tekster!$A:$B;2;FALSK));"";LOPSLAG(A25;Tekster!$A:$B;2;FALSK))"
Hvis den tekst jeg henter er eks 6 linjer med samme kolonne bredde både fra sendercelle og modtager celle, vises kun første linje, også selv om der er ombryd tekst i begge celler.
MVH
Petert
Avatar billede ggxdg Nybegynder
30. januar 2012 - 10:53 #6
jeps - men hvis du i modtager celle slår ombryd tekst fra og til igen, retter cellen sig så ikke til?
Avatar billede petert Forsker
30. januar 2012 - 10:54 #7
Hvor/hvad mener du med "multilinjet"
Avatar billede petert Forsker
30. januar 2012 - 10:55 #8
nej den gør ikke
Avatar billede ggxdg Nybegynder
30. januar 2012 - 11:10 #9
hmm... det er garanteret fordi det ikke er en direkte reference, men gennem et LOPSLAG :/
Avatar billede ggxdg Nybegynder
30. januar 2012 - 11:17 #10
Næh... det fungerer fint nok her at slå ombryd tekst fra og til i den pågældende celle, selv om det er gennem et LOPSLAG jeg sidder selv med excel 2007 SP3.
Når vores verisoner reagerer så forskelligt er der nok ikke lige noget jeg kan hjælpe med her :/
Avatar billede finb Ekspert
30. januar 2012 - 12:33 #11
Retter rækkehøjden ind efter, at din FORMEL kun er 1 række høj ? finb
Avatar billede anlu Nybegynder
30. januar 2012 - 22:47 #12
Hvis du på et tidspunkt manuelt har rettet række-højden ændres den ikke længere automatisk.
Det kan ændres tilbage ved at du laver en auto-fit, enten via menupunktet eller ved at dobbeltklikke ude i kolonnen med rækkenumre på skillelinjen mellem den pågældende række og rækken under denne.

Ved ikke om dit problem blot skyldes dette?
Avatar billede petert Forsker
31. januar 2012 - 09:17 #13
Kan jeg løse problemet ved at ændre noget i formlen?
Kan jeg evt. løse problemet med en makro?
MVH
Petert
Avatar billede anlu Nybegynder
31. januar 2012 - 16:17 #14
Du kan bruge noget a la denne stump VBA-kode til at auto-fitte fx række 3:

  Range("A3").EntireRow.AutoFit

Hvis det skal være en anden række, udskifter du selvf. bare 3 med rækkenr. - eller du kan fx skrive "A3:A7" - hvis det er alle rækkerne 3-7. Og så skal koden selvfølgelig stå et passende sted afhængig af hvad der skal trigge at højden justeres.
Avatar billede store-morten Ekspert
31. januar 2012 - 16:57 #15
Som Makro: Indsæt i et modul. Makronavn: AutoFit
Sub AutoFit()
Rows.AutoFit
End Sub

Automatisk ved åbning af ark. Indsæt i ThisWorkbook (Denne_projektmappe)
Private Sub Workbook_Activate()
Rows.AutoFit
End Sub

Automatisk ved ændring i ark1. Indsæt i Ark1
Private Sub Worksheet_Change(ByVal Target As Range)
Rows.AutoFit
End Sub

Automatisk ved ændring i alle ark. Indsæt i ThisWorkbook (Denne_projektmappe)
Private Sub Worksheet_Change(ByVal Target As Range)
Rows.AutoFit
End Sub
Avatar billede petert Forsker
02. februar 2012 - 19:13 #16
Hej anlu
Det lyder interesant men hvordan indsætter jeg denne VBA kode?
Jeg kører 2010

Hej Store_morten
Det ser fint ud, men jeg prøver om VBA koden kan komme til og virke, hvis jeg kan lære og indsætte en sådan
MVH
Petert
Avatar billede anlu Nybegynder
02. februar 2012 - 21:22 #17
Hej petert,

Kan du ikke uddybe, hvornår du gerne vil have den til at udføre autofittet? Og hvilke rækker det drejer sig om.

store_morten har en række gode forslag - hans løsning autofitter på alle rækker i de sammenhænge han beskriver. Hvis det er fordi du blot ønsker at autofitte visse rækker, men kan bruge en af store-mortens triggere, så kan du blot erstatte
"Rows.AutoFit" med noget a la det jeg skrev i nr. 14.

/anlu
Avatar billede store-morten Ekspert
02. februar 2012 - 21:31 #18
Eksempel:
Som Makro: Indsæt i et modul. Makronavn: AutoFit

Kopier koden.
Sub AutoFit()
Rows.AutoFit
End Sub

I Excel:
Højre klik på "Ark1" og vælg 'Vis programkode'
Vælg "Insert" og vælg 'Module'
Indsæt koden med Ctrl+v
Luk på det røde kryds.

Som anlu skriver, så autofitter denne på alle rækker, på det ark hvorfra Makroén køres.
Avatar billede store-morten Ekspert
30. marts 2012 - 17:33 #19
Kunne det bruges !!!!
Avatar billede petert Forsker
08. maj 2012 - 08:32 #20
Tak for hjælpen, det kunne bruges. læg et svar, så jeg kan lukke.
MVH
Petert
Avatar billede store-morten Ekspert
08. maj 2012 - 16:33 #21
Velbekomme :-)
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
Stort udvalg af Excel kurser til alle niveauer og jobfunktioner

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





White paper
Tidsbegrænset kampagne: Overvejer du at udskifte eller tilføje printere i din forretning? Vi kan tilbyde én eller flere maskiner gratis