Is there an nice short way of reading all of the textbox values on a form into an array? What I am hoping for is something like:
?
intCtr = 1 For Each each txtbx in TextboxCollection intCtr = intCtr + 1 txtboxArray(intCtr) = txtbx.text Next
Thank-you!
Sorry there is no TextBoxCollection but there are other methods you could try.
For example, this which uses the Controls collection of the form.
Dim ctl As MSForms.Control Dim intCtr As Long Dim txtboxArray() For Each ctl In Me.Controls If TypeName(ctl) = "TextBox" Then Redim Preserve txtboxArray(intCtr) txtboxArray(intCtr) = ctl.Value intCtr = intCtr+1 End If Next ctl
Last edited by Norie; 04-03-2016 at 05:27 AM.
If posting code please use code tags, see here.
Thank-you!
Norie -
A little off-topic, but I noticed you Dim'd your int as long, which jogged my memory of seeing a post somewhere saying not to bother with Integer types, Dim them all as Long. Can you explain the reasoning?
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks