This is a guest post by Vijay, our in-house VBA Expert.
Often I have thought, if I could have write “Select EmployeeName From Sheet Where EmployeeID=123” and use this on my excel sheet, my life would be simpler. So today we will learn how to do this.
People spend a lot of time thinking whether to use Excel as their database or not. Eventually they start using Access or SQL Server etc.
Today we will learn how to use Excel as a Database and how to use SQL statements to get what we want.
Excel as a Database – Demo
We will learn how to build this:
Before we begin:
- The entire sheet (where the raw data has been stored) will be referred as one single database table by Excel. This is very important to understand.
- This has nothing related with the in-built Table (2007 and greater) / List (2003 and previous) feature of Excel.
- If you know SQL (Structured Query Language) your task becomes much easier.
Setting up Excel as Database
We need some raw data and we will utilize Customer Service Dashboard sample database here.
Let’s get started.
First we will design the structure of what all option we want to present for filtering the data, which you can see in the interface below.
Once the user clicks on Show Data we will use a SQL statement to filter-out the data as per the drop down options selected by the user and the put them in the table below.
We will also use another SQL statement to populate the top right hand side table for calls data when all the 3 drop downs have some options selected.
Adding Active-x data objects reference
We need to add a reference to the Microsoft ActiveX Data Objects Library to be able to use the worksheet as a database table. You can do this from Visual Basic Editor > Tools.
I usually select the most recent version, however if you are developing a product it will be best suited if you are familiar with the operating system and office version used by the end-user’s system and accordingly select the best version available.
Opening Excel as a Database
Once this is done we need to hit the road with some VBA code.
Public Sub OpenDB()
If cnn.State = adStateOpen Then cnn.Close
cnn.ConnectionString = "Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};DBQ=" & _
ActiveWorkbook.Path & Application.PathSeparator & ActiveWorkbook.Name
cnn.Open
End Sub
The above procedure is the heart of this post, this is where we define how to use the current Excel workbook as our database.
cnn.ConnectionString = "Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};DBQ=" & _
ActiveWorkbook.Path & Application.PathSeparator & ActiveWorkbook.Name
On this line, we define all the possible file extensions that we are allowed to create an Excel Workbook and then use as our database.
Let’s understand the code module
When you click on the Update Drop Downs button, the VBA code uses the “Data” worksheet as a table and then finds unique values for Products, Region and Customer Types and then populates them as ListItems for the ComboBox controls.
Example for Products drop down
strSQL = "Select Distinct [Product] From [data$] Order by [Product]"
closeRS
OpenDB
cmbProducts.Clear
rs.Open strSQL, cnn, adOpenKeyset, adLockOptimistic
If rs.RecordCount > 0 Then
Do While Not rs.EOF
cmbProducts.AddItem rs.Fields(0)
rs.MoveNext
Loop
Else
MsgBox "I was not able to find any unique Products.", vbCritical + vbOKOnly
Exit Sub
End If
What is important to notice here is how the Table and Fields have been identified using square brackets unlike traditional SQL where we just provide the name, also the table name has to be suffixed with a $ symbol at the end.
As I have suggested earlier, one entire sheet will be treated as one single table, so if you have multiple datasets that were currently organized within one sheet you may have to create multiple sheets to store that data to be able to use them as tables. This would also make maintenance of data easier.
Using Excel SQL to consolidate two sheets in to one
Many people ask, how to consolidate 2 or more sheets which have the similar data. Well I would have adopted this method and wrote a simple query as below.
SELECT ID, FirstName, MiddleName, LastName, Age, DOB From [Table1$]
UNION ALL
SELECT ID, FirstName, MiddleName, LastName, Age, DOB From [Table2$]
This would allow me to use both the sheets as one table and fetch all of my data into a new sheet.
Download Excel As Database Demo File
Click here to download the demo file & use it to understand this technique.
Do you use Excel as a database?
Do you also user Excel as your database? If yes please put in the comment below how do you use the same and what has been your experience. Leave a comment.
More on VBA & Macros
If you are new to VBA, Excel macros, go thru these links to learn more.
Join our VBA Classes
If you want to learn how to develop applications like these and more, please consider joining our VBA Classes. It is a step-by-step program designed to teach you all concepts of VBA so that you can automate & simplify your work.
Click here to learn more about VBA Classes & join us.
About Vijay
Vijay (many of you know him from VBA Classes), joined chandoo.org full-time this February. He will be writing more often on using VBA, data analysis on our blog. Also, Vijay will be helping us with consulting & training programs. You can email Vijay at sharma.vijay1 @ gmail.com. If you like this post, say thanks to Vijay.
14 Responses to “How to Add your Macros to QAT or Excel toolbars?”
We have only just got excel 2007 so this is helping me navigate my way through the differences cheers.
For Macro's i always add a Command Button, rename it something obvious, change the colour of it and finally add the following to its View Code section.
Application.Run "MAcro1"
This way anyone opening the file knows what to do if i ever win the lottery and dont make it in 🙂
Hi,
Good article. But I have this problem.
1) Customized QAT with a macro. Macro name = MacroX
2) Runs OK from original location (e.g. C:\TestLoaction1\TestFile.xls)
3) Copy past file to new location (e.g. C:\TestLoaction2\TestFile.xls)
Menu button now fails:
Cannot run the macro "C:\TestLoaction1\TestFile.xls'!MacroX' The macro may not be available in this workbook...
Of course the code is there, and macros are enabled.
Could get it to work after deleting and recreating macro custom buttons. So have to re-assign macro to QAT button every time I move the file?
If I put a form button on he worksheet and assign the macro to that, it's location independent.
Any ideas?
Thanks
@Ron
What you have said is correct
Macros within a worksheet are stored within the worksheet and hence follow it.
Macros referenced by a button in the QAT or elsewhere are locaed in a file and if that file is moved the linkages don't follow.
The easiest way around this is to store all your macros in a location that doesn't move and is in fact reloaded everytime that Excel starts and that is called the Personal.xlsx/b file.
These are refered to several time at Chandoo.org or have a read of
http://www.rondebruin.nl/personal.htm
or
http://office.microsoft.com/en-us/excel-help/deploy-your-excel-macros-from-a-central-file-HA001087296.aspx
In Excel 2003 and prior versions, a button added to the Toolbar maintained a DYNAMIC link to the file (e.g. Personal.xlsb) holding the assigned macro, such that if the file was relocated for any reason (by using Excel's native Save As command rather than just moving it via Windows Explorer), the link between the button and the file was updated.
I expected the same to occur with Excel 2007+, but alas, Microsoft in their infinite wisdom have removed another feature useful to advanced users (just as they did by removing the ability to design your own buttons)!!
So having just done some reorganisation of my files, I now have to remove and recreate every friggin macro button on my QAT (I have lots) - what a pain in the proverbial!!
Hi Hui,
Thanks for the help, that's really useful.
1) The macros I'm adding are for one specific Excel application, so I really wanted the macros to follow the file
2) I didn't want to have to pass other files around too and have users installing those - either Personal.xlsx/b or as an Add-In.
3) I realise now that the QAT additions will appear for other Excel workbooks in which I don't want the macros available.
So, it looks like I need to keep it local, by using a button on the worksheet. Unless you can suggest any way of adding to menus just for a specific workbook.
Thanks again for your help. Great site, so I'll be signing up for the emails.
Ron
I know I'm a little late jumping on this post, but wondering if anyone knows how to add a UDF to the QAT? I've saved my UDF in my personal workbook, but it does not show up in my list when I choose Macros when customizing my QAT. Suggestions? Thanks!!
@Cheryl: UDFs cannot be accessed like Macros. You can use them from other macros or from worksheet cells as formulas...
@David: If you save your macros file and then install it as an add-in then it will be always available for you.
The instructions work great when you are creating a new file, and it is still open. I find that I can't access macros after I've saved a file as an xlam and closed it. When I reopen the xlam, either by browsing to it, or by having it set to open as an addin using Excel Options, the macros are no longer available in the macros list when I go to edit the QAT. Any way around that?
[...] Add this macro as a button to Quick Access Toolbar [...]
I need to create a button that will run a macro. Once you click the button it needs to open up a browser asking you to select a report/file. Once you select the file, it will run the macro on the selected file and then save it as a new report with a name and the current date. I created the macro to sort/modify the report but I do not know how to do what I mentioned above. I hope this makes sense.
I'm having trouble adding a macro to the QAT. I've done everything up to step 5 but my macro isn't showing up. What am I doing wrong?
[...] Add Macros to Quick Access Toolbar (works in Excel 2003 & above) [...]
Hi,
Thank you for the explanation. Very useful for a recent switcher from office 2003 to office 2010.
My follow-up question is: in Excel (or ppt) 2010, can you customize the macro button that you put in the QAT?
In office 2003, once you chose the custom button for your Macro, you could then edit pixel by pixel the said button.
For instance, I've created 2 Macros in PPT that are converting all my slides to either English or French language, so I'd like one button to show EN and the other FR... that would be more meaningful that any of the possible "custom" office 2010 buttons
I read all the post and one important aspect to the QAT was never mentioned. That is, you have a macro driven worksheet that you want to share with other. You have customized the QAT with two icons to run the macros (VBA programs in reality). However, when the others receive the workbook, the icons are no where to be found. It's my understanding those "customized buttons" have been saved to an outside file, Excel.qat. QUESTION: Could one simply attach that file to your email, along with the worksheet, and tell the recipients to copy that file to correct location on their computer - C:\Users\\AppData\Local\Microsoft\Office|\
Would the customize macro buttons then appear in the worksheet and, more importantly, work? Thanks for your thoughtfulness and thanks for well written instructions Chandoo!
MortW