Text)) Another wrong approach is to keep global variables for reuse like your Ole Db Connection, Ole Db Command. End Using End Using Dim connection As Sql Connection = As New Sql Connection("Your Db Connection") Dim command As Sql Command = connection. Check out Excel 2013 Power Programming with VBA [email protected] whom it may concern, To my opinion - pressing: Ctrl Alt F5 is the most quickest way to Refresh *ALL* Pivot Tables in the active workbook.-------------------------- Michael (Micky) Avidan“Microsoft® Answers" - Wiki author & Forums Moderator“Microsoft®” MVP – Excel (2009-2017)ISRAEL Further to the comment above I put the "Refresh All" icon in the 'Quick Access Toolbar' so it is always visible.This tip (2287) applies to Microsoft Excel 97, 2000, 2002, and 2003.You can find a version of this tip for the ribbon interface of Excel (Excel 2007 and later) here: Updating Multiple Pivot Tables at Once. John Walkenbach's name is synonymous with excellence in deciphering complex technical topics. Spreadsheet" shows how to maximize your Excel experience using professional spreadsheet application development tips from his own personal bookshelf. Command Text = "INSERT INTO Leadss(S_No) VALUES (@S_No)" command. Close() End Try Using conn = New Ole Db Connection("Provider=Microsoft. OLEDB.12.0; Data Source='C:\Users\user\Documents\Visual Studio 2008\Projects\demo for db in access\demo for db in access\Databasefor Demo.accdb'") Using cmd = New Ole Db Command() conn.
Command Text = "INSERT INTO Leadss(S_No, Contact_Person, Mobile_No, Email_Id, Description, First_Follow_Up, Remarks, L_Date, Alternate_no)VALUES('" & lbl No.
Instead you should follow this approach Using conn = New Ole Db Connection("Provider=Microsoft. OLEDB.12.0; Data " "Source=|Data Directory|\Ind Global DB.accdb;" "Persist Security Info=True; Jet OLEDB: Database Password=admin") Using cmd = New Ole Db Command() conn.
This prevent the runtime to dispose these objects when not used.
If you do a lot of work with multiple Pivot Tables, you may want to assign the macro to a shortcut key, a toolbar button, or to a menu option so that you can run it easier.
(Information on how to assign macros to toolbars, shortcut keys, and menus is covered in other issues of Excel Tips.) Excel Tips is your source for cost-effective Microsoft Excel training.
I have checked most of the forums on this site but I didn't get my Solution. Load conn = New Ole Db Connection("Provider=Microsoft. OLEDB.12.0; Data Source=|Data Directory|\Ind Global DB.accdb; Persist Security Info=True; Jet OLEDB: Database Password=admin") lbl Date.