Microsoft Word 2013 - jak wykreskować do końca wiersza "--------"

Question

Witam,

czy jest możliwość w samym wordzie, albo za pomocą dodatkowego oprogramowania dodać skrót klawiszowy, który będzie mi automatycznie kreskował wiersz do końca strony? Jakaś makra? Nie chodzi mi o tabulację, bo potrzebuję w pliku tekstowym używać domyślnej funkcji Tab jak i mieć możliwość szybkiego kreskowania "-------" do końca wiersza.

Comments

Dlaczego chcesz "kreskować" między wierszami? Nie lepiej i estetyczniej jest użyć wyrażenia "---", które po wciśnięciu klawisza Enter zrobią ładną, poziomą linię?

---

w VBA to nie działa niestety. Pokaże się po prostu "---", ponieważ tekst pisany przez makro nie podlega autokorekcie aż w takim stopniu

Answer 1

Najłatwiej tak - Rejestruj makro a potem Wstaw linię obramowania, ale wklejam jeszcze kod VBA:

Sub Wstaw_Linial()

    With Selection.Borders(wdBorderBottom)
        .LineStyle = Options.DefaultBorderLineStyle
        .LineWidth = Options.DefaultBorderLineWidth
        .Color = Options.DefaultBorderColor
    End With
End Sub

Potem po prostu przypisz makro do skrótu klawiszowego i powinno działać ;)