word makrot

jore 76

tervehdys,

Osaisko joku auttaa kun pitäisi tehdä makro joka

1. osaa tavuttaa sanat.

2. osaa jakaa rivit 38 merkin mittaiseksi

paljon muuta säätöä mutta jos tähän saisi ensin apua.

olen itse hahmoteelut seuraavanlaisen

Sub Makro3()

Dim laskuri As Integer

Selection.WholeStory
With ActiveDocument
.AutoHyphenation = True
.HyphenateCaps = True
.HyphenationZone = CentimetersToPoints(0.75)
.ConsecutiveHyphensLimit = 0

End With

Selection.MoveUp

For laskuri = 0 To 10




Selection.MoveRight Unit:=wdCharacter, Count:=39
Selection.TypeText Text:=Chr(11)

Next

End Sub


Mutta tässä on vikana se että kun se ensin tavuttaa ja sitten katkoo rivit niin eihän se noin voi edes toimia. Jos esim sana on aurinkoinen ja se osuu merkkiväleille 30 - 40 niin sana katkeaa toiselle riville, miten tämän voisi estää, voisi esimerkiksi laittaa tavuviivan ja siirtää loput sanasta toiselle riville.

Kiitos tuhannesti

(toivottavasti joku ymmärtää)

0

200

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000

      Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

      Luetuimmat keskustelut

      1. Tukalaa kuumuutta

        Tietäisitpä vaan kuinka kuumana olen käynyt viime päivät. Eikä johdu helteestä, vaan sinusta. Mitäköhän taikoja olet teh
        Ikävä
        43
        3017
      2. Ensi kesänä

        Näin kesän viimeisenä minuutteina ajattelen sinua. Olisiko seuraava kesä "meidän" kesä? Tänä vuonna ei onnistuttu, mutta
        Ikävä
        61
        2961
      3. Sinä, ihastukseni

        Mitä haluaisit tehdä kanssani ensimmäisenä?
        Ihastuminen
        42
        2367
      4. Tiedät ettei tule toimimaan.

        Mielenterveys ei kummallakaan kestä.
        Ikävä
        31
        1863
      5. Okei, myönnetään,

        Oisit sä saanut ottaa ne housutkin pois, mutta ehkä joskus jossain toisaalla. 😘
        Ikävä
        25
        1719
      6. Anne Kukkohovin karmeat velat ovat Suomessa.

        Lähtikö se siksi pois Suomesta ? Et on noin kar? mean suuret velat naisella olemassa
        Kotimaiset julkkisjuorut
        72
        1684
      7. Onko kaivatullasi

        himmeä kuuppa?
        Ikävä
        48
        1586
      8. Mihin hävisi

        Mihin hävisi asiallinen keskustelu tositapahtumista, vai pitikö jonkin Hannulle kateellisen näyttää typeryytensä
        Iisalmi
        77
        1275
      9. On jo heinäkuun viimeinen päivä.

        En taida nähdä sinua koskaan.
        Rakkaus ja rakastaminen
        38
        1252
      10. Lähtikö korvat

        puhtaaksi vaikusta?
        Tuusniemi
        79
        1080
      Aihe