Monday, 15 August 2011

excel - VB syntax (named arguments) -



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