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

Chiusura Excel da VBA

282 views
Skip to first unread message

Marco

unread,
Jun 13, 2012, 4:11:53 PM6/13/12
to
Salve a tutti,

ho creato tempo fa un file excel per creare delle "schede" le quali
fanno il conteggio delle ore impiegate in un certo intervento.
Poichᅵ devono essere inseriti diversi dati, col tempo mi sono buttato
nell'idea di creare una UserForm, molto piᅵ carina ed immediata.

Ho cosᅵ creato la userform con le textbox per inserire i dati e i tasti
per esportare i dati sul foglio excel e stampare il rendiconto ore e
salvare il file excel.

Ora qui sorgono due problemi:
1)Quando faccio salva usando il seguente comando applicato ad un tasto:

Private Sub Salva_Click()

Dim Forli As String
Dim Cnt As String

Forli = Range("F2").Value
Cnt = Range("H2").Value

ActiveWorkbook.SaveAs _
Filename:=Environ("USERPROFILE") & "\Documenti\Schede\" & Forli & "_" &
Cnt & ".xls", FileFormat:= _
xlNormal, Password:="", WriteResPassword:="",
ReadOnlyRecommended:=False _
, CreateBackup:=False

Application.Quit

End Sub

Ho il problema che il file salvato .xls contiene anche tutto il codice
vba del modello da me creato e quindi se vado a riaprire il file excel
salvato mi si apre la schermata userform come nel modello e non il
singolo file excel con solo i dati da me inseirti.

C'ᅵ un modo per poter salvare un file senza che contenga le righe di
codice vba come l'originale?
Mi andrebbe anche bene che contenga il tutto ma una volta salvato, nel
file nuovo si apra direttamente excel e non la userform come nel
modello originale che ha creato il file.


2) Secondo problema invece ᅵ che usando la funzione Application.Quit
per chiudere l'intero programma excel tutto funziona alla grande se non
insorgono problemi, ad esempio se il mio modello excel incontra un
problema e quindi mi mostra la schermata di richiesta di debug, se io
la annullo, mi si chiude la finestra ma il programma excel in realtᅵ
rimane attivo in background, questo perchᅵ io gli ho rodinato di
mostrare solo la userform all'avvio del file modello e di nascondere
tutto il resto.
Come posso fare, se ᅵ possibile, che in caso di errore o mi venga
mostrato di nuovo la finestra di excel annullando la funzione nascondi
oppure che semplicemente anche in caso di errore termini comunque il
programma excel?

Il file in originale ᅵ stato creato con excel 2003, le successive
modifiche sono state fatte con excel 2010 ma salvato sempre come
modello di excel 97-2003.
Inoltre il modello ᅵ usato su computer con windows Xp e Sev7n.
Il file verrᅵ usato principalmente da altre persone che non conoscono
excel e dovranno solo compilare il modulo userform che gli appare e
cliccare sui tasti richiesti.

Penso di avervi detto tutto anche se prolisso ma spero di essere stato
esauriente nel spiegarvi il mio problema.

Saluti a tutti, in attesa di una soluzione ^^

--
M@rco.


0 new messages