Vis linjeskift - VBA

vbCrLf brug det...

//>Rune

Der er vidst også noget der hedder vbNewLine og så er der vidst også chr(13) - men kan sq ikke helt huske om de sidste 2 er helt rigtige :)

//>Rune

Hej Rune

Hvilken kode bruger du foran for at aktivere funktionen?

TVC

? hvad mener du?

du skriver bare:
Dim As String strVar = "Hej med dig" & vbCrLf & "Dette er en ny linje"

//>Rune

Så har jeg vist ikke helt forklaret mig godt nok.

Når man åbner et nyt regneark kan man først se sideskift når man har valgt Vis udskrift.

Jeg ønsker at lave en knap som aktiverer den del af funktionen "ActiveWindow.SelectedSheets.PrintPreview" som foretager beregning af sideopdelingen og herefter viser alle sideskift i dokumentet.

Hilsen

TVC

Ups kan se at jeg i mit oprindelige spørgsmål er kommet til at skrive linieskift og ikke sideskift. Det er altså sideskift jeg ønsker hjælp til - beklager fejlen!

Jeg har p.t. løst det ved:

Sub ShowPageBreak()

Application.ScreenUpdating = False

    ActiveWindow.View = xlPageBreakPreview

    ActiveWindow.View = xlNormalView

Application.ScreenUpdating = True

End Sub

Men hvis der er en der kender den rigtige kommando til at få vist sideskift er spørgsmålet stadig åben :-)

TVC

Sub Makro2()
'
' Makro2 Makro
' Makro indspillet 04-09-2005 af Frank Simens
'

'
    ActiveWindow.View = xlPageBreakPreview
End Sub

Hej help2day

Det er netop den funktion jeg anvender i eksemplet ovenfor, hvor jeg også sætter View tilbage til normal.

Det er ikke [Vis] [Sideskift] jeg søger. Jeg søger den funktion, der er en del af Vis udskrift funktionen. Denne del af funktionen viser de stiplede linjer (-----) i den normale visning. Det er denne kommando jeg mangler og jeg har ikke kunne optage denne via Makrooptageren!

TVC

Lukker :-)