Search code examples
excelinputbox

Is it possible to use one InputBox for two functions?

Hi is it possible to use one InputBox to have two functions? Otherwise I have to fill in information twice. I want it to filter (that already works) and also want to show it in a cell.

FilterCriteria = InputBox("Code")
Sheet3.Range("B" & n).Value = InputBox("Code") 



If FilterCriteria = "" Then Exit Sub
FilterCriteria = Replace(FilterCriteria, "*", "")
FilterCriteria = "*" & FilterCriteria & "*"
Solution

  • Try This:

    FilterCriteria = InputBox("Code")
Sheet3.Range("B" & n).Value = FilterCriteria