Telefonszámunk: 1-472-0679

[Resolved] Betűstílus változása

Kezdőlap › Fórumok › Excel témák › [Resolved] Betűstílus változása

Topic Resolution: Resolved
8 bejegyzés megtekintése - 1-8 / 8
  • Szerző
    Bejegyzés
  • 2020-04-07-13:42 #6971
    ciba2345
    Felhasználó

      Sziasztok,

      a következő két problémám van:
      1. Excelben A1 cella dőlt és félkövér betűket tartalmazó szövege B1 cellában (B1-be beírva =A1) normál stílusra vált át. Szöveg:FD
      (A későbbiekben munkalapok között volna szükségem a szöveghű átvitelre.)

      2. Excelből körlevélként Wordbe átvitt szövegben a dőlt és félkövér betűstílusok megváltoznak normálra.

      A szövegek, amiket szeretnék körlevélben átvinni Excelből Wordbe (Office 2007) több mondatból és változó betűstílusokból állnak. Maga az Excel adatok körlevélbe, Wordbe beírása működik, kizárólag a betűstílusokkal van gondom.

      Remélem, sikerül megoldást találnotok a fentiekre!

      Előre is nagyon köszönöm!

      Üdvözlettel:
      ciba2345

      2020-04-07-19:48 #6982
      horvimi
      Adminisztrátor

        Szia!

        Első kérdés:
        Egy hivatkozás soha nem fogja átvenni a forrás cella formátumát.

        Második kérdés:
        Ez is necces, de esetleg megpróbálhatod azt, amit itt leírnak.

        Imre

        2020-04-15-14:49 #6997
        ciba2345
        Felhasználó

          Szia!

          Köszönöm a legutóbbi segítséget!

          A fentiek fényében más irányból közelíteném meg a dolgot:
          Van rá megoldás, hogy 2007-es Wordben körlevél esetén az Excel táblából átvett adat első része normál betűvel jelenjen meg egy adott félkövér kifejezésig, utána a többi szöveg pedig dőlt betűvel?

          Pl.: Normál betűstílus a félkövér kifejezésig, utána dőlt betűstílus.

          Olyan függvényre gondoltam, hogy a „félkövér kifejezésig” felismerése, előtte normál, utána dőlt betűstílus, változó hosszúságú szövegnél.

          Jelenlegi megoldás, hogy az Excelből átvett szöveget két részre szedem, a „félkövér kifejezésig” az egyik, utána a másik adatmező beszúrása, de ez a meglévő adathalmaz mennyisége miatt rengeteg munka lenne. Természetesen, ha az Excel tudná ugyanezt, az is nagy segítség volna, ez esetben a „félkövér kifejezésig” szerepelne alapból a Wordben.

          Előre is köszönöm!

          Bálint

          2020-04-16-10:11 #7000
          horvimi
          Adminisztrátor

            Szia!

            Nincs ilyen Excel függvény
            Makró kóddal meg lehet csinálni azt, hogy Excelben egy oszlop összes celláját szétszedni két oszlopra: Félkövérig és utána
            Feltételezve, hogy konzisztensen Félkövérrel kezdődik, és ha vége a félkövérnek, utána a többi már nem az.

            Persze keverten is meg lehet csinálni, de az bonyolultabb.
            Ez már egy komolyabb programozási feladat, talán túlmutat az ingyenes fórum keretein.

            Imre

            2020-04-16-14:33 #7001
            delila
            Felhasználó

              Az Excelben makró segítségével kétfelé választod a szöveget. A két részt viszed át a Wordbe egymás mellé, és ott formázod a mezőt félkövérre, ill. dőltre.
              A példában a szövegek az A oszlopban vannak, ezeket teszi át a makró a stílus alapján a B és C oszlopba.

              Sub Felkover_Dolt()
    Dim sor As Long, betu As Integer, usor As Long, szoveg As String
    
    usor = Range("A" & Rows.Count).End(xlUp).Row
    For sor = 2 To usor
        szoveg = Range("A" & sor)
        For betu = 1 To Len(szoveg)
            If Range("A" & sor).Characters(Start:=betu, Length:=1).Font.FontStyle = "Dőlt" Then
                Range("B" & sor) = Left(szoveg, betu - 1)
                Range("C" & sor) = Mid(szoveg, betu, 100)
                Exit For
            End If
        Next
    Next
End Sub
              Attachments:
              You must be logged in to view attached files.
              2020-04-16-17:20 #7007
              horvimi
              Adminisztrátor

                Mégsem mutat túl 🙂

                2020-04-16-18:03 #7010
                ciba2345
                Felhasználó

                  Szuper!
                  Nagyon jól működik.
                  🙂

                  Nagyon szépen köszönöm a segítségeteket!

                  2020-04-16-19:18 #7011
                  delila
                  Felhasználó

                    Szívesen. 🙂

                    Kati

                  • Szerző
                    Bejegyzés
                  8 bejegyzés megtekintése - 1-8 / 8
                  • Be kell jelentkezni a hozzászóláshoz.