Punto informatico Network
Login Esegui login | Non sei registrato? Iscriviti ora (è gratuito!)
Username: Password:
  • Annuncio Pubblicitario

[VBA-EXCEL] Errore di run-time 438

Il forum per tutti i developer. Leggere attentamente il regolamento di sezione prima di postare.

[VBA-EXCEL] Errore di run-time 438

Messaggioda fRANCOfRANCHI » mar giu 20, 2006 8:07 am

buongiorno
sto lavorando con excell e mi segna "error di run-time 438"nella scritta in grassetto
grazie e ciao

Sub Trova()
Dim intbus As Object
Dim dovesiamo As Variant
Dim numriga As Integer
Dim tipobus As Variant
'Imposta la gamma dei bus dell'tabelle.
Set intbus = Worksheets("tabelle").Cells(1, 1).CurrentRegion
'Va nell'elenco dell'tabelle e, basandosi sulla proprietà IndiceElenco
'dell'elenco a discesa, trova il bus ed i suoi attributi.
dovesiamo = DialogSheets("Rapportini").DropDowns(1).ListIndex
'Il file di intestazione si trova sulla riga superiore;
'bisogna trovare il numero di riga assoluto.
numriga = dovesiamo
'Inserisce i valori nella finestra di dialogo Rapportini.
DialogSheets("Rapportini").Labels(5).Text = Format(intbus.Cells(numriga, 2), "")
DialogSheets("Rapportini").Labels(6).Text = Format(intbus.Cells(numriga, 3), "")
'Ricava il tipobus dal foglio tabelle.
tipobus = Worksheets("tabelle").Cells(numriga, 2).Val
'Calcola i totali parziali.
End Sub
Avatar utente
fRANCOfRANCHI
Aficionado
Aficionado
 
Messaggi: 34
Iscritto il: mer apr 13, 2005 10:59 pm

*** MODERAZIONE ***

Messaggioda Silver Black » mar giu 20, 2006 10:46 am

Attento, non hai inserito il tag nell'oggeto (un identificativo del linguaggio da te utilizzato) e anche l'oggetto non è molto significativo (pensa se tutti quando hanno un problema di programmazione scrivessero "Cosa sbaglio", non si riuscirebbe più a districarsi). [:p]

Per questa volta aggisto io, ma stai più attento. [fischio]
Sergio Pappalardo aka Silver Black
CyberInstaller - www.silvercybertech.com - http://silvercybertech-labs.com/cyberblog
Avatar utente
Silver Black
Silver Member
Silver Member
 
Messaggi: 1147
Iscritto il: gio gen 06, 2005 8:50 pm
Località: Bassano del Grappa (VI)


Torna a Programmazione

Chi c’è in linea

Visitano il forum: Nessuno e 0 ospiti

Powered by phpBB © 2002, 2005, 2007, 2008 phpBB Group
Traduzione Italiana phpBB.it

megalab.it: testata telematica quotidiana registrata al Tribunale di Cosenza n. 22/09 del 13.08.2009, editore Master New Media S.r.l.; © Copyright 2008 Master New Media S.r.l. a socio unico - P.I. 02947530784. GRUPPO EDIZIONI MASTER Spa Tutti i diritti sono riservati. Per la pubblicità: Master Advertising