Kirjautuminen

Haku

Tehtävät

Keskustelu: Ohjelmointikysymykset: VBA: MSHFlexGrid:in 'otsikot'

Sinis [17.09.2006 19:10:44]

#

Olen tehnyt otsikon mukaisella komponentilla taulukon, jossa 1.rivi ja 1.sarake pitää sisällään matriisin indeksit.

Rivien otsikot tein noin:

For x = 1 To 10
    grid1.TextMatrix(x, 0) = x
Next x

Ja vastaavalla tavalla sarakkeiden otsikot.

Taulukon sisällön sain keskitettyä seuraavasti:

For x = 0 To 3
    grid1.ColAlignment(x) = flexAlignCenterCenter
Next x

kuten halusin, mutta ongelmana on se, että en saa noita otsikkorivejä keskitettyä. Eli esim. sarakkeiden otsikot makaavat solun reunassa. Miten saan otsikkorivit keskitettyä???

vp [21.09.2006 21:17:08]

#

Muuta ensimmäinen for lause näin:

grid1.Col = 0
For x = 1 to 10
    grid1.TextMatrix(x,0)=x
    grid1.Row = x
    grid1.CellAlignment = flexAlignCenterCenter
Next x

Sinis [22.09.2006 09:55:29]

#

Kiitokset avusta! Onko muuten mahdollista paksuntaa MSHFlexGridin tietyn rivin/solun alaviivaa. Saan kyllä kaikki viivat leveämmiksi, mutta tuo em. homma ei oikein onnistu. Selventäisi hieman taulukon ulkonäköä, jos esim. yhteenlaskun tulos olisi hieman paksumman viivan alapuolella.

vp [22.09.2006 11:48:53]

#

Tuo rivien paksuntaminen ei ole tullut vielä vastaan, joten kerrotko miten saat kaikki viivat leveämmiksi niin vastaus voi löytyä yksittäisen viivan leventämiseen.

Sinis [22.09.2006 12:34:09]

#

Toi alla oleva rivi leventää kaikki taulukokon gridlinet pl. otsikkorivi/-kolumni.

grid1.GridLineWidth = 2

vp [22.09.2006 12:56:26]

#

En keksi siihen yksittäisen rivin tai solun alaviivan muuttamiseen ratkaisua.
Mutta tällä pystyy haluttua riviä korostamaan.

Grid1.Row = 3
For i = 0 To 3
    Grid1.TextMatrix(3, i) = i
    Grid1.Col = i
    Grid1.Font.Bold = True
    Grid1.Font.Underline = True
Next i

Sinis [22.09.2006 13:53:51]

#

Jep. Ei taida sellaista ominaisuutta olla olemassa.

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Tietoa sivustosta