ok, i figued out a way to do it, but if anyone has a better way, let me know.
Private Sub ComboBox4_Change()
Sheets("shipping instructions").Select
ActiveSheet.Range("C20").Select
activeCell.Value = ComboBox4.Value
Sheets("freight quote").Select
End Sub