Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Crash excel 2003 quando modifico il codice VBA creato da excel 2000

74 views
Skip to first unread message

poluz

unread,
May 5, 2009, 5:15:48 PM5/5/09
to
Ho il solito file che fa i "capricci".
Premetto che il file contiene una serie di macro e l'ho "sviluppato"
con Excel 2000. E' presente una Form che parte in automatico
all'apertura del file.
Nulla di strano, il file funziona egregiamente da molti anni ma da
quando mi hanno installato Excel 2003, non riesco a fare nessuna
modifica al codice delle macro. Il file funziona tranquillamente anche
su Excel 2003, ma quando devo fare una banalissima modifica di
qualsiasi natura, sono costretto a cercare un PC con excel 2000,
modificarlo lì e spostarlo poi sul PC dove è stato installato excel
2003.
Se mi azzardo a modificare anche solo un testo all'interno di Vba alla
riapertura del file, excel va in crash e il file che mi recupera non è
presente neanche una riga di codice. Il file è inutilizzabile.
Un baco di excel 2003?
E' il caso di aggiornare all'ultimo SP?
Grazie per le risposte, non ce la faccio più a cercare PC con un
vecchio Excel :-(

Saluti
Alberto

Mario

unread,
May 6, 2009, 2:27:22 AM5/6/09
to

"poluz" <po...@libero.it> ha scritto nel messaggio
news:154dfff6-d844-43fb...@v4g2000vba.googlegroups.com...

Ho il solito file che fa i "capricci".
Premetto che il file contiene una serie di macro e l'ho "sviluppato"
con Excel 2000. E' presente una Form che parte in automatico
all'apertura del file.
Nulla di strano, il file funziona egregiamente da molti anni ma da
quando mi hanno installato Excel 2003, non riesco a fare nessuna
modifica al codice delle macro. Il file funziona tranquillamente anche
su Excel 2003, ma quando devo fare una banalissima modifica di
qualsiasi natura, sono costretto a cercare un PC con excel 2000,
modificarlo l� e spostarlo poi sul PC dove � stato installato excel

2003.
Se mi azzardo a modificare anche solo un testo all'interno di Vba alla
riapertura del file, excel va in crash e il file che mi recupera non �
presente neanche una riga di codice. Il file � inutilizzabile.

Un baco di excel 2003?
E' il caso di aggiornare all'ultimo SP?
Grazie per le risposte, non ce la faccio pi� a cercare PC con un
vecchio Excel :-(

Saluti
Alberto


problema strano direi,stanno correggendo i bachi di Excel 2007...

Mauro Gamberini

unread,
May 6, 2009, 3:25:41 AM5/6/09
to
Nulla di strano, il file funziona egregiamente da molti anni ma da
quando mi hanno installato Excel 2003, non riesco a fare nessuna
modifica al codice delle macro. Il file funziona tranquillamente anche
su Excel 2003, ma quando devo fare una banalissima modifica di
qualsiasi natura, sono costretto a cercare un PC con excel 2000,
modificarlo l� e spostarlo poi sul PC dove � stato installato excel
2003.
********************************

Prova, come prima cosa, a ripristinare
eventuali problemi di Excel.

Click sul ?
Rileva problemi e ripristina

Un baco di excel 2003?

***************************

Baco � una parola grossa.
Io non ho problemi per file creati
con Excel 97 ed utilizzati in Excel 2007.


E' il caso di aggiornare all'ultimo SP?

****************************

E' *sempre* il caso di avere *tutto*
aggiornato all'ultimo SP, Windows e programmi.

--
---------------------------
Mauro Gamberini
http://www.riolab.org/
http://blog.maurogsc.eu/


Tiziano Marmiroli

unread,
May 6, 2009, 3:35:06 AM5/6/09
to
Il Wed, 6 May 2009 09:25:41 +0200, Mauro Gamberini ha scritto:

>Prova, come prima cosa, a ripristinare
>eventuali problemi di Excel.

Nostalgia dei bug di una volta?

:-D
--
Tiziano Marmiroli
Microsoft MVP - Office System
http://www.riolab.org

Mauro Gamberini

unread,
May 6, 2009, 3:38:59 AM5/6/09
to
>>Prova, come prima cosa, a ripristinare
>>eventuali problemi di Excel.
>
> Nostalgia dei bug di una volta?
>
>

LOL!

poluz

unread,
May 7, 2009, 5:09:16 AM5/7/09
to
Ora mi sto attrezzando per l'aggiornamento SP3, comunque la cosa
curiosa che tutte le modifiche al codice hanno effetto e funzionano
perfettamente, ma quando riapro il file dopo averlo chiuso e salvato
senza problemi, si presenta il crash.
Mah!
Se fosse un problema di codice scritto male, premetto che non sono un
"praticone", il crash si presenterebbe immediatamente alla sua
esecuzione, invece si presenta solo all'apertura dove parte in
automatico l'istruzione "UserForm1.Show" in ThisWorkBook.
Ovviamente ho provato a non far partire in auto la Form.... stessa
cosa.

Che tristezza....

alberto

On 6 Mag, 09:25, "Mauro Gamberini"


<maurogscRIMUOV...@RIMUOVEREaliceposta.it> wrote:
> Nulla di strano, il file funziona egregiamente da molti anni ma da
> quando mi hanno installato Excel 2003, non riesco a fare nessuna
> modifica al codice delle macro. Il file funziona tranquillamente anche
> su Excel 2003, ma quando devo fare una banalissima modifica di
> qualsiasi natura, sono costretto a cercare un PC con excel 2000,

> modificarlo lì e spostarlo poi sul PC dove è stato installato excel


> 2003.
> ********************************
>
> Prova, come prima cosa, a ripristinare
> eventuali problemi di Excel.
>
> Click sul ?
> Rileva problemi e ripristina
>
> Un baco di excel 2003?
>
> ***************************
>

> Baco è una parola grossa.

Mauro Gamberini

unread,
May 7, 2009, 9:00:42 AM5/7/09
to
Ora mi sto attrezzando per l'aggiornamento SP3, comunque la cosa
curiosa che tutte le modifiche al codice hanno effetto e funzionano
perfettamente, ma quando riapro il file dopo averlo chiuso e salvato
senza problemi, si presenta il crash.
*************************************************

Non hai codice in PERSONAL.XLS?


Se fosse un problema di codice scritto male, premetto che non sono un
"praticone", il crash si presenterebbe immediatamente alla sua
esecuzione, invece si presenta solo all'apertura dove parte in
automatico l'istruzione "UserForm1.Show" in ThisWorkBook.
Ovviamente ho provato a non far partire in auto la Form.... stessa
cosa.

Che tristezza....
***************************************************

Senza vedere il codice, difficile dare una risposta.

poluz

unread,
May 8, 2009, 2:42:18 AM5/8/09
to
Ho aggiornato a SP3 ma nulla da fare, ho eseguito dal menù "?" "rileva
problemi e ripristina" ma nulla da fare
Cos'è il codice PERSONAL.XLS?
Mi scuso ma ho erroneamente scritto "non sono un "praticone""...
volevo scrivere "non sono un programmatore e sono un praticone...."
Comunque il codice in "ThisWorkBook." è il seguente:

Private Sub UserForm1_QueryClose(Cancel As Integer, CloseMode As
Integer)
ActiveSheet.Unprotect
Application.OnKey "{ESC}", "Esci"
'End If
End Sub

Private Sub Workbook_Open()
CloseMe = False
'StartTimer
ActiveSheet.Unprotect
Selection.AutoFilter Field:=1, Criteria1:="<>"
ActiveSheet.ShowAllData
'cancella la C1 per disabilitare l'introduzione senza tutte le celle
obbligatorie
Range("C1").Select
Selection.ClearContents

'MsgBox "NUOVE FUNZIONI: Aggiunto pulsante <<COPIA DATA>>. Se
l'intervento si risolve in giornata utilizzare il pulsante per copiare
la data della
cella <<
EMESSA IL >> nelle altre due celle << DATA FERMATA >> e << DATA FINE
LAVORO >>"
ActiveSheet.Unprotect
Sheets("DATI").Visible = True
Sheets("DATI").Select
ActiveSheet.Unprotect
Range("K19").Select
Selection.Copy
Range("G3").Select
ActiveSheet.Paste
Sheets("DATI").Visible = False
Sheets("SIM").Select
UserForm1.Show
ActiveSheet.Unprotect
Cells.Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop,
Operator:= _
xlBetween, Formula1:="=$A$1"
.IgnoreBlank = True
.InCellDropdown = False
.InputTitle = ""
.ErrorTitle = "Correzione cella non consentita"
.InputMessage = ""
.ErrorMessage = _
"Premere il tasto ""CORREZIONE CELLE"" per inibire
temporanemante la sicurezza. Si ripristinerà automaticamente alla
chiusura della maschera introduzione. "
.ShowInput = True
.ShowError = True
End With
With Application
.Calculation = xlAutomatic
.MaxChange = 0.001
End With
ActiveWorkbook.PrecisionAsDisplayed = False


Range("A1").Select
ActiveSheet.Protect DrawingObjects:=True, Contents:=True,
Scenarios:=True

End Sub

Private Sub Esci()
Unload Me
End Sub
-----------------------------------------------------------------------
Va in crash perfino se tolgo l'asterisco per far tornare visibile un
testo di segnalazione.
Adesso provo a togliere tutto quello che non serve. Parte del codice
sono stati anche esperimenti "abbandonati" ma comunque li ho sempre
ritenuti "innoqui".

saluti
alberto

On 7 Mag, 15:00, "Mauro Gamberini"

Mauro Gamberini

unread,
May 8, 2009, 3:48:37 AM5/8/09
to
<cut>

Va in crash perfino se tolgo l'asterisco per far tornare visibile un
testo di segnalazione.
Adesso provo a togliere tutto quello che non serve. Parte del codice
sono stati anche esperimenti "abbandonati" ma comunque li ho sempre
ritenuti "innoqui".
***************************************************

Definisci *crash*, per favore.

Si chiude Excel?

Va in debug il codice evidenziando
una riga gialla? Se s�, quale?

Cosa dovrebbe fare questo codice?
Mi spiace, ma quando vedo una
serie di Select mi passa la voglia
di *cercare* di capire.
Facciamo prima se spieghi cosa
vorresti fare. Scusami e grazie.

poluz

unread,
May 8, 2009, 4:42:40 AM5/8/09
to
>
> Definisci *crash*, per favore.
dopo la minima modifica esce il messaggio "errore di accesso percorso/
file"
premo OK

Errore runtime "75":
impossibile trovare l'oggetto specificato
Premo Debug ( se non scelgo il debug esce subito il messaggio: "si è
verificato un errore in microsoft excel...." "invia segnalazioni
errore" ecc. ecc."
la riga evidenziata in giallo è:
UserForm1.Show

> Si chiude Excel?
si chiude quando interrompo il debug con il solito " si è verificato
un errore in microsoft excel...." "invia segnalazioni errore" ecc.
ecc.
Se lascio il flag "recupera il lavoro e riavvia excel" mi si riapre il
file ma se avvio il VB editor non c'è più nessun codice

> Cosa dovrebbe fare questo codice?

Deve aprire all'avvio del file una maschera che utilizzo per popolare
un database con dei vincoli e codici ben precisi.


> Mi spiace, ma quando vedo una serie di Select mi passa la voglia di *cercare* di capire.

scusami ma essendo un praticone "appiccico" pezzi di macro.


> Facciamo prima se spieghi cosa vorresti fare. Scusami e grazie.

Grazie a te,
a parte errori di codice che posso aver commesso per la mia
inesperienza, la cosa che mi disturba è che in excel 2000 non ho
problemi e con il 2003 si pianta tutto.
Spero di averti fornito tutte le informazioni necessarie, chiedimi
pure qualsiasi cosa, se vuoi ti mando anche il file.
ciao e 1000 grazie
alberto

Mauro Gamberini

unread,
May 8, 2009, 5:01:22 AM5/8/09
to
dopo la minima modifica esce il messaggio "errore di accesso percorso/
file"
premo OK

Errore runtime "75":
impossibile trovare l'oggetto specificato

Premo Debug ( se non scelgo il debug esce subito il messaggio: "si �


verificato un errore in microsoft excel...." "invia segnalazioni
errore" ecc. ecc."

la riga evidenziata in giallo �:
UserForm1.Show
************************************************

Hai una UserForm1 nel progetto?


a parte errori di codice che posso aver commesso per la mia

inesperienza, la cosa che mi disturba � che in excel 2000 non ho


problemi e con il 2003 si pianta tutto.
Spero di averti fornito tutte le informazioni necessarie, chiedimi
pure qualsiasi cosa, se vuoi ti mando anche il file.

************************************************

Non � che funzioni su di un pc con Excel 2000 e non
su di un pc con Excel 2003.
Nel senso che sul pc con il 2000,
ci sono *cose* non presenti sulla 2003?

Puoi postare il codice della UserForm1?
Grazie.

P.S. Controlla se eseste un file PERSONAL.XLS
sul pc con Excel 2000. Grazie.

poluz

unread,
May 8, 2009, 6:38:11 AM5/8/09
to

> Hai una UserForm1 nel progetto?

si , che parte automaticamente
Se elimino tutto il codice in ThisWorkBook la maschera non parte ( la
richiamo in un secondo momento con un pulsante) ma funziona tutto il
resto.
Ho provato a mettere la sola macro che mi richiamare la maschera con
il pulsante in thisworkbook sotto la "Private Sub Workbook_Open()"
ma va sempre in crash.
Sembra proprio che la maschera in avvio non la digerisca proprio.
La macro che mi richiama la maschera in manuale è la stessa che parte
quando la metto in avvio.

> Non è che funzioni su di un pc con Excel 2000 e non


> su di un pc con Excel 2003.
> Nel senso che sul pc con il 2000,
> ci sono *cose* non presenti sulla 2003?
>
> Puoi postare il codice della UserForm1?

è chilometrico, lo posto comunque?

> Grazie.
sono sempre io che ti ringrazio


>
> P.S. Controlla se eseste un file PERSONAL.XLS
> sul pc con Excel 2000. Grazie.

Stasera verifico, IL PC ce l'ho in altra sede
Nel pc dove c'è il 2003 non era presente il PERSONAL.XLS, e nanche il
percorso nelle opzioni / generale (C:\Programmi\Microsoft Office
\OFFICE11\XLSTART)
Adesso , per prova, ho inserito un file vuoto con il nome PERSONAL.XLS
ma non ho ottenuto miglioramenti.
questo è il codice di errore:
AppName: excel.exe AppVer: 11.0.8169.0 AppStamp:465f27bd
ModName: vbe6.dll ModVer: 6.5.10.24 ModStamp:464105f1
fDebug: 0 Offset: 00022c90

ciao
alberto

poluz

unread,
May 9, 2009, 9:42:08 AM5/9/09
to
> > Puoi postare il codice della UserForm1?
>
è chilometrico, lo posto comunque?

> > P.S. Controlla se eseste un file PERSONAL.XLS


> > sul pc con Excel 2000. Grazie.

ho verificato, su tutti i PC con Exel 2000 ( 3 pc provati) il file
funziona alla perfezione e lo posso modificare tranquillamente. Non si
è mai verificato un crash
Non è presente in nessun pc il file PERSONAL.XLS.

altre dritte?
Saluti
alberto

poluz

unread,
May 11, 2009, 4:57:14 AM5/11/09
to
Non c'è stato nulla da fare, ho risolto il problema in maniera
empirica....
ho risolto inserendo un timer che mi fa apparire la userform dopo 1/2
secondo.
Application.OnTime Now + TimeValue("00:00:01")/2, "MacroUserForm".
Non so che pensare.

saluti e grazie
alberto

> > alberto- Nascondi testo citato
>
> - Mostra testo citato -

0 new messages