vB Help

  • Thread starter Thread starter Gunti
  • Start date Start date
G

Gunti

Hi,
I'm getting pretty frustrated here. I need something extremely simple and i
just can't get it done.

This is what i want.

The vB event is change. Whenever a range of cells changes i want the code to
check if it is <> 0.

If it is, i want it to remove a cross which is standard on my sheet.
If it isn't, it should create the cross for future use.

Some more info:
Sheetname: Invulblad

Code by recording creating the cross with macro recorder:

ActiveSheet.Shapes.AddLine(31.5, 858.75, 607.5, 1077.75).Select
Selection.ShapeRange.Flip msoFlipVertical
ActiveSheet.Shapes.AddLine(30.75, 858.75, 607.5, 1077.75).Select

Ofcourse i want this without .Select. So i probably want to give both lines
a name.

I only need help with removing & adding the cross.

Any help appreciated, seeing as i'm not experienced in vB a code would be
welcome -> i could analyse this to learn it myself (been busy figuring this
out for an hour or two now)

Greets & Thanks,
Gunti
 
What is that shape, is it a cross to indicate a value is <> 0? If so, a
better way is to just use X surely, text values.
 
No, it's actually a big cross (big as in the width of the screen) covering an
area. The way you're suggesting will not work.

Thanks for replying though,
Gunti
 
Back
Top