Please could somebody tell me the VB code or function to clear cell contents with user input in the adjacent cell

Thanks

Ashley