Új hozzászólás Aktív témák

• #36568 Delila_1 veterán Ghoosty #36545

  Új Válasz 2017-11-17 08:23:31 #36568

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Delila_1

  veterán

  válasz Ghoosty #36545 üzenetére

  NE képlettel, hanem makróval fűzd össze a cellákat, akkor már lehet formázni cellán belül is a karaktereket. A fájlnak is jót tesz, ha a sok képlet helyett értékek szerepelnek.

  Sub Felkover()
Range("C1") = Range("A1") & " " & Range("B1")
Range("C1").Characters(Len(Range("A1")) + 2, Len(Range("B1"))).Font.Bold = True
End Sub

  A 2. sor végzi a formázást. Az első paraméter – Len(Range("A1")) + 2 – adja meg, hányadik karaktertől legyen a C1 tartalma fékövér, a második – Len(Range("B1")) – pedig azt, hogy milyen hosszan.

  Ciklusban is elvégezheted az összefűzést, és a formázást.

• #36548 Fferi50 Topikgazda Ghoosty #36545

  Új Válasz 2017-11-16 17:12:35 #36548

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Fferi50

  Topikgazda

  válasz Ghoosty #36545 üzenetére

  Szia!
  "Makrót tudok írni, hogy bizonyos cella bizonyos karaktereit átírja félkövérre, de függvényben nem működik"
  Akkor azt a makrót hívd meg pl. a munkalap változás (Change) eseménykezelőjében. Miután összefűzték az értekeket, változik a cella értéke, a makró pedig félkövérré teszi a kívánt karaktereket.

  Üdv.

Új hozzászólás Aktív témák