Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ComboBox1.Text = Target.Value
End Sub
回到Excel,任意點某單元格,賦值到ComboBox。