excel - Moving Occupied Rows up above Blank ones with VBA code syntax error -

-

i have syntax error in if statement confused about, seems compiler shouldn't require = expected : = error on

if isempty(activecell) activecell.offset(0,-1)

range(zen).select oak = 1 oak = oak + 1 if isempty(activecell) activecell.offset(0, -1) else: if isempty(selection.offset(0, -1)) copy selection(activerow(e - m).range) paste selection.offset(0, -1) loop until oak = ruby

here code in entirety

dim ws worksheet dim rng1 range dim ruby integer dim ruby2 integer set ws = sheets("belmont") set rng1 = ws.columns("c").find("*", ws.[c1], xlvalues, , xlbyrows, xlprevious) dim zen string zen = rng1.address(0, 0) range(zen).select ruby = activecell.row ruby2 = ruby - 11 dim stones() boolean redim stones(1 ruby) dim z integer z = 1 if isempty(activecell.offset(2, 0)) stones(z) = 0 selection.offset(-1, 0).select z = z + 1 else stones(z) = 1 selection.offset(-1, 0).select z = z + 1 end if loop until z > ruby2 range(zen).select oak = 1 oak = oak + 1 if isempty(activecell) activecell.offset(0, -1) else: if isempty(selection.offset(0, -1)) copy selection(activerow(e - m).range) paste selection.offset(0, -1) loop until oak = ruby

activecell.offset(0, -1) invalid portion. need activecell. like: activecell.offset(0, -1).select move selection offset, or activecell.offset(0, -1) = "data value" put data offset cell.

or set range offset cell, like: set myrange = activecell.offset(0, -1)

also, should change if-then syntax little more vba friendly:

if isempty(activecell)   activecell.offset(0, -1).select elseif isempty(selection.offset(0, -1))     dim row integer     row = activecell.row     range(cells(row, 5), cells(row, 13)).select     selection.copy end if

and activerow isn't valid in excel, above changes should want.


Comments

Post a Comment

Popular posts from this blog

java - How to Configure JAXRS and Spring With Annotations -

-
i working on little spring web service project. here example route: package com.example.api; import javax.ws.rs.get; import javax.ws.rs.path; import javax.ws.rs.produces; import javax.ws.rs.pathparam; import javax.ws.rs.ext.provider; import javax.ws.rs.core.mediatype; @provider public class webserviceroutes { @get @path("/hello") public string health() { return "hello"; } } then in spring configuration class: package com.example.api; import org.springframework.context.annotation.bean; import org.springframework.context.annotation.configuration; @configuration public class springcontextconfiguration { @bean( destroymethod = "shutdown" ) public springbus cxf() { return new springbus(); } @bean public webserviceroutes webserviceroutes() { return new webserviceroutes(); } } and in web.xml: <?xml version="1.0" encoding="utf-8"?> <web-app version=...
Read more

visual studio - TFS will not accept changes I've made to a Java project -

-
i using tfs's team explorer manage visual studio projects. recently, i've created new java project (not in visual studio) manually added tfs using source control control explorer in visual studio. after added java project tfs, made changes , bug fixes. then, went visual studio , opened source control explorer check in changes, tfs thinks no changes made. it seems needed check out project before making changes. guess erroneously expected tfs track automatically, okay. so, using source control explorer in tfs, checked out project, , tried check in pending changes. when tried check in, got following message: all of changes either unmodified files or locks. changes have been undone server. is there way convince server indeed project has changed? how can check in changes have made? thank help.
Read more

php - Create image in codeigniter on the fly -

-
i want create image in codeigniter in simple php using gd functions. have tried following method in controller function image(){ $my_img = imagecreate( 200, 80 ); $background = imagecolorallocate( $my_img, 0, 0, 255 ); $text_colour = imagecolorallocate( $my_img, 255, 255, 0 ); $line_colour = imagecolorallocate( $my_img, 128, 255, 0 ); imagestring( $my_img, 4, 30, 25, "thesitewizard.com", $text_colour ); imagesetthickness ( $my_img, 5 ); imageline( $my_img, 30, 45, 165, 45, $line_colour ); //$this->output->set_content_type('image/png'); header( "content-type: image/png" ); imagepng( $my_img ); imagecolordeallocate( $line_color ); imagecolordeallocate( $text_color ); imagecolordeallocate( $background ); imagedestroy( $my_img ); } if write code in simple php can see in url http://www.domain.com/image.php if run in codeignite...
Read more