LORETTA B. forum

Linguaggi di programmazione => Problematiche Excel => Topic aperto da: Tullio - Ottobre 26, 2013, 10:52:43

Titolo: Errore di compilazione
Inserito da: Tullio - Ottobre 26, 2013, 10:52:43

Ciao micdas,
non riesco a capire che cosa stia cercando quando mi da errore di compilazione - Impossibile trovare il progetto o la libreria.
Quando devo far cancellare le forme si blocca dove è evidenziato e mi da l'errore.
Devo farti una premessa, l'ultimo sviluppo l'ho fatto sul computer di casa e questa mattina l'ho trasferito su quello in ufficio, ma anche la versione precedente aveva la stessa Sub, quindi ......boh?
Tu certamente capisci.
Ti ringrazio in anticipo.
Tullio

Sub Forme_cancella()
Dim shp As Shape
Dim nameshp As String
    For Each shp In ActiveSheet.Shapes
        'If shp.Visible = msoTrue Then
        nameshp = shp.Name
            'salva dalla cancellazione la casella di convalida
           
            If Left(nameshp, 9) <> "Drop Down" Then 'And Left(nameshp, 6) <> "Button" Then
                shp.Delete
                'shp.Visible = msoFalse
            Else
            End If
        'End If
    Next

End Sub

Titolo: Re:Errore di compilazione
Inserito da: micdas - Ottobre 26, 2013, 20:01:21

Non sei autorizzato a vedere i links. Registrati o Login

If Left(nameshp, 9) <> "Drop Down" Then 'And Left(nameshp, 6) <> "Button" Then
       shp.Delete
       'shp.Visible = msoFalse
Else
End If

Codice: Non sei autorizzato a vedere i links. Registrati o Login

If Left(nameshp, 9) <> "Drop Down" Or Left(nameshp, 6) <> "Button" Then
       shp.Delete
       'shp.Visible = msoFalse
Else
End If
il "nameshp" non può essere Drop Down e Button, ma può essere Drop Down o Button
E poi l'ELSE se è vuota non serve, se invece nell'ELSE c'è qualche azione da eseguire è OK   :ciao:

Titolo: Re:Errore di compilazione
Inserito da: Tullio - Ottobre 28, 2013, 10:30:50

Ciao micdas, ti ringrazio della pronta risposta, ma i commenti li ho lasciati solo per avere un riferimento alla routine di partenza, tutto quello che è dietro apice non dovrebbe starci ma anche se c'è non dovrebbe dare problemi.
Io ti parlo di un'altra cosa,(http://C:\Users\User\Desktop\Documento1.pdf) sto cercando di inviarti l'immagine del codice vb e dell'errore che rileva ma non ci riesco almeno credo perché l'anteprima non me lo fa vedere.
Come devo fare ? per allegarti un pdf?
Tullio

Titolo: Re:Errore di compilazione
Inserito da: Tullio - Ottobre 29, 2013, 08:44:27

Ciao micdas, ho risolto l'intoppo, mancava il riferimento al PDFCreator. :resistere: