excel vba - Trying to add an element to an cell -


i have trying find code @ contents of cell g1 , search column match , select cell.

this part of longer code, bit can't find out how do.

sub searchnfind() dim searchresult range dim wb workbook dim ws worksheet  set wb = activeworkbook set ws = wb.activesheet  set searchresult = ws.range("a:a").find(what:=ws.range("g1").value, _     lookin:=xlvalues, _     lookat:=xlwhole, _     searchorder:=xlbyrows, _     searchdirection:=xlnext, _     matchcase:=false)  if not searchresult nothing searchresult.select end if  end sub 

Comments

Popular posts from this blog

php - failed to open stream: HTTP request failed! HTTP/1.0 400 Bad Request -

java - How to filter a backspace keyboard input -

java - Show Soft Keyboard when EditText Appears -