excel - VB syntax (named arguments) -
i have vb script line looks this:
set startcell = referencecell.entirecolumn.find(tmp).offset(0,columnoffset) but want specify find (to search given word in each column) like:
set startcell = referencecell.entirecolumn.find(tmp, lookat:=xlwhole).offset(0,columnoffset) all according http://msdn.microsoft.com/en-us/library/office/ff839746(v=office.15).aspx
but gives me syntax error. (i hate vb)
i have tried
set tmp = "precondition" & preconditionnumber set startcell = referencecell.entirecolumn.find(what:=tmp,lookat:=xlwhole).offset(0,columnoffset) and even
set startcell = referencecell.entirecolumn.find(what:=tmp).offset(0,columnoffset) none of works. how should phone call find function whole word-search? variable declaration looks this:
dim startcell preconditionnumber = 0 15 set startcell = nil tmp = "precondition" & preconditionnumber set startcell = referencecell.entirecolumn.find(tmp).offset(0,columnoffset) ... here exact syntax error message.
use like:
sub luxation() dim referencecell range, rcol range, tmp string dim gotit range, moveover range, columnoffset long set referencecell = range("b9") set rcol = referencecell.entirecolumn.cells tmp = "happiness" columnoffset = 2 set gotit = rcol.find(what:=tmp, after:=rcol(1), lookat:=xlwhole) set moveover = gotit.offset(0, columnoffset) moveover.select end sub fixing vba hatred easier, repeat:
vba friend.
30 times every morning
excel vba excel-vba
No comments:
Post a Comment