Code to adjust column width
in [Programming]
|
Prev: a macro to copy only 2 lines w/i a cell separated by 4 line breaks
Next: Where is the problem on Next without For?
From: Rick Rothstein on 15 Apr 2010 22:43 I'm not sure why you say that... the code line I posted sizes each column in the range to the contents of the widest value in the column (which, unless I completely misunderstood what you were asking for, I believe is what your initial posting was suggesting you wanted to do). If you didn't already do so, give it a try and see how it works. -- Rick (MVP - Excel) "primed" <primed(a)discussions.microsoft.com> wrote in message news:556C62C8-4243-4645-8850-D88BDC28D688(a)microsoft.com... > I am not a programmer but that doesnt seem to take into account the values > in > row 8. > It will come in handy for something else though. > > Cheers > Primed > > "Rick Rothstein" wrote: > >> Why not let VB figure it out for you... >> >> Columns("E:AI").AutoFit >> >> -- >> Rick (MVP - Excel) >> >> >> >> "primed" <primed(a)discussions.microsoft.com> wrote in message >> news:FAB13FFF-37FD-44C7-9D3F-3111DAD7D65A(a)microsoft.com... >> > Hi, >> > >> > Can anyone help with code to do the following: >> > >> > Row E8:AI8 - each cell contains a value 0 to 100, generally a value of >> > 1 >> > to >> > 20. The total of the row is maximum 100. >> > I would like to adjust the width of the column based on the values for >> > each >> > column. >> > The minimum width would need to be 6 so text is still readable. >> > >> > Thanks in advance >> > >> > Primed >> >> . >>
From: primed on 21 Apr 2010 00:28 Hi Rick, Probably my poor communication skills are the issue. Columns E to AI need to be resized based on values in row 8 only. Other rows contain data that needs to be ignored. Your formula seems to resize the columns based on the value in all the rows. Regards Primed "Rick Rothstein" wrote: > I'm not sure why you say that... the code line I posted sizes each column in > the range to the contents of the widest value in the column (which, unless I > completely misunderstood what you were asking for, I believe is what your > initial posting was suggesting you wanted to do). If you didn't already do > so, give it a try and see how it works. > > -- > Rick (MVP - Excel) > > > > "primed" <primed(a)discussions.microsoft.com> wrote in message > news:556C62C8-4243-4645-8850-D88BDC28D688(a)microsoft.com... > > I am not a programmer but that doesnt seem to take into account the values > > in > > row 8. > > It will come in handy for something else though. > > > > Cheers > > Primed > > > > "Rick Rothstein" wrote: > > > >> Why not let VB figure it out for you... > >> > >> Columns("E:AI").AutoFit > >> > >> -- > >> Rick (MVP - Excel) > >> > >> > >> > >> "primed" <primed(a)discussions.microsoft.com> wrote in message > >> news:FAB13FFF-37FD-44C7-9D3F-3111DAD7D65A(a)microsoft.com... > >> > Hi, > >> > > >> > Can anyone help with code to do the following: > >> > > >> > Row E8:AI8 - each cell contains a value 0 to 100, generally a value of > >> > 1 > >> > to > >> > 20. The total of the row is maximum 100. > >> > I would like to adjust the width of the column based on the values for > >> > each > >> > column. > >> > The minimum width would need to be 6 so text is still readable. > >> > > >> > Thanks in advance > >> > > >> > Primed > >> > >> . > >> > . >
From: Rick Rothstein on 21 Apr 2010 01:29
Ah, I missed the Row 8 part. Give this a try then... Range("E8:AI8").Columns.AutoFit -- Rick (MVP - Excel) "primed" <primed(a)discussions.microsoft.com> wrote in message news:06B8210D-6805-47A7-AEA2-1401D67948A2(a)microsoft.com... > Hi Rick, > > Probably my poor communication skills are the issue. Columns E to AI need > to > be resized based on values in row 8 only. Other rows contain data that > needs > to be ignored. > > Your formula seems to resize the columns based on the value in all the > rows. > > Regards > Primed > > "Rick Rothstein" wrote: > >> I'm not sure why you say that... the code line I posted sizes each column >> in >> the range to the contents of the widest value in the column (which, >> unless I >> completely misunderstood what you were asking for, I believe is what your >> initial posting was suggesting you wanted to do). If you didn't already >> do >> so, give it a try and see how it works. >> >> -- >> Rick (MVP - Excel) >> >> >> >> "primed" <primed(a)discussions.microsoft.com> wrote in message >> news:556C62C8-4243-4645-8850-D88BDC28D688(a)microsoft.com... >> > I am not a programmer but that doesnt seem to take into account the >> > values >> > in >> > row 8. >> > It will come in handy for something else though. >> > >> > Cheers >> > Primed >> > >> > "Rick Rothstein" wrote: >> > >> >> Why not let VB figure it out for you... >> >> >> >> Columns("E:AI").AutoFit >> >> >> >> -- >> >> Rick (MVP - Excel) >> >> >> >> >> >> >> >> "primed" <primed(a)discussions.microsoft.com> wrote in message >> >> news:FAB13FFF-37FD-44C7-9D3F-3111DAD7D65A(a)microsoft.com... >> >> > Hi, >> >> > >> >> > Can anyone help with code to do the following: >> >> > >> >> > Row E8:AI8 - each cell contains a value 0 to 100, generally a value >> >> > of >> >> > 1 >> >> > to >> >> > 20. The total of the row is maximum 100. >> >> > I would like to adjust the width of the column based on the values >> >> > for >> >> > each >> >> > column. >> >> > The minimum width would need to be 6 so text is still readable. >> >> > >> >> > Thanks in advance >> >> > >> >> > Primed >> >> >> >> . >> >> >> . >> |