Skip, Sorry for the confusion, I meant delete de rows.
Fire, I tried this but it gives me the error that says
"Exeption from HRESULT: 0x800A02EC
Check the ErrorCode property of the exception to determine the HRESULT returned by the COM object.
Get general help for this exception.
Hi I update an excel worksheet from vb.net.
Sometime, I would like to take off some rows in this worksheet for example, row 20 to row 32.
How can I make it?
Dim exPoolSchedule As New Excel.Application
Dim wbPoolSchedule As Excel.Workbook
Dim wsPoolSchedule As Excel.Worksheet
wbPoolSchedule =...
Hi
I have a form with AxMsFlexGrid in it. I would like to make a copy of all components in this form and paste it in another form. When I'm trying to paste the axmsflexgrid I receive and error that says
An error occured while processing this command.
Exception from HRESULT: 0x800A018A...
Ok I tried it
...
Case "945" '2.15.9.9.5
SimpleInsertTable(StringDr("Message"))
...
Private Sub SimpleInsertTable(ByVal sText As String)
Dim tablenew As Word.Table
With wrd.Selection
With .Font
.Name = "Arial"...
hi
I would like to be able to enter a table in a word document. I tried this:
With wrd.Selection
With .Font
.Name = "Arial"
.Size = 12
.Bold = False
End With
.Tables.Add(wrd.Selection.Range, 6, 3)
But After...
ok
I got it,
I don't know what I did wrong yesterday but today this is working.
PHV your code was right. Sorry about that
so here is my code
Private Sub SimpleBoldNumberMaster(ByVal sText As String)
With wrd.Selection
With .Font
.Name = "Arial"...
OK now look what I've done
Sub Test()
wrdtest = New Word.Application
doctest = wrdtest.Documents.Add()
rngtest = doctest.Range()
TopicNumberTest("bob")
TopicNumberWithoutBoldTest("Bob2")
doctest.SaveAs(Path & "\" & "Test3.doc")
End Sub...
OK now look what I've done
Sub Test()
wrdtest = New Word.Application
doctest = wrdtest.Documents.Add()
rngtest = doctest.Range()
TopicNumberTest("bob")
TopicNumberWithoutBoldTest("Bob2")
doctest.SaveAs(Path & "\" & "Test3.doc")
End Sub...
fumei
When I execute exacly your code I got an error on this line "rngtest = ActiveDocument.Range(Start:=0, End:=0)"
The error I have is "Object reference not set to an instance of an object."
The only things that I change is I replace the "ActiveDocument" for "doctest" that is declare as...
First
wrd = New Word.Application
wrd.Visible = False
The wrd is a public variable. Of course it shouldn't be there. Thanks for that.
Now my sort is ok, I put this line in commentary
rngtest = doctest.Range(Start:=0, End:=0)
I have many procedure like "TopicNumberTest". Some put my text in...
OK, Now I posted it in the vb.net forum but they told me to post it here.
So now I don't have the order issue anymore as I took off this line in "TopicNumberTest"
"rngtest = doctest.Range(Start:=0, End:=0)"
But I don't have my Bold anymore.
Can anyone tell me why?
Hi
I'm trying to create a word document and put text in it. but it seems like it print the end at the beginning and the beginning at the end.
This is my example:
Private Sub PrintTest()
Dim StringDv As DataView
Dim StringFilter As String
Dim StringDr As DataRowView...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.