ciao a tutti chiedo una grossa mano per una macro che sto scrivendo. Vorrei ottenere che le righe e le colonne del foglio xls vengano formattare nella larghezza/altezza giusta. Purtroppo con la stringa che vi riporto sotto mi sistema solo le righe. Cosa sto sbagliando ? Il foglio di xls si chiama riordino cosi come il nome del file.
sub Main Dim Doc As Object Dim Sheet As Object Dim Row As Object Dim Col As Object Dim I As Integer Doc = StarDesktop.CurrentComponent Sheet = Doc.Sheets(0) For I = 0 To 4 Row = Sheet.Rows(I) Row.OptimalHeight = True Next I For I = 0 To 60 Col = Sheet.Col(I) Col.OptimalWidth = True Next I end subGrazie mille Riccardo![]()