Ú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
- Gamer PC-Számítógép! Csere-Beszámítás! Ultra 5 245KF / RTX 5060 / 16GB RGB DDR5 / 1TB Nvme SSD
- Samsung Galaxy S26 Ultra Pitaka tok, üvegfólia
- HP ProDesk 600 G5 i5-9500 16GB 512GB 1 év garancia
- LG UltraGear 27GR95QE-B 240 Hz OLED 2560x1440 Gamer Monitor 6 hó garancia Házhozszállítás
- GYÖNYÖRŰ iPhone 15 Pro Max 256GB White Titanium -1 ÉV GARANCIA - Kártyafüggetlen, MS4694
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
