UserForm, opening other spreadsheets?

[hokiegirl]

Basically, I have a macro where it goes through all my data, loops row by row, and if a certain field is missing (for example, a date), it pops up a userform, in which the user can enter in the missing information, and it then populates back into the data. The problem is, in order for the user to find the missing data, they have to use other spreadsheets. With a userform running, they cannot open up other spreadsheets. I tried using vbModeless, but it ended up running through the rest of my macro (what happens after all the data has been entered with userforms) and misses that whole step. So vbModeless doesn't work. I need to make sure they enter the data into the userforms before the rest of the code progresses.

Is there any way to do this? Basically, to have a userform open, but be able to open up other spreadsheets simultaneously, without having the rest of my code run? Thanks!

 

[bk]

I'm not familiar with 'vbModeless', but is it

supposed to do the same thing as changing the "Show Modal" property for the UserForm?

I just did a quick experiment with a UserForm with Show Modal set to False and I was able to manualy open another workbook while the UF was still up.

HTH

 

[Joe Was]

Add this a button option on your form:


Sub myOpenWBFile()
'Standard Module code, like: Module1
'Open file in its own application window!
Dim fName As Variant, myExcel As Object

fName = Application.GetOpenFilename

If fName <> False Then
Workbooks.Open fName
Else
MsgBox "No Workbook is open!"
End If

Set myExcel = CreateObject("Excel.Sheet")

myExcel.Application.Workbooks.Open fName
ActiveWindow.WindowState = xlNormal
End Sub

 

[hokiegirl]

Thank you thank you thank you thank you!