Messaggio di errore quando si esegue una macro di Visual Basic, Applications Runtime in Excel: "metodo" SaveAs "dell'oggetto" _Worksheet "non riuscito"

Sintomi

Quando si esegue una macro di Visual Basic, Applications Runtime in Microsoft Excel, è possibile che venga visualizzato il messaggio di errore seguente o simile:

Errore di run-time "1004": metodo "SaveAs" dell'oggetto "_Worksheet" non riuscito

Causa

Questo comportamento può verificarsi quando entrambe le condizioni seguenti sono vere:

  • Si usa una macro di Visual Basic per le applicazioni per salvare un foglio di lavoro.-e-

  • Devi specificare il formato di file come costante xlWorkbookNormal.

Ad esempio, il codice seguente provoca l'errore:

Sub A()   Dim myNewSheet As Worksheet   Set myNewSheet = ActiveSheet   FileNameBin = "c:\ABC"   myNewSheet.SaveAs Filename:=FileNameBin, FileFormat:=xlWorkbookNormalEnd Sub

Soluzione alternativa

Microsoft fornisce esempi di programmazione solo per le illustrazioni, senza garanzia espressa o implicita, incluse, ma non solo, le garanzie implicite di commerciabilità e/o idoneità per uno scopo specifico. In questo articolo si presuppone che si abbia familiarità con il linguaggio di programmazione dimostrato e gli strumenti usati per creare e eseguire il debug delle procedure. I professionisti del supporto tecnico Microsoft possono aiutare a spiegare la funzionalità di una determinata procedura, ma non modificano questi esempi per fornire funzionalità aggiuntive o creare procedure per soddisfare le specifiche esigenze. Se si ha un'esperienza di programmazione limitata, potrebbe essere necessario contattare un partner Microsoft Certified o Microsoft Advisory Services. Per altre informazioni, visitare questi siti Web Microsoft: partner certificati Microsoft- Microsoft Advisory Services- per altre informazioni sulle opzioni di supporto disponibili e su come contattare Microsoft, visitare il sito web Microsoft seguente:Per aggirare questo comportamento, modificare la specifica del formato di file dalla costante xlWorkbookNormal a 1. Il codice di esempio funziona in genere se modificato in:

Sub A()   Dim myNewSheet As Worksheet   Set myNewSheet = ActiveSheet   FileNameBin = "c:\ABC"   myNewSheet.SaveAs Filename:=FileNameBin, FileFormat:=1End Sub

Nota Anche se si sta salvando un foglio di lavoro, tutti i fogli in cui viene salvato il formato di file sono impostati su xlWorkbookNormal o 1.

Stato

Microsoft ha confermato che questo problema si verifica con i prodotti elencati alla fine del presente articolo.

Serve aiuto?

Amplia le tue competenze
Esplora i corsi di formazione
Ottieni in anticipo le nuove caratteristiche
Partecipa a Microsoft Insider

Queste informazioni sono risultate utili?

Grazie per il feedback!

Grazie per il tuo feedback! Potrebbe essere utile metterti in contatto con uno dei nostri operatori del supporto di Office.

×