oRpo
24-08-2008, 13:09
Devo aumentare la lunghezza di una colonna di una tabella di word usando vb (da access 2003).
Sostanzialmente devo fare ciņ:
http://img32.picoodle.com/data/img32/3/8/24/f_Untitled1m_9809494.jpg
Gli unici metodi di vb che conosco per formattare le celle di un tabella di word sono Range.Font.Bold, Range.Font.Size, Color e Name (riporto un pezzettino di codice qui sotto).
Penso ci sia un modo anche per settare la lunghezza di una cella, ma non lo conosco!
objSelection.Tables.Add objRange, 1, 2
Set objTable = objSelection.Tables(1)
objTable.Cell(1, 1).Range.Font.Bold = True
objTable.Cell(1, 1).Range.Font.Size = 14
objTable.Cell(1, 1).Range.Font.Color = 3464574
objTable.Cell(1, 1).Range.Font.Name = "Arial"
objTable.Cell(1, 1).Range.Text = "Inner Testo"
Qualcuno sa come aiutarmi? grazie!
---
risolto con objTable.Cell(1, 1).Range.Columns(1).Width = InchesToPoints(0.8) ^^' :eek:
Sostanzialmente devo fare ciņ:
http://img32.picoodle.com/data/img32/3/8/24/f_Untitled1m_9809494.jpg
Gli unici metodi di vb che conosco per formattare le celle di un tabella di word sono Range.Font.Bold, Range.Font.Size, Color e Name (riporto un pezzettino di codice qui sotto).
Penso ci sia un modo anche per settare la lunghezza di una cella, ma non lo conosco!
objSelection.Tables.Add objRange, 1, 2
Set objTable = objSelection.Tables(1)
objTable.Cell(1, 1).Range.Font.Bold = True
objTable.Cell(1, 1).Range.Font.Size = 14
objTable.Cell(1, 1).Range.Font.Color = 3464574
objTable.Cell(1, 1).Range.Font.Name = "Arial"
objTable.Cell(1, 1).Range.Text = "Inner Testo"
Qualcuno sa come aiutarmi? grazie!
---
risolto con objTable.Cell(1, 1).Range.Columns(1).Width = InchesToPoints(0.8) ^^' :eek: