Recent content by RRAnthon

Thanks for the responses, I'll experiment with your suggestions over the weekend. To those who celebrate, Merry Christmas!

Ok, a little more info (this is a PITA, since I don't have Win2007 installed). .ActiveSheet.Shapes("Text Box 2").Select .Selection.Characters.Text = Mid(txtBHEnvFactors.Text, 1, 200) Do Until i > Len(txtBHEnvFactors.Text) i = i + 200...

Yes, it's pointing to 9.0. Public Sub ExportToExcel(ByRef oXls As Excel.Application)

Hey, Skip, thanks for taking a look. Yes, there's data in there. Forgot to add this. 'Environment Factors .ActiveSheet.Shapes("Text Box 2").Select .Selection.Characters.Text = Mid(txtBHEnvFactors.Text, 1, 200)

Howdy folks, Got an existing VBA app that runs an export to excel. Works perfectly fine in excel 2003, fortunately one of my testers has recently had Office 2007 installed and when testing, gets the 'Run-time error 1004, Unable to get the Characters property of the Textbox class.' Do Until i...

Thanks to everyone for their assistance, I got the issue resolved. It's basically Andy's code with some variation that you can see if you cut and paste into a new form. I had existing indices that I also had to capture and place in the row, although the columns are not consecutive. Works...

Peter, Yes it does. I'm trying to use Andy's method. Right now the user can select from a combo box a value which sets up the selection criteria for the second column list box. Once the selection(s) are made in the list box in the second column, I need to populate the grid with the first...

Wow, thanks guys. Bear with me while I chew this over and see which works for me. I'll respond soon.

Andy, thanks for jumping on that, and you got most of it right off the bat. The only thing I'm not getting is how to iterate each row. With your response, how do I take the first new row, add it with the selection, then continue until the fifth selection?

Checked the FAQs and came up empty, so if this has been done before, please set me straight. In a nutshell, I'm using a multi-select list box, the second column in the grid (the data displayed based on the selection in the first column, a combobox). When I select multiple items, I need to add...

Score! Thanks tsuji, that did the trick. Only had one glitch, which was I needed to preface the while with the parent element: If xtr.Name "Quote_Coverages" then then the readtofollowing "Quote_Coverage" and the rest worked perfectly. Thanks again.

Thanks for that, I can't wait to get in and try this. I'll let you know.

I'm using XMLReader, so far so good. However, my problem is I need to parse out a subnode and cannot figure out how to use the XMLReader to do that. My code: If xtr.Name = "Quote_Coverage" Then xtr.MoveToAttribute("Quote_Coverage_Id") xml_MessageArray.Quote_Coverage_Id = xtr.Value...

Wow, nobody likes the Out of Stack Space prob. I have read up on SS problems and verified that I do not have any recursive functions running. This problem may just be a hosed CR install. I'm reloading. Thanks for reading.

Hello all, I'm looking for some ideas for a problem that has just manifested itself. I have a CR that worked perfectly fine yesterday. Today I made some changes to it, basically overhauling data elements. When I open my project using VB, and run the report, it works. If I close the app to...