How can I increase the row height of excel row from vb.net code?

Question

4.00/5 (1 vote)

See more:

How can I increase the row height of excel row from vb.net code?
I have this code which is not working. No error is coming.
Width section is working fine..

VB

Dim _xl As New Excel.Application
           Dim _xlBook As Excel.Workbook
          Dim _xlSheet1 As Excel.Worksheet 
          _xlSheet1.Rows("1:1").rowheight = 100
           _xlSheet1.Columns(1).ColumnWidth = 15
           _xlSheet1.Columns(2).ColumnWidth = 34

Posted 9-Aug-12 23:38pm

Rahul K Singh

Add a Solution

3 solutions

Solution 1

Have you tried this with:

VB

Dim _xl As New Excel.Application
Dim _xlBook As Excel.Workbook
Dim _xlSheet1 As Excel.Worksheet

_xlSheet1.Rows(1).RowHeight = 100 ' This will set the height for row number 1
_xlSheet1.Columns(1).ColumnWidth = 15
_xlSheet1.Columns(2).ColumnWidth = 34

Hope that helps!

Regards,

Manfred

Posted 10-Aug-12 0:55am

Manfred Rudolf Bihy

Comments

Rahul K Singh 10-Aug-12 6:59am

No... its not working.. i have Googled a lot.. it is also giving the similar solution... but it is not working for me...

Kenneth Haugland 10-Aug-12 9:47am

Look here:
http://msdn.microsoft.com/en-us/library/office/ff196952.aspx

What MAnfred showed you is how you are supposed to do this, if it does not solve your problem, then you did something else wrong. I personally think it has to do with the range you are inserting in the row...

Maciej Los 10-Aug-12 16:11pm

It's not working, because your code is not complete. See my answer.

Solution 2

'set the RowHeight=25 of the first row

VB

_xlSheet1.SetRowHeight(1, 25)

Posted 10-Aug-12 1:10am

dhavalmore13986

Updated 10-Aug-12 10:19am

v2

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 · Accepted Answer · 2012-08-10T10:15:00

Solution 4

VB

Dim _xl As New Excel.Application
Dim _xlBook As Excel.Workbook
Dim _xlSheet1 As Excel.Worksheet

_xlBook  = _xl.Workbooks.Open("fullpathtothefile.xls") 'or: New Workbook
_xlSheet1 = _xlBook.WorkSheets(1) 'or _xlBook.WorkSheets("NameOfSheet")

_xlSheet1.Rows("1:1").RowHeight = 100
_xlSheet1.Columns(1).ColumnWidth = 15
_xlSheet1.Columns(2).ColumnWidth = 34

Do you see the difference?

Posted 10-Aug-12 10:15am

Maciej Los

Comments

Kenneth Haugland 10-Aug-12 20:03pm

Ill give you a 5 for that :)

Maciej Los 13-Aug-12 13:14pm

Thank you, Kenneth ;)