Hi
Hope somebody can help. I've been trawling forums looking for a solution without success.
I am new to VBA, so would be grateful if a full macro could be provided that I can lift and paste.
I am trying to achieve the following
I have a column A with values. Some of the cells contain the string 'timeslice' and other data.
When there is an occurrence of this, I want to insert a blank cell in columns B and C on the same row.
Example
from this:-
[TABLE="class: grid, width: 500, align: left"]
<tbody>[TR]
[TD]timeslice 01/01/98 aaa[/TD]
[TD]apple[/TD]
[TD]green[/TD]
[/TR]
[TR]
[TD]apple[/TD]
[TD]orange[/TD]
[TD]orange[/TD]
[/TR]
[TR]
[TD]orange[/TD]
[TD]apple[/TD]
[TD]green[/TD]
[/TR]
[TR]
[TD]timeslice 12/03/89 bbb[/TD]
[TD]grape[/TD]
[TD]black[/TD]
[/TR]
[TR]
[TD]apple[/TD]
[TD]banana[/TD]
[TD]yellow[/TD]
[/TR]
[TR]
[TD]grape[/TD]
[TD]grape[/TD]
[TD]black[/TD]
[/TR]
[TR]
[TD]banana[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]timeslice 19/09/01 jjj[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]grape[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]
[TABLE="width: 265"]
<tbody>[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD]to this:-[/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][TABLE="class: grid, width: 500, align: left"]
<tbody>[TR]
[TD]timeslice 01/01/98 aaa[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]apple[/TD]
[TD]apple[/TD]
[TD]green[/TD]
[/TR]
[TR]
[TD]orange[/TD]
[TD]orange[/TD]
[TD]orange[/TD]
[/TR]
[TR]
[TD]timeslice 12/03/89 bbb[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]apple[/TD]
[TD]apple[/TD]
[TD]green[/TD]
[/TR]
[TR]
[TD]grape[/TD]
[TD]grape[/TD]
[TD]black[/TD]
[/TR]
[TR]
[TD]banana[/TD]
[TD]banana[/TD]
[TD]yellow[/TD]
[/TR]
[TR]
[TD]timeslice 19/09/01 jjj[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]grape[/TD]
[TD]grape[/TD]
[TD]black[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[TD][TABLE="width: 265"]
<tbody>[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[/TR]
</tbody>[/TABLE]
Mnay thanks in anticipation.
Hope somebody can help. I've been trawling forums looking for a solution without success.
I am new to VBA, so would be grateful if a full macro could be provided that I can lift and paste.
I am trying to achieve the following
I have a column A with values. Some of the cells contain the string 'timeslice' and other data.
When there is an occurrence of this, I want to insert a blank cell in columns B and C on the same row.
Example
from this:-
[TABLE="class: grid, width: 500, align: left"]
<tbody>[TR]
[TD]timeslice 01/01/98 aaa[/TD]
[TD]apple[/TD]
[TD]green[/TD]
[/TR]
[TR]
[TD]apple[/TD]
[TD]orange[/TD]
[TD]orange[/TD]
[/TR]
[TR]
[TD]orange[/TD]
[TD]apple[/TD]
[TD]green[/TD]
[/TR]
[TR]
[TD]timeslice 12/03/89 bbb[/TD]
[TD]grape[/TD]
[TD]black[/TD]
[/TR]
[TR]
[TD]apple[/TD]
[TD]banana[/TD]
[TD]yellow[/TD]
[/TR]
[TR]
[TD]grape[/TD]
[TD]grape[/TD]
[TD]black[/TD]
[/TR]
[TR]
[TD]banana[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]timeslice 19/09/01 jjj[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]grape[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]
[TABLE="width: 265"]
<tbody>[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD]to this:-[/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][TABLE="class: grid, width: 500, align: left"]
<tbody>[TR]
[TD]timeslice 01/01/98 aaa[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]apple[/TD]
[TD]apple[/TD]
[TD]green[/TD]
[/TR]
[TR]
[TD]orange[/TD]
[TD]orange[/TD]
[TD]orange[/TD]
[/TR]
[TR]
[TD]timeslice 12/03/89 bbb[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]apple[/TD]
[TD]apple[/TD]
[TD]green[/TD]
[/TR]
[TR]
[TD]grape[/TD]
[TD]grape[/TD]
[TD]black[/TD]
[/TR]
[TR]
[TD]banana[/TD]
[TD]banana[/TD]
[TD]yellow[/TD]
[/TR]
[TR]
[TD]timeslice 19/09/01 jjj[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]grape[/TD]
[TD]grape[/TD]
[TD]black[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[TD][TABLE="width: 265"]
<tbody>[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[/TR]
</tbody>[/TABLE]
Mnay thanks in anticipation.
