excel vba run-time error 3704 Cullom Illinois

Address Chebanse, IL 60922
Phone (815) 697-3900
Website Link

excel vba run-time error 3704 Cullom, Illinois

HTH z I've connected to the SQL server database using .ActiveConnection = ConnecttoGEVS It calls the following: VB: Private Function ConnectToGevs() As ADODB.Connection Dim oConn As ADODB.Connection Dim sConnStr As String Check the debug code and see if it stopping there, implying the connection isn't open. Going to be away for 4 months, should we turn off the refrigerator or leave it on with water inside? Any ideas?

Not the answer you're looking for? Removing it, I encounter the same error. VB: Private Function SQLStatement(dAlphaDate As Date, dReturnDate As Date, sedol As String, portID As Integer) As String Dim sSql As String sSql = sSql & "select distinct AS_OF_DATE into #hold_dates from Basically, what happens is between this piece of code rst.Open sSQL, sConn Formatting tags added by mark007 and ths piece rg.CopyFromRecordset rst Formatting tags added by mark007 it appears that the

I think that this is because the stored procedure that I am calling uses some SELECT ... Join them; it only takes a minute: Sign up VBA run time error 3704 with recordset in Excel up vote 0 down vote favorite Good day. INTO staement generates a recordset (I think!). I've tried executing the stored procedure as three seperate commands, but the commands involve using temporary tables on the SQL Server which seems to disappear befire I can requery them.

I found that if I set SET NOCOUNT ON within the stored procedure and I was not printing anything else to the Messages tab within SQL Server - this error no Registration is fast, simple and absolutely free . Since the query inside it was throwing an error, the front end Excel (macro) immediately caught that error and the record set object was closed. The recordset should contain a couple of hundred records that come from a stored procedure I wrote using SQL Server 2008 R2.

When you get the error message, what specific line is highlighted when you debug? share|improve this answer answered Apr 11 '14 at 17:17 user3508511 7818 add a comment| Your Answer draft saved draft discarded Sign up or log in Sign up using Google Sign Does anyone know if there is a way round it? How to make files protected? (KevinC's) Triangular DeciDigits Sequence Is the NHS wrong about passwords?

Many thanks! Don't paste the password for your sa account in a public forum ;) –cboden Nov 26 '15 at 10:48 Hi thanks for the response. Removing elements from an array that are in another array What is that the specific meaning of "Everyone, but everyone, will be there."? In this instance however, when I try to copy the contents of the recordset to the target range (using the Range.CopyFromRecordSet method) I get the following error message: Run-time error '3704':

View our list of code downloads. The above says to me that your recordset is closed. HTH z Excel Video Tutorials / Excel Dashboards Reports Reply With Quote December 21st, 2007 #3 londonjer View Profile View Forum Posts I agreed to these rules Join Date 13th December you can't set an active connection if it's not open in the first instance...

share|improve this answer answered Apr 7 '14 at 21:56 ron tornambe 5,91731938 add a comment| up vote 0 down vote accepted Tracked down the problem. Developer Network Developer Network Developer :CreateViewProfileText: Sign in MSDN subscriptions Get tools Downloads Visual Studio MSDN subscription access SDKs Trial software Free downloads Office resources SharePoint Server 2013 resources SQL Server Click here to view the relaunched Ozgrid newsletter. Posts: 3 Thanks: 0 Thanked 0 Times in 0 Posts run-time error '3704' Hello, sorry maybe my topic is repeat other but I can't find out any answers.

more stack exchange communities company blog Stack Exchange Inbox Reputation and Badges sign up log in tour help Tour Start here for a quick overview of the site Help Center Detailed Search: Advanced Forum Search Forums Programming Web Development Computers Tutorials Snippets Dev Blogs Jobs Lounge Login Join! Private Sub LblAllot_Click() Dim counter As Integer, cn As New ADODB.Connection, ssql14 As String counter = 0 DB_Open_Connection For i = 0 To lstClaimLineList.ListCount - 1 If lstClaimLineList.Selected(i - counter) Then The time now is 03:42 AM.

To start viewing messages, select the forum that you want to visit from the selection below. Home Bookstore/E-Books P2P Programmer Forums Wrox Blogs Connect with Wrox Code Resources International IT Certifications Navigation Register Now View Active Topics View Archives View Unanswered Topics Wrox Programmer Forums The time now is 17:42. So there should be records. –GlennW Mar 5 '14 at 21:49 Well for some reason the same isnt being fetched from VBA ...

Log in or Sign up Chandoo.org Excel Forums - Become Awesome in Excel Home Forums > Forums > VBA Macros > Welcome to Chandoo.org Forums. Reply With Quote May 16th, 2009,12:51 PM #7 Siddharth Rout View Profile View Forum Posts Visit Homepage Super Moderator Join Date Feb 2005 Location Mumbai, India Posts 11,940 Re: VBA-Excel error display records one by one rather than pasting it in Excel at once? How to get this substring on bash script?

If you don't like Google AdSense in the posts, register or log in above. Wanted the snippet to resemble the code as close possible. –Thabang Keele Nov 26 '15 at 11:35 add a comment| 1 Answer 1 active oldest votes up vote 0 down vote If it is not, then I would recommend checking your stored procedure and ensure it is not the closing the connection.

"Nothing can stop the man with the right mental attitude Advanced Search VBForums Visual Basic Office Development VBA-Excel error 3704- operation is not allowed when the object is closed If this is your first visit, be sure to check out the

To start viewing messages, select the forum that you want to visit from the selection below. List Files by User-Defined Extensions Sending Data From MSFlexGrid To Excel in VB6 Send Data To Excel Using VB6 Folder Hider Masked Edit Control VB6 Create own User control - Basic Set Cmd1 = New ADODB.Command Cmd1.ActiveConnection = cn Cmd1.CommandText = "sprocgetActuals" Cmd1.CommandType = adCmdStoredProc Cmd1.Parameters.Refresh Cmd1.Parameters(1).Value = 2009 Cmd1.Parameters(2).Value = "mphillips" Cmd1.Parameters(3).Value = "January" Cmd1.Parameters(4).Value = "February" Cmd1.Parameters(5).Value = "March" Cmd1.Parameters(6).Value Members Members Quick Links Notable Members Current Visitors Recent Activity Menu Search Search titles only Posted by Member: Separate names with a comma.

Here my code: Code: Dim sDate1 As String Dim sDate2 As String Dim sClid As String sDate1 = "2005-01-01" sDate2 = "2005-12-31" sClid = "0001" Dim conG As ADODB.Connection Set conG Here is my code: VB: Sub DownloadData() Dim sedol As String Dim iNoPeriod As Integer Dim adoRs As ADODB.Recordset Dim adoComm As ADODB.Command Dim arrDates(100) As Variant Dim iCtr As Integer