Hi all,
Sorry if this is a dumb question, but it's been around 10 years since I did any VB programming so I'm extremely rusty.
One of my team created an Excel doc before he left the company which used VB6 (v6.5.1020). It uses forms to collect data and store text box, radio button, tick box data, etc into a separate sheet that we can use in other documents. For ease of viewing we also re-load any saved data back into the form if it is opened, and this is where my problem comes.
Whenever we try to open a form with around 150 different pieces of data it takes roughly one minute before the form is displayed. Ideally we'd like to cut down the load times to around 10-15 seconds or less. You can see the code below:
CODE
Dim gettag As String
Dim tagexists As Boolean
For Each Control In Me.Controls
If TypeName(Control) = "TextBox" Or TypeName(Control) = "OptionButton" Or TypeName(Control) = "CheckBox" Then
gettag = Control.Tag
On Error Resume Next
tagexists = Len(ThisWorkbook.Names(gettag).Name)
If tagexists = gettag Then
Control.Value = Sheets("Information").Range(gettag)
End If
End If
Next
Is there anything obvious that I'm missing with this?
Thanks for your help in advance!
Paul
Forum Index:
Programming Help |
C and C++ |
VB6 |
Java |
VB.NET |
C# |
ASP.NET |
PHP |
ColdFusion |
Perl and Python |
Ruby |
Databases |
Other Languages |
Game Programming |
Mobile Development |
Software Development |
Computer Science |
Industry News |
Programming Tutorials |
C++ Tutorials |
Visual Basic Tutorials |
Java Tutorials |
VB.NET Tutorials |
C# Tutorials |
Linux Tutorials |
PHP Tutorials |
ColdFusion Tutorials |
Windows Tutorials |
HTML/JavaScript Tutorials |
CSS Tutorials |
Flash Tutorials |
Web Promotion Tutorials |
Graphic Design & Photoshop Tutorials |
Software Development Tutorials |
Database Tutorials |
Other Language Tutorials |
ASP.NET Tutorials |
Game Programming Tutorials |
WPF & Silverlight Tutorials |
2 Jul, 2009 - 05:36 AM
| 
