Condividi tramite

foglio excel salvato tipo XLSM non mi funziona.

Anonimo
2023-04-03T13:46:04+00:00

Ho un modello di excel, .XLTM) quando lo chiudo con la procedura manuale Salva con nome, con ext. .XLSM, me lo fa senza problemi. Mi salva il nuovo file con il nome immesso con l'estensione XLSM e ovviamente mi mantiene il modello ditpo . XLTM.

Quando invece faccio partire una routine tramite il command button mi dice che non è possibile utilizzare l'estensione xlsm.

Lo scopo della routine è quello di salvare il file con il nome composto dal contenuto di due TextBox (per es. 4 e 29) poi aggiungere l'estensione del file .XLSM.

La routine è questa:

Private Sub CommandButton1_Click()

Dim nomeFile As String

nomeFile = TextBox4.Value & "." & TextBox29.Value & ".xlsm" 

ActiveWorkbook.SaveAs ThisWorkbook.Path & "\" & nomeFile 

End Sub

Allego invece una foto del messaggio che mi da excel.

Non capisco perchè con la procedura manuale funziona il salvataggio.

Con la routine no.

Evidentemente c'è qualcosa di sbagliato nella routine.

Ho provato anche a provare con tutte le estensioni dei file, ma niente sempre lo stesso messaggio

Ringrazio per il vostro aiuto.

Microsoft 365 e Office | Excel | Per la casa | Altro

Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.

0 commenti Nessun commento

Risposta accettata dall'autore della domanda

Anonimo
2023-04-03T15:08:12+00:00

Ciao Luigi C!

Sembra che il problema potrebbe essere correlato al formato di file del modello originale. I modelli di Excel (con estensione xltm) sono progettati per essere utilizzati come punto di partenza per la creazione di nuove cartelle di lavoro, ma non possono essere utilizzati direttamente per salvare direttamente le cartelle di lavoro con attivazione macro (con estensione xlsm).

Per risolvere questo problema, è possibile salvare il modello come cartella di lavoro con attivazione macro (xlsm) prima e quindi utilizzarlo per creare nuove cartelle di lavoro.

Ecco i passaggi:

* Aprire il modello Excel (.xltm) e abilitare le macro se richiesto. * Fare clic su File > Salva con nome, selezionare il formato della cartella di lavoro con attivazione macro (.xlsm) e salvare il file con un nuovo nome. * Chiudere il file modello originale (.xltm). * Utilizzare il file della cartella di lavoro con attivazione macro (.xlsm) come punto di partenza per la creazione di nuove cartelle di lavoro. * Modifica il tuo codice VBA per salvare la nuova cartella di lavoro con il formato della cartella di lavoro con attivazione macro (.xlsm).

Sub privato CommandButton1_Click() Dim fileName As String fileName = TextBox4.Value & "." & TextBox29.Value & ".xlsm" ActiveWorkbook.SaveAs ThisWorkbook.Path & "" & fileName, FileFormat:=52 '52 è il codice per il formato di file xlOpenXMLWorkbookMacroEnabled Fine sub

Questo codice salva la cartella di lavoro attiva come cartella di lavoro con attivazione macro (xlsm) con il nome composto dal contenuto di due caselle di testo. Il parametro FileFormat:=52 consente di specificare il codice del formato di file per le cartelle di lavoro con attivazione macro.

Gentilmente fatemi sapere, se avete bisogno di ulteriore assistenza, sarò lieto di aiutarvi ulteriormente.

Migliori saluti Shakiru ·

Questa risposta è stata tradotta automaticamente. Di conseguenza, potrebbero esserci errori grammaticali o espressioni strane.

La risposta è stata utile?

2 persone hanno trovato utile questa risposta.
0 commenti Nessun commento

Risposta accettata dall'autore della domanda

Anonimo
2023-04-03T16:10:16+00:00

Ciao Luigi C!

Siete i benvenuti.

Per favore, ricordati di restituire alla comunità. Aiuta la persona successiva con questo problema valutando e indicando se questa conversazione è stata utile. Grazie

Migliori saluti Shakiru ·

Questa risposta è stata tradotta automaticamente. Di conseguenza, potrebbero esserci errori grammaticali o espressioni strane.

La risposta è stata utile?

1 persona ha trovato utile questa risposta.
0 commenti Nessun commento

1 risposta aggiuntiva

Ordina per: Più utili
  1. Anonimo
    2023-04-03T16:07:20+00:00

    Ti ringrazio tantissimo. Al primo colpo a funzionato.

    Sei meglio dell IA.

    Erano giorni che cercavo una soluzione sulle varie IA.

    Tutto quello che mi è stato proposto, non ha mai funzionato

    Buona serata

    ciao

    La risposta è stata utile?

    0 commenti Nessun commento