- Itt a Galaxy S26 széria: az Ultra fejlődött, a másik kettő alig
- iPhone Ultra néven jöhet az Apple első foldja, nem lesz olcsó mulatság
- Samsung Galaxy S23 és S23+ - ami belül van, az számít igazán
- Fotók, videók mobillal
- Hivatalos a OnePlus 13 startdátuma
- Amazfit Bip 6 - jót olcsón
- Redmi Note 15 Pro+ - több plusz, mint mínusz
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- Samsung Galaxy A54 - türelemjáték
- Samsung Galaxy S22 Ultra - na, kinél van toll?
Új hozzászólás Aktív témák
-
vilag
tag
válasz
sztanozs
#2760
üzenetére
Az az érdekes, hogy ha megnézed a képet, az első oszlopban jó az alsó border (mondjuk ott történik egy automatikus sorszámozás).
A probléma egyébként akkor keletkezett amikor Win Xp-s (Office 2003) gépekről Win7-es (Office 2007) gépekre tértünk át.
Egyébként kódból már próbáltam ezt megoldani:
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
With Selection.Borders(xlEdgeLeft) 'Bal
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlEdgeTop) 'Felső
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlEdgeBottom) 'Alsó
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlEdgeRight) 'Jobb
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlInsideVertical) 'Belső függőleges
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End WithDe nem hozta a várt eredményt, szóval lehet még valahol valami turpisság a dologban.
Új hozzászólás Aktív témák
- Itt a Galaxy S26 széria: az Ultra fejlődött, a másik kettő alig
- iPhone-t használók OFF topikja
- Xbox Series X|S
- Windows 11
- PlayStation 5
- A TCL egyebek mellett egy 1040 Hz-re képes monitorral készül az idei évre
- Székesfehérvár és környéke adok-veszek-beszélgetek
- Formula-1
- Kormányok / autós szimulátorok topikja
- AliExpress tapasztalatok
- További aktív témák...
- DJI Mini 3 RC drón szett - újszerű állapotban, táskával
- Asztali PC , i7 9700 , RX 6600 XT , 16GB DDR4 , 512GB NVME , 1TB HDD
- Microsoft Xbox Series X 1TB Játékkonzol 2 konti (kiegészítőkkel)
- ZBook Fury 17 G7 17.3" FHD IPS i7-10850H RTX 3000 32GB 512GB NVMe ujjolv IR kam gar
- iPhone 13 512GB 100% (1év Garancia)
- Surface 3 - 13,5" 2k érintő, i5 1035G7, Iris Plus, 16GB RAM, SSD, jó akku, újszerű állapot, számla
- 170 - Lenovo Legion Pro 7 (16IRX9H) - Intel Core i9-14900HX, RTX 4090
- HIBÁTLAN iPhone 11 64GB White-1 ÉV GARANCIA - Kártyafüggetlen, MS4532,100% Akksi
- ÁRGARANCIA!Épített KomPhone i9 14900KF 32/64GB RAM RTX 5070 Ti 16GB GAMER PC termékbeszámítással
- HIBÁTLAN iPhone 13 Pro Max 256GB Gold -1 ÉV GARANCIA - Kártyafüggetlen, MS3685
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest


