- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Samsung Galaxy Tab S11 - tizenegyes
- Androidos tablet topic
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Épített vízhűtés (nem kompakt) topic
- OLED TV topic
- RAM topik
- ROG Xbox Ally X: Összefogás
- Azonnali alaplapos kérdések órája
- Milyen asztali (teljes vagy fél-) gépet vegyek?
-
PROHARDVER!
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
Delila_1
veterán
válasz
tgumis #20207 üzenetére
Egy példa arra, hogy az összefűzött adatnál hogy lehet cellán belül formázni:
Sub FormazasCellanBelul()
Dim kezd As Integer, sor As Integer
'Képletek értékké alakítása
Columns(3).Copy
Range("C1").PasteSpecial xlPasteValues
sor = 1
'Formázás
Do While Cells(sor, "C") <> ""
'Kötjel helyének megállapítása
kezd = Application.WorksheetFunction.Search("_", Cells(sor, "C"))
'Kötjel előtti rész színének beállítása
Cells(sor, "C").Characters(Start:=1, Length:=kezd - 1).Font.ColorIndex = 3
'Kötjel utáni rész félkövérre állítása
Cells(sor, "C").Characters(Start:=kezd + 1, Length:=100).Font.Bold = True
sor = sor + 1
Loop
End SubAz összefűzött adatok nálam a C oszlopban vannak. Az adatokat alsó kötjel beiktatásával fűztem össze. Ezeket csak akkor tudom cellán belül formázni, ha a képletek helyett irányított beillesztéssel átalakítom értékekké.
Az alsó kötjel előtti karakterek színét pirosra állítottam, a kötjel utániak félkövérek lesznek. -
Delila_1
veterán
válasz
tgumis #20207 üzenetére
Automatikusan nem tudod az egyes összetevőket cellán belül formázni. A bevitel után kijelölöd a formázandó részt a cellában, vagy a szerkesztőlécen, és a cellaformázás menüben adod meg a formátumot.
Abban az esetben, ha mindegyik cellában valamilyen szempontból azonos részt akarsz félkövérre formázni, makróval is meg lehet oldani. A szempont lehet pl. az, hogy mindenhol az n-ediktől kezdve akarsz x darab karaktert félkövérre állítani.
Új hozzászólás Aktív témák
- ŐSZI BOMBA AKCIÓK! PSN, STEAM, UBISOFT CONNECT, EA APP, XBOX EREDETI KULCSOK 100% GARANCIA
- HIBÁTLAN iPhone 12 mini 64GB Green -1 ÉV GARANCIA - Kártyafüggetlen, MS3452
- HIBÁTLAN iPhone 12 mini 64GB Green -1 ÉV GARANCIA - Kártyafüggetlen, MS3454, 94% Akkumulátor
- Acer TravelMate P214 i3-1115G4 12GB 256GB 14" FHD 1év garancia
- ÚJ Xiaomi Mi Robot Vacuum Mop Essential robotporszívó feltörlő 2db 1999 Ft
Állásajánlatok
Cég: NetGo.hu Kft.
Város: Gödöllő
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest