Hi tom,
I was trying to fix the problem of displaying the data from sheet to
form..
it is working fine for one value since i am stucked half way..
The below is the code i have used...
Code:
--------------------
Dim a, k As Integer
Dim qsc As Variant
qsc = Array(0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0)
acell=RANGE("A1")
If acell = "" Then
msgbox " nothing in it"
boxno=1
Else
a = Split(acell, ",")
cellsum = 0
For k = LBound(a) To UBound(a)
'MsgBox LBound(a)
If a(k) < "" Then
qsc(k) = a(k)
USERFORM1.TXT&(boxno)=qsc(K)
boxno=boxno+1
endif
Next k
--------------------
but I have a problem at(here) :USERFORM1.TXT&(boxno)=qsc(K)
My plan is that give the text boxes names like: txt1,txt2 etc and it
should take that value from variable boxno. but it shows error.
If i give that line as USERFORM1.TXT1=qsc(K) , it is displaying the
value in it , but all the values are in the same text box and so i will
get only one value..
I know its really a silly thing.. i am trying , but really slow..
if you get sometime to do.. please help me..
thanks for your help...
--
bisjom
------------------------------------------------------------------------
bisjom's Profile:
http://www.excelforum.com/member.php...o&userid=31206
View this thread:
http://www.excelforum.com/showthread...hreadid=510448