for default button use
vbYesNo + vbQuestion + vbDefaultButton2
-->
MB = MsgBox("Last updated on " & Worksheets(1).Range("G7").Value & Chr$(13) & Chr$(13) & "Would you like to import the latest data feed?", vbYesNo + vbQuestion + vbDefaultButton2, "Import data feed?")