Runtime error with .OnAction if there's a comment somewhere in the sheet

[Menohavename]

Hi,

it's me again. I ran into what could be one of the last major issues before finishing my project. Here it comes, I hope you help me find the mistake again.

For some cells in my worksheet, I would like insert a comment. Works perfectly fine using the following code in the Form_ScoringFunctionInput within the attached workbook (coding style is not the best, sorry).

Please Login or Register  to view this content.

However, if I activate another sub which adds a shape in the same row but different cell (module "PublicVariablesAndFunctions") using

Please Login or Register  to view this content.

The error code I'm getting is the great runtime error 1004 and the .OnAction line is highlighted. If no comment is in the sheet, everything works perfectly fine. I just can't get my head around how the comments and the shapes are related? Do you have an idea?

If you would like to reproduce the error yourselves using the xlsm, here's a guide
- click on a "click to select a scoring function" shape of your choice.
- pick any, doesn't matter. "Next" and choose "automated scoring" (this leads to the creation of comments), lowest input e.g. 0, desired input e.g. 1, leave unit empty (these values don't really matter).
- click on "add decision factor or criterion" button, add a random title, choose "decision criterion" and any superior factor.
Violà, you have the error.

Edit: Attachment removed as I do not wish to have it publicly available permanently.

[WideBoyDixon]

Just unlucky probably; Excel has decided to add your shape before the comment. How about changing this line:

Please Login or Register  to view this content.

To this:

Please Login or Register  to view this content.

WBD

[Menohavename]

I spent hours on that problem and now such a simple solution. This does the trick perfectly, thank you so much!