Prompt User for a field

[kitty77]

If IsNull([sampleid2]) Then [field1] = [sampleid1] & ".RPT" Else [field1] = [sampleid1] & ".RPT" or [sampleid2] & ".RPT"

I have a command button that checks for the this. How can I have "the Else" prompt the user to select either [sampleid1] or [sampleid2]

 

[theDBguy]

Check out InputBox().

InputBox function (Visual Basic for Applications)

Office VBA reference topic

learn.microsoft.com

 

[kitty77]

Dim MyAnswer As String
MyAnswer = InputBox("Enter Sample ID")
Me.field1.Value = MyAnswer & ".RPT"

This works. But instead of the user having to input the value, is it possible to have them choose the value from [field3] or [field4]?

 

[kitty77]

I think I got it... How can I change it to 1 or 2, instead of Yes or No?

Select Case MsgBox("Sample ID", vbYesNo, "testing")

Case Is = vbYes
[Field1] = [sampleid] & ".RPT"

Case Is = vbNo
[Field1] = [sampleid1] & ".RPT"

End Select

 

[theDBguy]

How can I change it to 1 or 2, instead of Yes or No?

You can use a Popup form instead of a message box. Or, you can look for a customized message box like this one.

Here Is A Customized Msgbox VBA Example -

Here is an example of a customized VBA Msgbox. We giving some richtext and customizable flair to the rather ordinary message box. The following code provided with the code after the screenshot, is going to provide you with the ability to really make the ordinary message box shine! Sub...

vbahowto.com

 

[MajP]

Build your own form with a combobox holding the SampleIDs.

 

[kitty77]

You can use a Popup form instead of a message box. Or, you can look for a customized message box like this one.

Here Is A Customized Msgbox VBA Example -

Here is an example of a customized VBA Msgbox. We giving some richtext and customizable flair to the rather ordinary message box. The following code provided with the code after the screenshot, is going to provide you with the ability to really make the ordinary message box shine! Sub...

vbahowto.com

Thanks