Telefonszámunk: 1-472-0679

Pontos sortörés a cellában – akár képlettel is

2012-12-02 - horvimi - Kategória: Formázás, Függvények
Hivatkozott Excel verzio: Excel 2007 Excel 2010 Excel 2013

Az Excel mindegyik verziójában bekapcsolhatjuk a szöveg tördelését a cellaformázás párbeszéd ablakban, vagy az újabb verziókban a Kezdőlap szalagon a megfelelő nyomógombbal:

Sortöréssel több sorba” vagy angolul „Wrap Text

Ezzel a módszerrel az a probléma, hogy a sortöréseket automatikusan helyezi el, és mi nem tudjuk szabályozni. Pl.: Ha növeljük az oszlop szélességet, akkor a töréspontok elmozdulhatnak.

Barkácsmódszerrel úgy lehet a dolgot szabályozni, hogy a kívánt töréspontnál szóközöket teszünk a cellába, hogy ezzel kényszerítsük ki a sortörést.

Az igazi megoldás

A töréspont helyén a bal oldali ALT+ENTER kombinációt alkalmazzuk. Az így elhelyezett sortörés az oszlop szélességétől függetlenül mindig jó lesz.

Sortörés összefűzött szövegnél

Abban az esetben, ha a cella tartalmát több szöveg összefűzésével kapjuk, akkor is szabályozhatjuk a sortörés pozícióját, a következő módszerrel:

  1. A sortörés helyére befűzzük a KARAKTER(10) függvényt. Angol verzióban CHAR(10).
  2. Beállítjuk a „Sortörésseltöbb sorba” tulajdonságot a cellán.

Példa

3 hozzászólás
  1. Az lenne a kérdésem, hogy visszafelé is meg lehet találni a sortörést? Tehát adott egy szöveget tartalmazó cella, mely eredetileg Alt+enterrel tördelt, több helyen. Én tördelésenként külön-külön cellába szeretném szedni a szövegrészeket, ez lehetséges valahogy? Köszönöm előre is.

    • Bocsánat, nem érzékeltem a commentet, mert a Fórumban szoktak lenni a kérdések.
      Szóval a „szövegből oszlopok” funkcióval szét lehet dobni.
      A határoló jelhez írjál Ctrl+J kombinációt.

      • Vagy ki kell cserélni. Van erre egy jó kis függvényem valahonnét:

        Public Function karakter_csere(szöveg As String, cserélni As String, mire_cserél As String) As String
        Dim karakter As String
        karakter_csere = „”
        For i = 1 To Len(szöveg)
        karakter = Right(Left(szöveg, i), 1)
        If karakter = cserélni Then karakter = mire_cserél
        karakter_csere = karakter_csere & karakter
        Next i
        End Function

Vélemény, hozzászólás?