Jag har lagt upp en exempelarbetsbok här:

easyupload.io/ehb1x3
 

Prova att välja några alternativ i listrutorna på fliken Overview i cellområdena G4:I18, G30:I44 och G56:I70 och sedan spara arbetsboken. När du sedan försöker öppna arbetsboken igen visas det här felmeddelandet:
 

"We found a problem with some content in 'Worksheet Overview drop-downs in columns G, H, I, AV.xlsm'. Do you want us to try to recover as much as we can? If you trust the source of this workbook, click Yes."

Det rör sig om en arbetsbladskod och en modulkod. Jag har fått följande kommentarer av andra Excel-experter:

I am discomforted by using worksheet event subs to update things on other worksheets. You don't want to be triggering a cascade of event subs, each one causing another event sub to run. In addition, the statement DropDownOP.SetDropDownList implies the sub of an Active-X object, something that won't be recognized if its parent worksheet isn't active.

Any particular reason why you made the Sub 'private'? It means that the subroutine is inaccessible outside the project bounds:
https://learn.microsoft.com/en-us/office/vba/language/reference/user-interface-help/sub-statement

Event subs are private by default. If you remove the Private keyword, you'll see Sheet5.Worksheet_Activate listed in the ALT + F8 macro selector dialog, something that is undesirable and confusing to users in my opinion.

To avoid triggering a chain of event subs, turn events off whenever a macro does something that would trigger an event sub to run. Then do the triggering activity. And finally restore events. 

I frequently put code like the following in both event subs and regular subs:
Application.EnableEvents = False 'Do triggering action(s) Application.EnableEvents = True

Finns det något sätt att skriva om mina två VBA-koder på så att arbetsboken går att öppna igen efter att den har sparats?

Tack Gondi, det låter rimligt som du säger. 
 

Den första felsökningsmetoden gav inget utslag. Jag öppnade en tom arbetsbok, ändrade de globala inställningarna till manuell beräkning och öppnade sedan dokumentet från Öppna-menyn under Arkiv. Det gjorde ingen skillnad mot tidigare.

Jag vet sedan tidigare att det är inga problem att spara arbetsboken och öppna den igen så länge jag inte har valt något listobjekt i någon listruta. Jag testade detta:

1) Jag valde ett värde i listrutan G4:G11 på fliken Overview. Men jag valde ett värde i taget i listrutan, sparade och öppnade igen (valde värde i G4, sparade, öppnade igen - valde värde i G5, sparade, öppnade igen, osv.). Då kunde jag spara och öppna igen åtta gånger efter varandra.

2) Sedan valde jag ett värde i G17, sparade och öppnade igen. Sedan valde jag ett värde i I17 sparade och öppnade igen. Det fungerade också.

3) Jag valde sen sju värden i G56:I70 (alla värden på en gång), sparade och öppnade igen. Det fungerade.

4) Men när jag bytte flik till Fundfakt-kateg-vinkl och valde värden i listrutorna där i de gråtonade cellerna och sedan sparade och försökte öppna igen, då visades felmeddelandet.

Jag fick ovanstående bekräftat genom att nu välja flera värden på en gång i alla gråtonade cellers listrutor på fliken Overview, spara och öppna igen. Det fungerade. Och när jag sen gick till fliken Fundfakt-kateg-vinkl och valde bara ett värde i en listruta, i cellen E12, och sedan sparade och försökte öppna igen, då visades felmeddelandet.

Då är problemet alltså när jag väljer ett värde i någon listruta i någon av de gråtonade cellerna på fliken Fundfakt-kateg-vinkl och sedan sparar. Då går inte arbetsboken att öppna igen utan att felmedelandet visas. (Det är för fliken Fundfakt-kateg-vinkl som det finns VBA-kod, förutom modulkoden.)

Jag har lagt upp en ny exempelarbetsbok där det finns listrutor i de gråtonade cellerna i kolumnen AV på fliken Overview också:

easyupload.io/ehb1x3

Gondi,

Jag försökte precis med det du förklarade och tog bort snabel-a i koden, valde listruteobjekt i listrutorna på flikarna Overview och Fundfakt-kateg-vinkl, sparade och försökte öppna. Men det blir samma felmeddelande som tidigare tyvärr. Och det är manuell beräkning. Jag öppnade en tom arbetsbok, ändrade till manuell beräkning för formler, och öppnade därifrån arbetsboken.

Hej Gondi,

Jag fick fjärrhjälp igår söndags så att exempelarbetsboken fungerar som den ska. Den som hjälpte mig ersatte @ med | (piptecknet), men han sa att det inte spelar någon roll vilket tecken. Iallafall så fungerade arbetsboken som den ska efter det, går nu att öppna igen efter att jag valt listruteobjekt på flikarna Overview och Fundfakt-kateg-vinkl och sparat.

Problemet är att få det att fungera i min masterarbetsbok. Jag klistrade in modulkoden och arbetsbladskoden i den, men när jag därefter ska gå till  flken Fundfakt-kateg-vinkl för att trigga VBA-koden så börjar markörbollen att snurra en lång stund, sen visas det här felmeddelandet:

Run-time error '1004':
Application-defined or object-defined error

Jag klickar på Debug, och följande markeras i gult i VBA-redigeraren i modulkoden:

.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop,  _
                        Operator:=xlBetween,  _
                        Formulal:=getFormulal (CStr(arrSource(i))) 

Jag väljer Debug/Step into, och följande markeras i gult i modulkoden DropDownOP:

Function getFormulal (drDownSourceName As String) As String

Jag väljer Continue, och felmeddelandet öppnas i VBA-redigeraren:

Run-time error '1004':
Application-defined or object-defined error

Faktiskt, nu när jag tog bort piptecknet (och @ också är borttaget från modulkoden) slutar felmeddelandet att öppnas. Men det tar väldigt lång tid när jag växlar till arbetsbladet Fundfakt-kateg-vinkl, 4-5 sekunder som markörbollen snurrar och jag inte kan placera markören på arbetsbladet.

Hej Gondi,

Jag började med min master-Excel 2013 och har utvecklat den allteftersom. Under årens lopp har jag fått hjälp från vänster och höger med olika delar av arbetsboken.

Hur kan jag ändra koden som inte sätter någon gräns för längden på textsträngen? Kan jag alltså inte ha ett källområde för listrutor som är längre än 256 rader? Helst skulle jag  ha behövt 1000 rader, men om det inte går, hur kan jag sätta gränsen 256 rader i VBA-koden?

Jag försöker nu att kopiera tre arbetsblad från en senare version av arbetsboken till en tidigare version av arbetsboken. Av någon anledning orsakar detta problem i VBA-redigeraren - jag kan inte ta bort en modulkod, och jag kan inte högerklicka och visa en VBA-kod. Har aldrig hänt förut. Ändringarna jag behöver göra i den tidigare versionen av arbetsboken (den senare versionen har ett korrupt arbetsblad) är:

Kopiera och klistra in tre arbetsark från en senare version av arbetsboken till en tidigare version (samma namn, men det blir ett "(1)" efter arbetsarksnamnet efter inklistringen innan jag raderat det gamla arbetsarket med samma namn).
Lägga till kolumner på arbetsblad.
Ändra named ranges (tre stycken för tre arbetsblad).
Ändra en modulkod och radera tre arbetsbladskoder.

Jag gjorde i ovanstående ordning. Är det bättre att ändra ordningsföljd på stegen för att undvika problemen som uppstår nu?