Excel has stopped working

[ploz]

Hello everyone,

I turn to you
I have an excel file containing macros that it works well on my pc but when I put it on my pc to my job macro works up to a certain time and puts me one excel window stopped working how to remedy this issue

config:

home office in 2016 and win 10
win7 company has factory and office 2010 I think
after you told me to be add before intermittently save her may be the solution?

If so how to intermittently?

Call to make a call?

thank you in advance for your help

[Kevin#]

Please post your macro by
- pasting it into your reply
- select the whole of the macro text and click on # to enclose it in code tags.
thanks

[ploz]

there she is :

Please Login or Register  to view this content.

[Kevin#]

I have looked at the code and cannot see anything obvious that may be caused by Excel2010 to Excel2016 changes.
I had this problem with one file running in Excel2010 that I created using 2016 - I found that it had the problem when I had a different Excel file open at the same time


1. Was the file created on the home PC? Where were macros created?
2. Do you get any error messages, or does it just stop responding?
3. Does it stop responding when macro is running or afterwards?
4. Does it do it always or just sometimes?
5. Is the user using the file when it happens or is it just open?
6. Are other files open when this file stops responding?

[ploz]

1. Was the file created on the home PC? Where were macros created?
yes that is the file created this house is what I have in my userform

2. Do you get any error messages, or does it just stop responding?
departing my userform appears well I get the data was put in the I click on the Register is that the Excel window appears stopped working

3. Does it stop responding when macro is running or afterwards?
if I click on close the program is responsible to find a solution but nothing final

4. Does it do it always or just sometimes?
it's all the time

5. Is the user using the file when it happens or is it just open?
I click on the file that opens properly I fill my fields of userform I click the button record and that's when the window arrives

6. Are other files open when this file stops responding?
not open other files at this time

and those weird is that if I'm in the vba code and I'm doing that I test all my information fields this one works perfectly

[Kevin#]

Can you attach the file - I will try it on Excel2010 and 2016
I do not know if it will run properly French & English regional settings may cause a problem - but I could try

[ploz]

can I have your email address to send it to you

[Kevin#]

I have opened you file but it will not run because of the following error:

Error.jpg

but what is missing?

Please check VBA/Tools/References
Which references have "X" on your Excel?

References.jpg


thanks

[ploz]

yes I this error when I pass a version has another I manage to solve this problem but it is when one generates an analysis form that the error happens

excel.PNG

[Kevin#]

I need to know -
Which references have "X" in your references?
( VBA/Tools/References )

Please list them for me ( or jpeg)

thanks

[ploz]

Here the reference I have to turn there are no doubts that are useless but seeing as I try to find the problem to avoid that this one still works

references.PNG

[ploz]

a solution to propose? ! ?

[ploz]

no one ???

[Kevin#]

@ploz -
I have tried several things to get your code to run on both 2010 and 2016 without success.
I suspect it is probably a language problem that is stopping the macros from running on my PC.

One example of the lines it fails on:

Please Login or Register  to view this content.

- which is perfectly good code and works in other macros

So I am sorry, I can do nothing.

Good luck in finding a solution.
Kevin

[ploz]

ok thank you very much Kevin I hope to solve this problem especially his works very well for me ...

However, if I have to add macro macro backup once it is run it might be can solve my problem, but I have no idea how to proceed

[ploz]

Dim nomdeFichePDF As String
Debug.Print Feuil2.numero_intervention.Value, Range("O11").Value <<<<< I will attempt to disable this line may be that the problems come from there
nomdeFiche = "Ficheanalyse-" & Format(Now(), "yyyymmdd-hhmm") & ".pdf

I would inform you of Evolution

Best Regards