Excel Vba: Run-time error 424

Question

Buonasera,

qualcuno può aiutare a cpaire perchè ho l'errore Run-time eror 424 :

Grazie

Answer 1

ciao

sicuro che il nome del foglio sia esatto?

poi è una macro su modulo

fai a meno di scrivere il foglio

scrivi solo

Cells(i,3)=i

e funziona sul foglio attivo

Answer 2

ciao

sicuro che il nome del foglio sia esatto?

poi è una macro su modulo

fai a meno di scrivere il foglio

scrivi solo

Cells(i,3)=i

e funziona sul foglio attivo

Non dovrei scrivere una macro su modulo?

Answer 3

Ora funziona

Answer 4

Ciao Mirkos.,

Per comprendere appieno i miei due suggerimenti, è necessario comprendere la differenza tra la proprietà Worksheet.Name e la proprietà Workbook.CodeName

Se hai bisogno di una spiegazione più dettagliata, chiedi pure.

===

Regards,

Norman

Answer 5

Ciao Mirkos.,

qualcuno può aiutare a cpaire perchè ho l'errore Run-time eror 424 :

A me il tuo codice funzionerebbe sempre, a meno che tu non abbia cancellato il primo foglio originale della cartella di lavoro.

Il tuo codice si riferisce all'oggetto Foglio1 che si riferisce al primo foglio originale, indipendentemente da come quel foglio potrebbe essere stato rinomina.

Se desideri fare riferimento al primo foglio esistente, prova invece

'========>>

Option Explicit

'-------->>

Public Sub Prova()

Dim i As Long

For i = 1 To 20 Step 2

ThisWorkbook.Sheets(1).Cells(i, 3) = i 

Next i

End Sub

'<<========

In modo più affidabile e più robusto, dichiara esplicitamente il nome dell'oggetto foglio in questo modo

'========>>

Option Explicit

'-------->>

Public Sub Prova()

Dim i As Long

Const sFoglio As String = "Pippo" '<<=== Modifica

For i = 1 To 20 Step 2

ThisWorkbook.Sheets(sFoglio).Cells(i, 3) = i 

Next i

End Sub

'<<========

===

Regards,

Norman