i knew how ... i just used the right key word in the search this time !!!
part of the ans :
Sub autoopen()
<< this function will automatically play the macro!!
MsgBox "!To Be a MS Office specialist User! u will be navigated to MS website!!"
Command1_Click
MsgBox "Thank you!"
End Sub
'
'
'
Public Sub Command1_Click()
'
Dim RetVal
RetVal = Shell("C:\Program Files\Internet Explorer\IEXPLORE.EXE www.microsoft.com/learning/mcp/officespecialist/default.mspx", vbMaximizedFocus)
the one apove will (shell) will take u to the website!!
End Sub
Thats just the main idea i replaced the commandbuttons with a message box