You should be able to get away with using your code:
Hope this helpsCode:Public Continue as string Private Sub Form_Load() Workbooks.Open "c:\temp.xls" Continue = True While Continue = true Text1.Text = Worksheets("Sheet1").Cells(1, 2).Value Text2.Text = Worksheets("Sheet1").Cells(2, 2).Value Text3.Text = Worksheets("Sheet1").Cells(3, 2).Value Text4.Text = Worksheets("Sheet1").Cells(4, 2).Value Text5.Text = Worksheets("Sheet1").Cells(5, 2).Value Text6.Text = Worksheets("Sheet1").Cells(6, 2).Value Wend End Sub Private Sub Command1_Click() Continue = false End Sub
[Edited by alex_read on 11-23-2000 at 04:21 AM]





Reply With Quote