An MSForms (all VBA) treeview; Examples
This page displays some examples where our treeview has been used.
RefTreeAnalyser
Our RefTreeAnalyser also implements the treeview control, as you can see here:
The City Of Amsterdam
The Engineering Desk of the City of Amsterdam has implemented our Treeview in a VBA driven tool which is used by the technical designers of the Engineering desk so their drawings comply with the Dutch CAD standard NLCS. This is what the treeview looks like in their software:
Extended Project Explorer
(by Peter Thornton)
The purpose of this file is to show a few ways how the VBA Treeview can be used in a real life app. The treeview lists projects and modules similar to the VBE's (Visual Basic Editor) Project Explorer, but the branches are extended to list procedures and declarations. These can be double clicked and in turn activated in the VBE.
Other features include routines to search the treeview, return details of the treeview to a sheet to document projects, and more. Please refer to the main demo files for the most recent version of the VBA Treeview.
It looks like this:
Access and Word users: please note documentation is included in the main Excel demo.
Download The Extended Project Explorer V1.0 (Updated Dec 04, 2013, downloaded: 5.149times)
Access Archon article
Description: Helen Feddema from Access Watch published an Access Archon article with a sample .accdb database using the Treeview alternative that works in 64-bit Office; also includes a sample .mdb database that uses the native Treeview control.
XER toolkit
The XER Toolkit is an MS Excel based application that can read, display and analyse data from Oracle's Project Management application, Primavera. The toolkit helps to improve the quality of project schedules by providing visibility without the requirement for (expensive) Primavera licences. As an enterprise system, the data within Primavera is hierarchically arranged and so the Treeview developed by JKP has become an integral and essential part of the toolkit's data access functionality. See the video. One of the screens in the tool:
Spanish diseases classification list
From Diego Pereira: This treeview loads the International Classification of Diseases in Spanish. By entering a word, a part of a word or a ICD10 code, one can locate matching nodes, highlight them and expand them. The main purpose of this example is to serve as a simple implementation of the Treeview in an Access style.
Download the sample Access accdb database (05 Mar 2014, downloaded 3.769 times)
Sheet navigation tool
Yves Leboutte sent us these screenshots:
Go To sheet: Allows to jump to worksheet < List of countries
Go To Item: To jump to 1 item (rows)
Item Selection: Allows to save options to some items in 1 or all
childs sheets.
Filtered tree
Tiago Costa from EWEN Energy shared a treeview with us which the user can filter. The filtering is implemented quite simple by filtering the table containing the source data for the tree and rebuilding the tree after filtering using the filtered table (in a Worksheet). I particularly like the looks of the form, very "modern UI"-like:
Template system
FREE open source Access database for IT Asset Management purposes
Florian Rossmark created an IT Assets database, a free open source IT Assets management database project based on Microsoft SQL server as a back end and Microsoft Access as front end. The Wiki module in the database was accomplished by using the TreeView control for easy navigation through structured data controlled by the actual end user.

Peter Denney's showing a popup with more information pertaining to a node

Your implementation
We're always interested to see how people have implemented the VBA Treeview. So please feel free to send a screenshot with a brief description or relevant details.
Comments
Showing last 8 comments of 46 in total (Show All Comments):Comment by: J Jones (1-11-2019 12:29:00) deeplink to this comment
Thank you so much for your quick response & your generosity!
Comment by: miguel angel Molina (26-12-2019 09:46:00) deeplink to this comment
POPUP IN NODE
Comment by: Lakazet (27-10-2020 21:20:00) deeplink to this comment
Hi guys, my treeview on excel x86 working as well but I want running it on x64, anybody help me for follow codes:
Dim rngData As Range
Dim lngRow As Long
Dim objNode As Node
Dim objRootNode As Node
Dim obj As Node
Dim ch As Node
Dim strPrevName As String
Dim lngCount As Long
Set rngData = ActiveSheet.Range("A1:D56")
strPrevName = ""
lngCount = 0
For lngRow = 1 To rngData.Rows.Count
If rngData.Cells(lngRow, 1) <> strPrevName Then
lngCount = lngCount + 1
Set objRootNode = TreeView1.Nodes.Add(, , "Key" & lngCount)
objRootNode.Text = rngData.Cells(lngRow, 1)
End If
lngCount = lngCount + 1
Set objNode = TreeView1.Nodes.Add(objRootNode, tvwChild, "Key" & lngCount)
objNode.Text = rngData.Cells(lngRow, 2) & " " & rngData.Cells(lngRow, 11).Text
lngCount = lngCount + 1
Set obj = TreeView1.Nodes.Add(objNode, tvwChild, "Key" & lngCount)
obj.Text = rngData.Cells(lngRow, 3) & " " & rngData.Cells(lngRow, 12).Text
lngCount = lngCount + 1
Set ch = TreeView1.Nodes.Add(obj, tvwChild, "Key" & lngCount)
ch.Text = rngData.Cells(lngRow, 4) & " " & rngData.Cells(lngRow, 13).Text
strPrevName = rngData.Cells(lngRow, 1)
Next
End Sub
Comment by: Jan Karel Pieterse (28-10-2020 09:30:00) deeplink to this comment
Hi Lakazet,
There is nothing in your code that I would expect to cause an issue in 64 bit Excel. What error(s) do you get?
Comment by: Lakazet (28-10-2020 13:24:00) deeplink to this comment
Hi jan, I import this code in userform (ufDemo) and add button for that, but when running ufDemo and press button some error occurred for example undefined variables types that I fix it with clsnode instead Node, but not recognized text and as it, I dont know how solve it
Comment by: Jan Karel Pieterse (28-10-2020 13:44:00) deeplink to this comment
Hi Lakazet,
You'll have to study the demo file and use the syntax explained there. If your system does not recognize clsNode then I suspect you haven't copied the class module clsNode?
Comment by: Lakazet (28-10-2020 14:26:00) deeplink to this comment
yes I do it but since I am a beginner, I didn't understanding
Comment by: Jan Karel Pieterse (28-10-2020 15:21:00) deeplink to this comment
Hi Lakazet,
If you're willing to pay for some consulting we might me able to help out?
Have a question, comment or suggestion? Then please use this form.
If your question is not directly related to this web page, but rather a more general "How do I do this" Excel question, then I advise you to ask your question here: www.eileenslounge.com.