autosize cell height in a Flexgrid according to cell contents

Question

0.00/5 (No votes)

See more:

Hi,
I'm trying to adjust the cell height of a flexgrid according the the cell contents.

for example:

if I enter a string that is too long to fit in a cell , I would like to have the flexgrid adjust the cell height according to how many linesthat string would take.

bear in mind that i don't want to change the column width & I am using VBA not VB

I am using an excel.xlsm work book and working from the VBE (alt+F11) with a user form
the user form controls :
A Flexgrid,
A Text box with (multLine/enterkeybehavior/Wordwrap) properties set to =True,
A command button

the way I have set it up to work:
the user clicks on a cell in the flexgrid,
this will make the text box visible
user enters a text in the text box
user clicks the command button , it transfers the contents of the text box to the cell of the flexgrid)

could someone help shed some light on How do I add code to wrap the string in the flexgrid cell or provide a sample code .

any help is much appreciated.
Regards

Posted 20-Feb-13 0:50am

GH71

Updated 20-Feb-13 0:55am

CHill60

v2

Add a Solution

Comments

CHill60 20-Feb-13 6:55am

I've amended the tags on your question from "VB6" so that the appropriate people will actually look at the question

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Maciej Los · Answer 1 · 2013-04-19T11:47:00

To change width of column, try this:

VB

MSFlexGrid1.ColWidth(index) = 1250

To add text to FlexGrid control:
1) increase the number of rows

VB

Dim i As Integer
i = Flex1.Rows +1
Flex1.Rows = i

2) add text to first column

VB

With Flex1
    .Row = i-1 'the last one
    .Col = 0 'first column
    .Text = TextBox1.Text

End With

http://msdn.microsoft.com/en-us/library/aa228849%28v=vs.60%29.aspx[^]