Risultati da 1 a 4 di 4

Discussione: Errore di run-time 424



  1. #1
    L'avatar di Khan
    Clicca e Apri
    Data Registrazione
    Jul 2015
    Località
    Padova
    Messaggi
    55
    Versione Office
    2016
    Likes ricevuti
    0
    Likes dati
    1

    Errore di run-time 424

    Codice: 
    Sub test1()
    Dim ws As Worksheet
    Set ws = ThisWorbook.Sheets("My Report")
    
    
    LastRow = ws.Cells(Rows.Count, 1).End(xlUp).Row
    ws.Range("a2:c" & LastRow).ClearContents
    
    
    For x = 2 To 500
    
    
        ws.Cells(x, 1) = Date + 7
        ws.Cells(x, 2) = x * 15
        If ws.Cells(x, 2) > 100 Then
            ws.Cells(x, 3) = True
        Else
            ws.Cells(x, 3) = False
        End If
        
    Next x
            
            
    End Sub
    Ciao a tutti. Questo codice mi dà errore alla linea 3. Come mai? Grazie
    The saddest aspect of life right now is that science gathers knowledge faster than society gathers wisdom. - Isaac Asimov

    Windows 10 + Excel 2013

  2. #2

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4024
    Versione Office
    2013
    Likes ricevuti
    1228
    Likes dati
    923

    Re: Errore di run-time 424

    Ciao,
    evidentemente non usi l'opzione "Option Explicit" altrimenti ti avrebbe subito evidenziato la parola scritta in modo errato.

    Manca la "k" in :
    Codice: 
    Set ws = ThisWorkbook.Sheets("My Report")

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  3. #3
    L'avatar di Khan
    Clicca e Apri
    Data Registrazione
    Jul 2015
    Località
    Padova
    Messaggi
    55
    Versione Office
    2016
    Likes ricevuti
    0
    Likes dati
    1

    Re: Errore di run-time 424

    Citazione Originariamente Scritto da cromagno Visualizza Messaggio
    Ciao,
    evidentemente non usi l'opzione "Option Explicit" altrimenti ti avrebbe subito evidenziato la parola scritta in modo errato.

    Manca la "k" in :
    Codice: 
    Set ws = ThisWorkbook.Sheets("My Report")
    Grazie mille cromagno sia per il suggerimento sia per la correzione
    The saddest aspect of life right now is that science gathers knowledge faster than society gathers wisdom. - Isaac Asimov

    Windows 10 + Excel 2013

  4. #4

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4024
    Versione Office
    2013
    Likes ricevuti
    1228
    Likes dati
    923

    Re: Errore di run-time 424

    Citazione Originariamente Scritto da Khan Visualizza Messaggio
    Grazie mille cromagno sia per il suggerimento sia per la correzione
    Di niente :32:

    se hai risolto il problema, segna questo thread come "RISOLTO".
    Vai sul menù "Strumenti Discussione" (all'inizio del thread) e scegli la voce "Segna questa discussione come Risolta...".

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

Discussioni Simili

  1. [Risolto] Errore Run time 13 se aggiungo righe in menù a tendina
    Di Kiter nel forum Domande su Excel VBA e MACRO
    Risposte: 5
    Ultimo Messaggio: 17/10/16, 10:24
  2. Errore run-time 62
    Di yoghi87 nel forum Domande su Excel VBA e MACRO
    Risposte: 4
    Ultimo Messaggio: 06/10/16, 13:26
  3. Errore run-time 9 Indice non incluso nell'intervallo: Help
    Di Giuspy82 nel forum Domande su Excel VBA e MACRO
    Risposte: 27
    Ultimo Messaggio: 20/09/16, 10:12
  4. Errore run-time n. 13 Tipo non corrispondente
    Di alfrimpa nel forum Domande su Excel VBA e MACRO
    Risposte: 6
    Ultimo Messaggio: 17/03/16, 14:54
  5. Errore run-time 1004
    Di revenge9 nel forum Domande su Excel in generale
    Risposte: 8
    Ultimo Messaggio: 05/11/15, 10:52

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •