[vba]Private Sub ListBox1_Click()
Range("F9").Value = ListBox1.Value
End Sub
[/vba]
[vba]Private Sub ListBox1_Click()
Range("F9").Value = ListBox1.Value
End Sub
[/vba]
Steve
"Nearly all men can stand adversity, but if you want to test a man's character, give him power."
-Abraham Lincoln
Posting Permissions
Reply With Quote